Create DSN - Urgent

Hi guys and gals,

How to create Microsoft Access 2000 ODBC-DSN ?
The code below works, but it doesn't
set the database.

Does any of you know the set of parameters
for Access Driver ?
(the Help gives only for MS-SQL)

Thanks in advance

Keiko

-------------------------

Dim en As rdoEnvironment
Dim cnTest As rdoConnection
Dim strAttribs As String

strAttribs = "Description=" _
& "How to register" _
& Chr$(13) & "Database=c:\test.mdb"

rdoEngine.rdoRegisterDataSource "GukGuk", _
"Microsoft Access Driver (*.mdb)", _
True, strAttribs

I asked a similar question once - look here:

http://forums.vb-world.net/showthrea...threadid=12044

...

Thanks I'll try later
Keiko

funkyd77,

I have tried all the codes, but none any
of them works.

Last time how did you do it ?

Thanks in advance
Keiko

i used the second lot of code in this example - it just worked for me

you have to make sure that the ODBCCP32.DLL dll is on your system and registered.

when you say it didnt work - did you get any error messages? Because apart from the necessity to rely on the ODBCCP32.DLL file - it ought to work. Do you have the ODBC administrator installed on your computer? <sorry if this seems obvious>


Mark

Hi funkyd77,

Thanks for your advice. I have tried by
myown way and it works. Just to share with you ...

Thanks
Keiko

---------------

Dim en As rdoEnvironment
Dim cnTest As rdoConnection
Dim strAttribs As String

strAttribs = "Description=How to register" & chr$(13)
strAttribs = strAttribs & "UID=Admin" & chr$(13)
strAttribs = strAttribs & "PWD=Hello" & chr$(13)
strAttribs = strAttribs & "DBQ=c:\test.mdb"

rdoEngine.rdoRegisterDataSource "MyDSN", _
"Microsoft Access Driver (*.mdb)", _
True, strAttribs

---------------