为什么对数据库的操作会出错

[xtra]

我在写一个聊天室程序，但是老是出错，而且检查也查不出什么问题。
请各位帮我看一下。
Set DataConn=Server.CreateObject("ADODB.Connection")strConn="DSN=Polling;Uid=sa;Pwd="
DataConn.Open strConn

strSql="SELECT * FROM ChatUserList WHERE Name='" & Request("Name") & "'"
Set rsUserList=DataConn.Execute(strSql)
If rsUserList.BOF Or rsUserList.EOF Then
strUserValue="'" & Request("IP") & "','" & Request("Name") & "','" & Request("D4") & "','" & Request("Password") & "'"
strInsert="INSERT INTO ChatUserList(IP,Name,Sex,Password) VALUES(" & strUserValue & ")"
DataConn.Execute strInsert '就是这一行会出错。
End If

错误信息：Microsoft OLE DB Provider for ODBC Drivers (0x80040E57)

[蝈蝈俊]

strInsert="INSERT INTO ChatUserList(IP,Name,Sex,Password) VALUES(" & strUserValue & ")"

response.write strInsert ' 看看它的sql 是否对

DataConn.Execute strInsert '就是这一行会出错。

[蝈蝈俊]

可能你的strInsert 中传的参数有问题

[xtra]

我试过Response.Write strInsert ,没有问题。在SQL Server 中的 Query Analyzer
运行也没问题。数据可以正常的加入表中去。所以说是很奇怪的。

[leslielu]

自己动手写入他的Provider
DataConn.Provider = "xxxx"
找到你用的数据库最合适的Provider.
然后指定你的
DataConn.CursorLocation = adUserClient (数字多少忘了，你要用数字）
这样的出错可能是你的DataConn的一些属性的问题。

[wzs]

何不这样写：
Set DataConn=Server.CreateObject("ADODB.Connection")
set rst =server.createobject("adodb.recordset")
dataconn.open "dsn=polling"
set rst=server.createobject("adodb.recordset")

strSql="SELECT * FROM ChatUserList WHERE Name='" & Request("Name") & "'"
rst.open strsql,2,2
If rst.BOF Or rst.EOF Then
strUserValue="'" & Request("IP") & "','" & Request("Name") & "','" & Request("D4") & "','" & Request("Password") & "'"
strInsert="INSERT INTO ChatUserList(IP,Name,Sex,Password) VALUES(" & strUserValue & ")"
rst.open strInsert,2,2
End If