这句有错,不知道怎么改啊?在线求救?急!谢谢!

[dragon385640]

dim oper
oper=Trim(request.Form("oper"))
'if session("passed")=true then
set rs=server.CreateObject("ADODB.Recordset")
set rs.activeConnection=conn
rs.CursorType=3
133: rs.open "select * from RoomInfo where RoomNum="&oper
'if rs.eof then
%>
錯誤類型：
Microsoft OLE DB Provider for ODBC Drivers (0x80040E14)
[Microsoft][ODBC SQL Server Driver][SQL Server]行 1: '=' 附近的語法不正確。
/shop/a12/UpdateRoomInfo.asp, line 133

[dragon385640]

自己先顶一下!

[starsword]

oper为空或不是数值型？

[dragon385640]

那应该怎么改啊?是不是把数据中oper 的字改成int 就可以啊??

[三仙半]

建立查询语句之前，用Clng或者Cdbl函数做一下类型转换试试

[三仙半]

也就是把SQL语句改成rs.open "select * from RoomInfo where RoomNum="&clng(oper)试试
或者把SQL语句改成rs.open "select * from RoomInfo where RoomNum="&cdbl(oper)试试

[dragon385640]

还是不行啊????
錯誤類型：
Microsoft VBScript 執行階段錯誤 (0x800A000D)
型態不符合: 'clng'
/shop/a12/UpdateRoomInfo.asp, line 135

[atubo1234]

在rs.open 前加句response.write(oper)
看下运行时oper到底是多少

[itzhiren]

dim oper
oper=request.Form("oper")
'if session("passed")=true then
set rs=server.CreateObject("ADODB.Recordset")
set rs.activeConnection=conn
rs.CursorType=3
rs.open "select * from RoomInfo where RoomNum="&oper
response.write "select * from RoomInfo where RoomNum="&oper
看看输出什么?

[dragon385640]

还是不行啊?
真的不知道怎么办才好了.