UC知道再问：asp程序中为何不能将变量赋值给字段？
来源：百度知道 编辑：UC知道 时间：2024/04/25 14:01:40
按刚才的方法修改了源程序，但还是不能更新bbsid字段，以下是源码：
<!--#include file="./mycartconn/conn.asp" -->
<%set s = Server.CreateObject("shuziren_com.yz")
dim qq
set rs = conn.execute("select top 20 id,bq,bbsid,nn from bbs ")
rs.open sql,0,2,4
do while not rs.eof
if rs("bq")=0 then
qq=rs("id")
end if
if rs("bq")=1 then
rs("bbsid")=qq
rs.update
response.write qq
end if
response.write rs("bbsid")
response.write "<br>"
rs.movenext
loop
rs.close
set rs=nothing
%>
<!--#include file="./mycartconn/conn.asp" -->
<%set s = Server.CreateObject("shuziren_com.yz")
dim qq
set rs = conn.execute("select top 20 id,bq,bbsid,nn from bbs ")
rs.open sql,0,2,4
do while not rs.eof
if rs("bq")=0 then
qq=rs("id")
end if
if rs("bq")=1 then
rs("bbsid")=qq
rs.update
response.write qq
end if
response.write rs("bbsid")
response.write "<br>"
rs.movenext
loop
rs.close
set rs=nothing
%>
rs.open sql,0,2,4 这是什么东东，倒，OPEN常用的只有1，1或者1，3而已外，11是读，13是改，这24？？哈哈，吊了，这里面语句哎，。。。。。。，我帮你改下吧，我没测试，你自己测试一下好了
<%set rs=server.createobject("ADODB.CONNECTION")
dim qq
set rs = conn.execute("select top 20 id,bq,bbsid,nn from bbs oeder by id desc")
rs.open sql,1,3
if rs.eof and rs.bof then
response.write "无数据。"
response.end
else
do while not rs.eof
if rs("bq")=0 then
qq=rs("id")
end if
if rs("bq")=1 then
rs("bbsid")=qq
rs.update
response.write qq
end if
response.write rs("bbsid")
response.write "<br>"
rs.movenext
loop
rs.close
end if
set rs=nothing
%>
还有你这个我觉的用一个UPDATE语句不就可以了嘛，干嘛还要先查询再更新啊，麻烦，代码也多了，我那写的因为看不到你源程序，也不在的你是什么数据，不过一些最基本的东西你都弄错了，真是郁闷！！！