一个db ole错误,高手帮忙啊?
Microsoft OLE DB Provider for SQL Server (0x80040E21)
我查msdn
说是Errors occurred,这是什么意思啊?
代码:
SQLstr=" select FileID,RecordID,FileAppName,FileType,FileFlag,Filecontent from T031 where 1>2"
rs.Open SQLstr,conn,2,3
for i=1 to strFileNum
strTemp=objFlow.GetTextValue("fileFlow" & i)
arryTemp=split(strTemp,chr(13))
strTemp=arryTemp(1)
strFileContent=mid(strTemp,15)
rs.AddNew
strFileName=objFlow.SaveFileToDB("fileFlow" & i ,rs.Fields("Filecontent"))
if Trim(strFileName)<>"" then
if asc(right(strFileName,1))=0 then'
strFilename=left(strFileName,len(strFileName)-1)
end if
rs.Fields("RecordID")=strFlowID
rs.Fields("FileAppName")=strFileName
rs.Fields("FileType")=strFileContent
rs.Update