Microsoft OLE DB Provider for ODBC Drivers error '80004005' with ASP
149922Nov 29 2002 — edited Dec 16 2002Hi,
I'm trying to Insert/Update data into table using ADO/ASP.
I have this Error :
-----------------------------------------------------------
Microsoft OLE DB Provider for ODBC Drivers error '80004005'
Unspecified error
-----------------------------------------------------------
In fact, the script was ok for updating the 50 first lines.
After, it generate the error.
Here my code :
---------------------------------------------------------------------------------------------
Set fso = CreateObject("Scripting.FileSystemObject")
strFileName = Server.MapPath(".") & "\Upload\" & File & ".txt"
Set f = fso.OpenTextFile(strFileName,1,False)
set rs = server.createobject("adodb.recordset")
rs.open File, db, 3,3
Do While f.AtEndOfStream <> True
strData = f.ReadLine ' read the line
If len(strData)>0 then ' skip any empty line!
arrData = split(strData,";") ' makes array splitting on comma
for i=0 to ubound(arrData)
If arrData(i)<>"" and not IsNull(arrData(i)) then arrData(i) = trim(arrData(i))
If i=2 Or i=3
SqlstringTmp = SqlstringTmp + "'" + arrData(i) + "',"
else
if i = 4 then
SqlstringTmp = SqlstringTmp + "to_date('"+ arrData(i) + "','DD/MM/YY')" + ","
Else
SqlstringTmp = SqlstringTmp + arrData(i) + ","
End if
End if
next
End If
SqlInsert = "INSERT INTO T_OLAN_I VALUES (" + SqlstringTmp + ")"
set rsInsert = server.createobject("adodb.recordset")
rsInsert.open sqlInsert, db
Loop
---------------------------------------------------------------------------------------------
I don't where is the problem
Best Regards
Thanks a lot for your help