菜鸟问，这个代码哪里有问题？

[spider_bug]

<!--#include file="WoLib/WoWoConn.asp"-->
<%
dim rs
set rs = server.createobject("Adodb.recordset")
sql = "select src_desc from wowo_source where src_id = 45032 "
rs.open sql,conn,1,3


Re_Desc = Rs("Re_Content")
response.write re_desc

%>


上面的wowoconn.asp先假定是正确的

[hookee]

select 里没Re_Content呀

<%
dim rs, Re_Desc, sql
set rs = server.createobject("Adodb.recordset") 
sql = "select src_desc, Re_Content from wowo_source where src_id = 45032"
rs.cursorLocation = 3 
rs.open sql,conn,1,1 
If Not (rs.EOF And rs.BOF) Then
  Re_Desc = Rs("Re_Content").Value 
  response.write re_desc
End If
rs.close
conn.close
%>

[Jey]

sql = "select src_desc from wowo_source where src_id = 45032 "

你只查询了 src_desc 一个字段

并没有Re_Content字段啊

[aemyang1987]

[Quote=引用 1 楼 hookee 的回复:]
select 里没Re_Content呀
VBScript code<%dim rs, Re_Desc, sqlset rs= server.createobject("Adodb.recordset")
sql="select src_desc, Re_Content from wowo_source where src_id = 45032"
rs.cursorLocation=3
rs.open sql,conn,1,1IfNot (rs.EOFAnd rs.BOF)Then
Re_Desc= Rs("Re_Content").Value
response.write re_descEndIf
rs.close
conn.close
%>
[/Quote]
顶

[keyescgm]

[Quote=引用 1 楼 hookee 的回复:]
select 里没Re_Content呀
VBScript code<%dim rs, Re_Desc, sqlset rs= server.createobject("Adodb.recordset")
sql="select src_desc, Re_Content from wowo_source where src_id = 45032"
rs.cursorLocation=3
rs.open sql,conn,1,1IfNot (rs.EOFAnd rs.BOF)Then
Re_Desc= Rs("Re_Content").Value
response.write re_descEndIf
rs.close
conn.close
%>
[/Quote]

完全同意

[Y_Leopard]

[Quote=引用 4 楼 keyescgm 的回复:]
引用 1 楼 hookee 的回复:
select 里没Re_Content呀
VBScript code <%dim rs, Re_Desc, sqlset rs= server.createobject("Adodb.recordset")
sql="select src_desc, Re_Content from wowo_source where src_id = 45032"
rs.cursorLocation=3
rs.open sql,conn,1,1IfNot (rs.EOFAnd rs.BOF)Then
  Re_Desc= Rs("Re_Content").Value
  response.write re_descEndIf
rs.close
conn.close
%>


    [/Quote]完全同意