Again I'm sorry but my network at work is what it is, slow. i am just trying to find a better way of dealing with it rather than blaming it or hoping i had access to the network fairy that could change it all tomorrow morning. If temp tables are not advisable then how could i accomplish something of the same nature, take my linked tables and make them static temporarily during the supervisors session for them to do daily or monthly task then delete that static table? how about temporarily making the linked tables local then on exit reversing back to linked for the next session using a variation of Perceptus's code for saving a linked table as local? trying to think outside the box here.
Code:
Public Sub LinktoLocal()
Dim td As TableDef, tdCopy As TableDef
If Left(CurrentProject.Path, 1) <> "C" Then Exit Sub ' prevents running this file from the share location
On Error Resume Next
For Each td In CurrentDb.TableDefs
Debug.Print td.Name
If Nz(td.Connect, "") <> "" And (Left(td.Name, 1) <> "~") And (Left$(td.Name, 4) <> "MSys") Then
Set tdCopy = td ' Copy the old table def information
Dim strSplit() As String
strSplit = Split(td.Connect, "=")
DoCmd.DeleteObject acTable, td.Name 'Deleting the link first ensures the re_import doesnt append an oddname
DoCmd.TransferDatabase acImport, "Microsoft Access", strSplit(1), acTable, tdCopy.Name, tdCopy.Name
Set tdCopy = Nothing
End If
Next
Debug.Print "Done"
End Sub