追加悬赏asp错误怎样改?

来源:百度知道 编辑:UC知道 时间:2024/05/07 20:04:51
根据需要,我已经建立了名为type的数据表,但运行起来还是出错。
出错部分的代码是:<%

Set conn = Server.CreateObject("ADODB.Connection")
conn.open "DSN=vod;UID=sa;PWD=sa;DATABASE=dbmusic"

sql="select * from type"

rs.open sql,conn,1,1
do while not rs.eof
sel="selected"
response.write "<option " & sel & " value='"&rs("type")&"'>"+rs("type")+"</option>"+chr(13)+chr(10)
rs.movenext
loop
rs.close
%>
错误提示是:Microsoft VBScript 运行时错误 (0x800A01A8)
缺少对象: ''

你的RS是那里来的?

response.write "<option " & sel & " value='"&rs("type")&"'>"+rs("type")+"</option>"+chr(13)+chr(10)
修改:
response.write "<option <%=sel%> value=<%=rs("type")%>><%=rs("type")%></option>"

ZHRX 你的服务器能够执行response.write "<option <%=sel%> value=<%=rs("type")%>><%=rs("type")%></option>" 这样的语句吗?呵呵。

错误提示是:Microsoft VBScript 运行时错误 (0x800A01A8)
缺少对象: ''
应该是henry_yu 所说的,你没有定义rs