kupe
Technical User
- Sep 23, 2002
- 376
The command button is supposed to go to T-Drive to link to a table in another database. The desired table is named with an input-box. Only it won't.
Can anyone spot the (not exactly deliberate) error please?
Private Sub Command1_Click()
Dim strfilename As String
strfilename = InputBox("Please name the file you want to link to?
DoCmd.TransferDatabase acLink, "Microsoft Access", "Table1", "T:\ Building\Link Survey databases\ForNewLinks.mdb" & strfilename, True, ""
Exit_Command1_Click:
End Sub
Can anyone spot the (not exactly deliberate) error please?
Private Sub Command1_Click()
Dim strfilename As String
strfilename = InputBox("Please name the file you want to link to?
DoCmd.TransferDatabase acLink, "Microsoft Access", "Table1", "T:\ Building\Link Survey databases\ForNewLinks.mdb" & strfilename, True, ""
Exit_Command1_Click:
End Sub
