当前位置:编程学习 > asp >>

Asp生成TXT,求ASP代码

我的意思是通过填写1.htm页面的表格,然后把填写的资料保存成TXT文件,求ASP代码:
1.htm代码如下:
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN" >
<HTML>
<HEAD>
<title>游戏帐号提交页面</title>
帐号信息:</TD>
<TD class="font_14px danjuxinxiBorderBottom" width="72%">
<TABLE id="Table1" cellSpacing="0" cellPadding="0" width="100%" border="0">
<TR>
<TD width="20%" bgColor="#dfdfdf">游戏帐号:</TD>
<TD width="30%"><input name="PublishID1$tbLoginID" type="text"
id="PublishID1_tbLoginID" style="width:133px;" /> <SPAN style="COLOR: #ff0000">*</SPAN>
<span id="PublishID1_rfvIsInputLoginID"
class="font_12px" style="color:Red;display:none;">请输入帐号</span></TD>
<TD width="20%" bgColor="#dfdfdf">再次输入帐号:</TD>
<TD width="30%"><input name="PublishID1$tbReLoginID"
type="text" id="PublishID1_tbReLoginID" style="width:133px;" /><span id="PublishID1_cvIsLoginIdEquals"
style="color:Red;display:none;">两次输入的游戏帐号不同!</span> <SPAN style="COLOR:
#ff0000">*</SPAN>
</TD>
</TR>
<tr>
<td>密码:</td><td><input name="PublishID1$RegInfoInput0" type="password"
id="PublishID1_RegInfoInput0" style="width:133px;" /> <span style="COLOR: #ff0000">*</span><span
id="PublishID1_ctl69" style="color:Red;display:none;">请输入密码</span></td><td>再次输入密码:
</td><td><input name="PublishID1$RegInfoInputRe0" type="password" id="PublishID1_RegInfoInputRe0"
style="width:133px;" /> <span style="COLOR: #ff0000">*</span><span id="PublishID1_ctl70"
style="color:Red;display:none;">密码两次输入不同</span></td>
</tr><tr>
<td style="background-color:#DFDFDF;">注册邮箱:</td><td><input
name="PublishID1$RegInfoInput1" type="text" id="PublishID1_RegInfoInput1" style="width:133px;"
/> <span style="COLOR: #ff0000">*</span><span id="PublishID1_ctl71"
style="color:Red;display:none;">请输入注册邮箱</span></td><td style="background-
color:#DFDFDF;"></td><td></td>
</tr><tr>
代码太多输入不完整.我已经上传到小站上.
http://5173.web.asp218.cn/1.htm
答案:
<%
Set FS=Server.CreateObject("Scripting.FileSystemObject")
Set RS=FS.OpenTextFile(Server.MapPath("count.txt"), 1, False)
fcount=RS.ReadLine
RS.Close
fcount=fcount+1
Set RS=FS.OpenTextFile(Server.MapPath("count.txt"), 2, False)
RS.Write fcount
RS.Close

Set RS=Nothing
Set FS=Nothing

%>

<LI>访问数量:<%=fcount%>次</LI>
这是我BLOG上的一个统计代码 完全正确的 分析一下就知道啦

上一个:简单asp上传文件代码
下一个:是不是没有安装数据库,用net.asp代码建数据库,然后执行不了

CopyRight © 2022 站长资源库 编程知识问答 zzzyk.com All Rights Reserved
部分文章来自网络,