husen
09-30-2010, 11:37 PM
Hi all'
i joined to your forum,and i hope to help me in my problem:
i already tested my script to connect DBF by VBA ,if i executedfrom VBA environment ,it works fine. if i executed by macro from access , i got this error :
run time error 2147467259 (80004005)
selected collating sequence not supported by OS.
this my code
Public Function Delete()
Dim Conn: Set Conn = CreateObject("ADODB.Connection")
Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source= E:\company;" & _
"Extended Properties=""DBASE IV;"";"
Conn.Execute "DELETE * FROM [employee.DBF] WHERE ID= '01' " & _
"OR ID= '02';"
Conn.Close
End Function
Any help will be appreciated....
i joined to your forum,and i hope to help me in my problem:
i already tested my script to connect DBF by VBA ,if i executedfrom VBA environment ,it works fine. if i executed by macro from access , i got this error :
run time error 2147467259 (80004005)
selected collating sequence not supported by OS.
this my code
Public Function Delete()
Dim Conn: Set Conn = CreateObject("ADODB.Connection")
Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source= E:\company;" & _
"Extended Properties=""DBASE IV;"";"
Conn.Execute "DELETE * FROM [employee.DBF] WHERE ID= '01' " & _
"OR ID= '02';"
Conn.Close
End Function
Any help will be appreciated....