Tek-Tips is the largest IT community on the Internet today!
Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!
-
Congratulations strongm on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!
Access ODBC Links
- Thread starter Dodge
- Start date
DAO:
(refreshlink)
if your database of linked table is password protected you need the pssw - password:
Sub intTbl(vLinkedTableName, vDatabasePath, pssw)
On Error Resume Next
Dim db As Database
Dim tdf As TableDef
Set db = CurrentDb
Set tdf = db.TableDefs(vLinkedTableName)
tdf.Connect = ";database=" & vDatabasePath & ";pwd=" & pssw
tdf.RefreshLink
End Sub
i hope this subrutine works
ide
(refreshlink)
if your database of linked table is password protected you need the pssw - password:
Sub intTbl(vLinkedTableName, vDatabasePath, pssw)
On Error Resume Next
Dim db As Database
Dim tdf As TableDef
Set db = CurrentDb
Set tdf = db.TableDefs(vLinkedTableName)
tdf.Connect = ";database=" & vDatabasePath & ";pwd=" & pssw
tdf.RefreshLink
End Sub
i hope this subrutine works
ide
- Status
Similar threads
- Locked
- Question
- Locked
- Question
- Locked
- Question