A
Anna
Hi:
I was linking tables from another Access db in 2003 as follows:
DoCmd.RunCommand acCmdLinkTables
It was allowing user to select db and select tables to link
In Access 2007 this comand does not work and I replaced it with:
DoCmd.RunCommand acCmdImportAttachAccess
A dialog box allows to select table but then it gives 2 options:
CheckBox 1 Import tables, queries, form..
ChekcBox 2 Link to the datea source by creating a linked table
Check box 1 is a default. How can I either have CheckedBox2 show as
selected or link without using this dialog box.
I am afraid that user will be selecting Checkbox1
Can you help?
Anna
It works but it shows users a dialog with two options (first marked as
default)
Private Sub LinkTables()
On Error GoTo Err_Exit_Click
MsgBox "Files will be exported to
Table1\RmsInventoryTransfers\ExportGenesis\CurrentFiles\", , "Destination
Path"
MsgBox "Select external database and SELECT ALL tables option", ,
"Select Tables"
'DoCmd.RunCommand acCmdLinkTables
DoCmd.RunCommand acCmdImportAttachAccess
'MsgBox Err.Description
MsgBox "Operation Completed", , "Operation Status"
On Error GoTo Err_Exit_Click
ExportFiles
I was linking tables from another Access db in 2003 as follows:
DoCmd.RunCommand acCmdLinkTables
It was allowing user to select db and select tables to link
In Access 2007 this comand does not work and I replaced it with:
DoCmd.RunCommand acCmdImportAttachAccess
A dialog box allows to select table but then it gives 2 options:
CheckBox 1 Import tables, queries, form..
ChekcBox 2 Link to the datea source by creating a linked table
Check box 1 is a default. How can I either have CheckedBox2 show as
selected or link without using this dialog box.
I am afraid that user will be selecting Checkbox1
Can you help?
Anna
It works but it shows users a dialog with two options (first marked as
default)
Private Sub LinkTables()
On Error GoTo Err_Exit_Click
MsgBox "Files will be exported to
Table1\RmsInventoryTransfers\ExportGenesis\CurrentFiles\", , "Destination
Path"
MsgBox "Select external database and SELECT ALL tables option", ,
"Select Tables"
'DoCmd.RunCommand acCmdLinkTables
DoCmd.RunCommand acCmdImportAttachAccess
'MsgBox Err.Description
MsgBox "Operation Completed", , "Operation Status"
On Error GoTo Err_Exit_Click
ExportFiles