我试图整天解决这个问题,但是它似乎对我不起作用。我想执行一条命令并将结果返回到记录集。
问题是两件事之一:我得到的响应是空的,或者我的代码有问题。我知道该命令应该从数据库中获取几行。我response.write
在循环中添加了内容,但从未打印过。
这是代码:
Set conn = Server.CreateObject("ADODB.Connection")
conn.open "PROVIDER=SQLOLEDB;DATA SOURCE=X;DATABASE=Y;UID=Z;PWD=W;"
Set objCommandSec = CreateObject("ADODB.Command")
With objCommandSec
Set .ActiveConnection = Conn
.CommandType = 4
.CommandText = "usp_Targets_DataEntry_Display"
.Parameters.Append .CreateParameter("@userinumber ", 200, 1, 10, inumber)
.Parameters.Append .CreateParameter("@group ", 200, 1, 50, "ISM")
.Parameters.Append .CreateParameter("@groupvalue", 200, 1, 50, ismID)
.Parameters.Append .CreateParameter("@targettypeparam ", 200, 1, 50, targetType)
End With
set rs = Server.CreateObject("ADODB.RecordSet")
rs = objCommandSec.Execute
while not rs.eof
response.write (1)
response.write (rs("1_Q1"))
rs.MoveNext
wend
response.write (2)
编辑修改代码后,按照@Joel Coehoorn的回答,解决方案是:
set rs = Server.CreateObject("ADODB.RecordSet")
rs.oppen objCommandSec
代替...
set rs = Server.CreateObject("ADODB.RecordSet")
rs = objCommandSec.Execute
看了几分钟,距离我使用经典的asp已经很长时间了,但是我确实看到了三件事:
Open
打电话之前需要连接objCommandSec.Execute
吗?本文收集自互联网,转载请注明来源。
如有侵权,请联系[email protected] 删除。
我来说两句