本人做了一个论坛.有点小问题.
<% @language="vbscript"%>
<!-- #include file="dbase.asp"-->
<!-- #include file="function.asp"-->
<%
cookie_arr=splitcookie(request.cookies("cookie"))
for i=0 to ubound(cookie_arr)
select case cookie_arr(i)
case "userid"
c_member_no=cookie_arr(i+1)
case "pwd"
c_member_password=cookie_arr(i+1)
end select
next
if c_member_no="" then
response.redirect "login.asp"
end if
c_member_no=session("c_member_no")
message_no=request("c_message_no")
c_message_title=request("c_message_title")
c_message_content=request("c_message_content")
if message_no="" then message_no=0
response.write message_no ??????????(1)
if request("submit")="发送帖子" and request("c_message_content")<>"" then
set rstt=server.createobject("adodb.recordset")
rstt.open "t_message",conn,3,2
rstt.addnew
rstt("c_member_no")=c_member_no
rstt("c_message_restoreno")=message_no
rstt("c_message_title")=c_message_title
rstt("c_message_content")=c_message_content
rstt.update
rstt.close response.write message_no ???????????(2)
if message_no<>0 then
conn.execute("update t_message set t_message.c_message_number=t_message.c_message_number+1 where t_message.c_message_no='"&request("message_no")&"'")
response.redirect"forumview.asp"
response.end
end if
response.redirect "forumlist.asp"
response.end
end if
第一个?????(1)输出正确,可是第二个地方???????(2)却是空,哪位能告诉我是哪出错了吗?
<% @language="vbscript"%>
<!-- #include file="dbase.asp"-->
<!-- #include file="function.asp"-->
<%
cookie_arr=splitcookie(request.cookies("cookie"))
for i=0 to ubound(cookie_arr)
select case cookie_arr(i)
case "userid"
c_member_no=cookie_arr(i+1)
case "pwd"
c_member_password=cookie_arr(i+1)
end select
next
if c_member_no="" then
response.redirect "login.asp"
end if
c_member_no=session("c_member_no")
message_no=request("c_message_no")
c_message_title=request("c_message_title")
c_message_content=request("c_message_content")
if message_no="" then message_no=0
response.write message_no ??????????(1)
if request("submit")="发送帖子" and request("c_message_content")<>"" then
set rstt=server.createobject("adodb.recordset")
rstt.open "t_message",conn,3,2
rstt.addnew
rstt("c_member_no")=c_member_no
rstt("c_message_restoreno")=message_no
rstt("c_message_title")=c_message_title
rstt("c_message_content")=c_message_content
rstt.update
rstt.close response.write message_no ???????????(2)
if message_no<>0 then
conn.execute("update t_message set t_message.c_message_number=t_message.c_message_number+1 where t_message.c_message_no='"&request("message_no")&"'")
response.redirect"forumview.asp"
response.end
end if
response.redirect "forumlist.asp"
response.end
end if
第一个?????(1)输出正确,可是第二个地方???????(2)却是空,哪位能告诉我是哪出错了吗?
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货