标题:[求助]留言本_初学ASP遇到的问题
只看楼主
u8u7g87
Rank: 1
等 级:新手上路
帖 子:2
专家分:0
注 册:2005-1-18
 问题点数:0 回复次数:3 
[求助]留言本_初学ASP遇到的问题

我的问题:留言本要刷新2次才可以添加留言啊,怎么回事?我自己查不到错误啊 全部代码如下: <html> <head> <meta http-equiv="Content-Type" content="text/html; charset=gb2312"> <title>留言本v1.0beta</title> </head>

<body bgcolor="99ff00"> <h2 align="center">留言本 v1.0 </h2> <form action="" method="post"> <table width="75%" border="0" align="center" cellspacing="0" bgcolor="ffcc33"> <tr> <td width="11%">姓名:</td> <td width="89%"><input name="user_name" type="text" id="user_name" maxlength="8"></td> </tr> <tr> <td>性别:</td> <td><input name="sex" type="radio" value=""> 男 <input type="radio" name="sex" value="radiobutton"> 女 </td> </tr> <tr> <td>E-mail:</td> <td><input name="email" type="text"></td> </tr> <tr> <td>留言:</td> <td><textarea name="text" cols="50" rows="5" id="text"></textarea></td> </tr> <tr> <td><input type="submit" name="Submit" value=" 提 交 "></td> <td><input type="reset" name="Submit2" value="重新填写"></td> </tr> </table> </form>

<% If Request.Form("user_name")<>""Then%> <h2 align="center">下面是您的留言</h2> <% Dim user_name,sex,email,text '定义变量 user_name=Request.Form("user_name") sex=Request.Form("sex") email=Request.Form("email") text=Request.Form("text") %> 姓名:<%=user_name%><br> 性别:<%=sex%><br> E-mail:<%=email%><br> 留言:<%=text%> <% End If %>

</body> </html> 帮帮我!~`` 刚开始学ASP。 本人QQ:963913

搜索更多相关主题的帖子: 留言本 ASP 初学 
2005-01-18 19:55
风心
Rank: 1
等 级:新手上路
帖 子:49
专家分:0
注 册:2004-8-19
得分:0 
我想应该加一条刷新的语句,刷新语句怎么写,在下不知,请教版主

2005-01-23 12:52
fly3000
Rank: 1
等 级:新手上路
帖 子:4
专家分:0
注 册:2005-1-23
得分:0 

这样写!不过你的文件名要改为index.asp <html> <head> <meta http-equiv="Content-Type" content="text/html; charset=gb2312"> <title>留言本v1.0beta</title> </head>

<body bgcolor="99ff00"> <h2 align="center">留言本 v1.0 </h2> <form action="index.asp" method="post"> <table width="75%" border="0" align="center" cellspacing="0" bgcolor="ffcc33"> <tr> <td width="11%">姓名:</td> <td width="89%"><input name="user_name" type="text" id="user_name" maxlength="8"></td> </tr> <tr> <td>性别:</td> <td><input name="sex" type="radio" value=""> 男 <input type="radio" name="sex" value="radiobutton"> 女 </td> </tr> <tr> <td>E-mail:</td> <td><input name="email" type="text"></td> </tr> <tr> <td>留言:</td> <td><textarea name="text" cols="50" rows="5" id="text"></textarea></td> </tr> <tr> <td><input type="submit" name="Submit" value=" 提 交 "></td> <td><input type="reset" name="Submit2" value="重新填写"></td> </tr> </table> </form>

<% If Request.Form("user_name")<>""Then%> <h2 align="center">下面是您的留言</h2> <% Dim user_name,sex,email,text '定义变量 user_name=Request.Form("user_name") sex=Request.Form("sex") email=Request.Form("email") text=Request.Form("text") %> 姓名:<%=user_name%><br> 性别:<%=sex%><br> E-mail:<%=email%><br> 留言:<%=text%> <% End If %>

</body> </html>

2005-01-23 15:02
tang688
Rank: 5Rank: 5
等 级:贵宾
威 望:16
帖 子:1219
专家分:35
注 册:2004-12-25
得分:0 
&lt;%if sessiom("s")=0 then%&gt;
&lt;META HTTP-EQUIV=REFRESH CONTENT="0;URL='需要刷新的文件名'"&gt;
&lt;%session("s")=1
end if%&gt;
请在这个文件之前的文件上加上:
session("s")=0

2005-01-23 21:03



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-11478-1-1.html




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

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