Error 13 ( Type mismatch

[gilsygirl]

Hello everyone

Am having this error an just dont know what to do. Am using vb 6 and access database

This is my code

code vb:

Public db As Database
Public rs As Recordset
Public ws As Workspaces

Public Function initdb()
'On Error GoTo error
Set ws = DBEngine.Workspaces(0)
Set db = ws.OpenDatabase(App.Path & "\resultchecker.mdb")
Set rs = db.OpenRecordset("candres", dbOpenTable)

Exit Function

am trying to open the database but it keeps giving type mismatch.
please help

[YarrOfDoom]

I don't know anything about databases, but isn't it possible you have to declare ws as a workspace, instead of workspaces? (it's just a guess)

[gilsygirl]

I don't know anything about databases, but isn't it possible you have to declare ws as a workspace, instead of workspaces? (it's just a guess)

Yes u are right i have change dat. I still have the error though
Pls help

[Tequilaman]

Well you definately have two different data types, that's why you get the error. Did you define the data format explicit or not? - If not there might be an implicid definition that is not what you thought would be the implicit definition.

My try would be to use explicit definitions. (You should find out where the error is then)

[gilsygirl]

Well you definately have two different data types, that's why you get the error. Did you define the data format explicit or not? - If not there might be an implicid definition that is not what you thought would be the implicit definition.

My try would be to use explicit definitions. (You should find out where the error is then)

Thanks for the reply
What do mean when u say explicit and implicit definations.
I have looked at all the variables i define and they are of the correct type.
what about the database how do i see the error.
am frustrated and a newbie

[Tequilaman]

You can define variables explicit with the type or implicit without specifing a type.

Have you tried a data type match through some prog like TORA or SQLView or whatever of these suits your database type.

[keign]

in what line do you get the error?

[keign]

whats the word "candres"..? try removing the ""

[SonnyH]

I don't see anything wrong with the code.

If the error occurs on this line

Set db = ws.OpenDatabase(App.Path & "\resultchecker.mdb")

then most likely App.Path was not a good string. Try to replace App.Path with something else to see if it works

You can put your database in c:\data directory then try this

Set db = ws.OpenDatabase("c:\data\resultchecker.mdb")

[gilsygirl]

Thanks for your replies. I have change the path name and put the database in c: directly but the error will not go away.

Any more suggestions will be kindly appreciated.

Thank.

This is my lastest code

code vb:

Public Function initdb()
'On Error GoTo error
Set ws = DBEngine.Workspaces(0)
Set db = ws.OpenDatabase("c:\resultchecker.mdb")
Set rs = db.OpenRecordset("candres", dbOpenTable)
Exit Function
/ code

the line in bold is where the erro is coming from.

thanks

[gilsygirl]

Thanks for your replies. I have change the path name and put the database in c: directly but the error will not go away.

Any more suggestions will be kindly appreciated.

Thank.

This is my lastest code

code vb:

Public Function initdb()
'On Error GoTo error
Set ws = DBEngine.Workspaces(0)
Set db = ws.OpenDatabase("c:\resultchecker.mdb")
Set rs = db.OpenRecordset("candres", dbOpenTable)
Exit Function
/ code

The line in bold is where the error is coming from.

thanks

[QVeen72]

Hi,

Check what all References have been added to your Project.
To Check this goto menu : Project >> References

What I Guess is, "Microsoft ActiveX Data Objects" is also added.
Either Remove This Reference
OR
Declare Recordset as :
Dim RS As DAO.Recordset

"Recordset" is an Overloaded Class used in both "ADO" and "DAO"
To Identify between the two, you have to Pre-ceed with the Class Name..

Hope that helps..

Regards
Veena

[YarrOfDoom]

just something handy to know: you should put brackets ("[" and "]") around your tags ("code=vb" and "/code"), else they won't work.


Yarr

[Mohan Krishna]

Hello gilsygirl,

Hope this would find u solve the problem!
Add "Microsoft DAO 3.6 Object Library" in the
PROJECT --->REFERENCES

ALL THE BEST!

[gilsygirl]

Hello gilsygirl,

Hope this would find u solve the problem!
Add "Microsoft DAO 3.6 Object Library" in the
PROJECT --->REFERENCES

ALL THE BEST!

To all of you

Thank you very very much. The problem was exactly from the references. I removed the Microsoft ActiveX reference and it worked.

Thanks a million again
gilsygirl (Newbie)