Sub不能使用变量查询数据库

来源:百度知道 编辑:UC知道 时间:2024/05/22 08:27:23
Sub CsSub()
uddre="梦幻西游"
If Types=1 Then
Set hotspotrs=server.createobject("adodb.recordset")
hotspotsql="select Class from LM_Class Where Class="&uddre&""
hotspotrs.open hotspotsql,conn,1,1
Response.Write hotspotrs("class")
End if
End Sub
代码在上面,为什么在Sub里不能使用变量进行查询?
但是我是要从表A里取得一个字段,然后赋予给一个变量,在查询表B里相同的数据,怎么办

在解释执行的时候,你的意思是把uddre用实际的值来替换,但是这有问题,VB不允许这样做,你直接使用字符串就可以了。把他换成“梦幻西游”就好了

把select后的&""删了,这个不用

Sub CsSub()
uddre="梦幻西游"
If Types=1 Then
Set hotspotrs=server.createobject("adodb.recordset")
hotspotsql="select Class from LM_Class Where Class="&uddre&""
hotspotrs.open hotspotsql,conn,1,1
Response.Write hotspotrs("class")
End if
End Sub

你输入的时候 要么就输入查 ’梦幻西游’

Sub CsSub()
uddre=rs("uddre")
If Types=1 Then
Set hotspotrs=server.createobject("adodb.recordset")
hotspotsql="select Class from LM_Class Where Class="&uddre&""
hotspotrs.open hotspotsql,conn,1,1
Response.Write hotspotrs("class")
End if
End Sub