Also there must be a simplier way to replace this bit of ugly code:
ie test for the existance of a table without having to loop arround all the tables.VB Code:
For lintTable = 0 To catLocal.Tables.Count - 1 If CStr(catLocal.Tables.Item(lintTable).Name) = lstrQWTable Then lblnTable = True CreateACCLinkTableInQW = True Exit For End If Next ' Table




:
Reply With Quote