| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1415 人关注过本帖
标题:ASP传值问题(全代码)
只看楼主 加入收藏
sydpoechang
Rank: 1
等 级:新手上路
帖 子:115
专家分:0
注 册:2007-8-22
收藏
 问题点数:0 回复次数:9 
ASP传值问题(全代码)
showjsv.asp(内容页 从index.asp传值过来的)
<%
  pic_id=Request.Querystring("pic_id")
  If pic_id ="" then
    Response.Write("<script language=javascript>alert('·?·¨·???');window.location.href='index.asp'</script>")
  end if
  if instr(pic_id,"'") or instr(pic_id,"select") or instr(pic_id,"in") or instr(pic_id,"from") or instr(pic_id,"len") or instr(pic_id,"where") or instr(pic_id,"or") or instr(pic_id,"and") then
    Response.Write("<script language=javascript>alert('????×?????');window.location.href='index.asp'</script>")
Response.End
  end if
  conn.execute("update pic set pic_count=pic_count+1 where pic_id="&pic_id)
  sql1="select * from pic where pic_id="&pic_id
  set rs1=server.createobject("adodb.recordset")
  rs1.open sql1,conn,1,1
  if rs1.eof then
  Response.Write("??????????????±à??????????????")
  Response.end
  end if
  %>      //传值程序结束
<table width="98%" border="0" align="center" cellpadding="0" cellspacing="0" style="border: 1px solid #B7B7B7">
    <tr>
                    <td bgcolor="D9D9D9" height="20"> <strong>谈谈你的想法:</strong></td>
  </tr>
                  <tr>
                    <td><table width="95%" border="0" align="center" cellpadding="0" cellspacing="0">
                      <tr>
                        <td height="5"></td>
                      </tr><form id="form1" name="form1" method="post" action="lysave.asp">
                      <tr>
                        <td>昵称:<input type="text" name="name1">
                             认证码:<input name="s" type="text" size="10"> <b><%=s%></b>
              <input maxlength=20 name="s2" size=12 type=hidden value="<%=s%>"></td>
                      </tr>
                      <tr>
                        <td height="5"></td>
                      </tr>
                      <tr>
                        <td><textarea name="connect" cols="100" rows="5"></textarea></td>
                      </tr>
                      <tr>
                        <td height="5"></td>
                      </tr>
                      <tr>
                        <td><div align="right">
                          <input type="submit" name="tj" value="提交">
        <input type="hidden" name="pic_id" value="<%=request.querystring("pic_id")%>">
                        </div></td>
                      </tr></form>
       <tr>
                        <td height="5"></td>
                      </tr>
                    </table></td>
                  </tr>
</table>    //评论表单结束

lysave.asp(评论表单的程序页)
<%
s=Trim(Request.Form("s"))
s2=Request.Form("s2")
If s2<>s Then
Response.Write("<script language=javascript>alert('请输入正确的认证码!');history.back()</script>")
Response.End
end if
if request("name1")="" then
response.write "<script language='javascript'>alert('昵称不能为空');history.back();</script>"
response.end
end if
if request("connect")="" then
response.write "<script language='javascript'>alert('内容不能为空');history.back();</script>"
response.end
end if
set rs=server.CreateObject("adodb.recordset")
rs.open "select * from [ly]",conn,1,3
rs.addnew
rs("id")=request.Form("pic_id")
rs("connect")=Request.Form("connect")
rs("name1")=trim(request("name1"))
rs("date")=date()
rs.update
rs.close
set rs=nothing
response.write("<script>window.location='showjsv.asp?pic_id="&pic_id&"'</script>")
%>

代码所实现的功能是在某网站一篇文章里面 发表评论.现在能发表评论 但是无法传值回到showjsv.asp(及本身页面) 求高手指点

小弟初学ASP 对传值不太熟悉 不知道贴这些代码对小弟有没有什么帮助 如果有心帮忙又有不太明白的地方可以加QQ274305167 明天小弟全天在线等
搜索更多相关主题的帖子: pic 传值 instr ASP 
2007-12-02 00:56
madpbpl
Rank: 4
等 级:贵宾
威 望:11
帖 子:2876
专家分:244
注 册:2007-4-5
收藏
得分:0 
response.write("<script>window.location='showjsv.asp?pic_id="&pic_id&"'</script>")
改成
response.write("<script language='javascript'>window.location.href='showjsv.asp?pic_id="&pic_id&"'</script>")
试试
2007-12-02 03:22
sydpoechang
Rank: 1
等 级:新手上路
帖 子:115
专家分:0
注 册:2007-8-22
收藏
得分:0 
回2楼的朋友
还是不行 还是没传起值得
2007-12-02 09:45
sydpoechang
Rank: 1
等 级:新手上路
帖 子:115
专家分:0
注 册:2007-8-22
收藏
得分:0 
不能沉呀
2007-12-02 12:29
heavenlc
Rank: 1
等 级:新手上路
帖 子:4
专家分:0
注 册:2007-12-2
收藏
得分:0 
Response.Redirect "showjsv.asp?pic_id="&pic_id&""

你试试把最后一句改成这样
2007-12-02 23:54
heavenlc
Rank: 1
等 级:新手上路
帖 子:4
专家分:0
注 册:2007-12-2
收藏
得分:0 
response.write("<script>window.location='showjsv.asp?pic_id="&pic_id&"'</script>")
就是这句,改成上面的样式
2007-12-02 23:56
madpbpl
Rank: 4
等 级:贵宾
威 望:11
帖 子:2876
专家分:244
注 册:2007-4-5
收藏
得分:0 
原帖由 [bold][underline]sydpoechang[/underline][/bold] 于 2007-12-2 09:45 发表 [url=http://bbs.][/url]
回2楼的朋友
还是不行 还是没传起值得

改成以下试试
pic_id=Request("pic_id")
response.write("<script language='javascript'>window.location.href='showjsv.asp?pic_id="&pic_id&"'</script>")
2007-12-03 02:38
sydpoechang
Rank: 1
等 级:新手上路
帖 子:115
专家分:0
注 册:2007-8-22
收藏
得分:0 
回5楼的朋友 最开始我就是用你那种方法 不行
回6楼的朋友 还是不行
2007-12-04 10:58
sydpoechang
Rank: 1
等 级:新手上路
帖 子:115
专家分:0
注 册:2007-8-22
收藏
得分:0 
OK 问题解决 感谢你们 是我疏忽了一点 6楼的朋友是对的
2007-12-04 11:19
zmhdxy
Rank: 1
等 级:新手上路
帖 子:452
专家分:0
注 册:2007-9-27
收藏
得分:0 
还没见过这样的
response.write("<script>window.location='showjsv.asp?pic_id="&pic_id&"'</script>")
这个还是可以的
Response.Redirect "showjsv.asp?pic_id="&pic_id&""

2007-12-04 21:45
快速回复:ASP传值问题(全代码)
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.018661 second(s), 9 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved