Sorry but it's me again.
I am using this function to connect to a dbf file.
I keep getting the following error:
Function OpenDBFConn(Path)
Dim Conn: Set Conn = CreateObject("ADODB.Connection")
Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=" & Path & ";" & _
"Extended Properties=""DBASE IV;"";"
Set OpenDBFConn = Conn
End Function
Dim DBConn
Set DBConn = OpenDBFConn("D:\Inetpub\'Open recordset from TrafficCounts able
Dim rsWaterShed
Set rsWaterShed = DBConn.Execute("SELECT * FROM fctraffic02.dbf ")
The Microsoft Jet database engine could not find the object 'fctraffic02.dbf'. Make sure the object exists and that you spell its name and the path name correctly
What is so strange about it all is that if I use another dbf file on the same directory, it works.
Could it be because this dbf file that is giving me grief was created today?
Please help!
I am using this function to connect to a dbf file.
I keep getting the following error:
Function OpenDBFConn(Path)
Dim Conn: Set Conn = CreateObject("ADODB.Connection")
Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=" & Path & ";" & _
"Extended Properties=""DBASE IV;"";"
Set OpenDBFConn = Conn
End Function
Dim DBConn
Set DBConn = OpenDBFConn("D:\Inetpub\'Open recordset from TrafficCounts able
Dim rsWaterShed
Set rsWaterShed = DBConn.Execute("SELECT * FROM fctraffic02.dbf ")
The Microsoft Jet database engine could not find the object 'fctraffic02.dbf'. Make sure the object exists and that you spell its name and the path name correctly
What is so strange about it all is that if I use another dbf file on the same directory, it works.
Could it be because this dbf file that is giving me grief was created today?
Please help!