Having a hard time setting up a Tra 1

[mikeyb540]

Having a hard time setting up a TransferDB for a DBF

DoCmd.TransferDatabase acImport, ODBC, JRNL, acTable, UNNAMED, TEST

What am I missing here?

Txs in Advance

 

[smuckers]

Good Afternoon mikeyb540!

I used the following statement to successfully transfer and export form objects. Perhaps including quotes and fully qualified paths the statement will work.

When you get close, the error messages will start telling you which argument or part is not working. I finally got it by trial and error.
**********************************************
DoCmd.TransferDatabase acExport, "Microsoft Access", "U:\Contacts\Test.mdb", acForm, "Contact Types", "frmContactTypes"
********************************************
I hope this helps, good luck.

Sincerely,

Smuckers

 

[mikeyb540]

Thanks for the feedback Smuckers.

I tried the quotes but still nothing. Errors out at the DOCMD.TransferDatabase

Below is what I have:

Dim ReqKey As String
Dim ODBC_String As String
Me!Text4 = Me!Combo0.Column(1)
Me!Text8 = Me!Combo0.Column(0)
ReqKey = "D:\Test\Journal\" & Text8 & "\!"
Text6 = ReqKey
ODBC_String = "ODBC;DSN=JRNL;DBQ=" & Text6 & ";Extension=tps;Oem=N;NullEmptyStr=N;;TABLE=UNNAMED"
SetStringValue "HKEY_LOCAL_MACHINE\software\ODBC\ODBC.INI\JRNL", "DBQ", Text6
DoCmd.TransferDatabase acImport, "odbc database", ODBC_String, acTable, , DUDE

Thanks,
Mike

 

[mikeyb540]

You are right the quotes made the difference
DoCmd.TransferDatabase acImport, "ODBC", "ODBC;DSN=JRNL", acTable, "UNNAMED", Text4

Thanks