aussieolie
Australian
- Local time
- Today, 03:13
- Joined
- Apr 3, 2002
- Messages
- 47
the following code with (*) will not work, i am unsure of what to replace it with.
---CODE---
On Error GoTo glrVerifyAttachmentsErr
Dim varReturn As Variant
Dim strDBDir As String
Dim strMsg As String
*Dim db As Database
Dim varFileName As Variant
*Dim tdf As TableDef </B>
Dim intI As Integer
Dim intNumTables As Integer
Dim strProcName As String
---ENDOFCODE---
Any suggestions,
Thanks
Olie
---CODE---
On Error GoTo glrVerifyAttachmentsErr
Dim varReturn As Variant
Dim strDBDir As String
Dim strMsg As String
*Dim db As Database
Dim varFileName As Variant
*Dim tdf As TableDef </B>
Dim intI As Integer
Dim intNumTables As Integer
Dim strProcName As String
---ENDOFCODE---
Any suggestions,
Thanks
Olie