📄 submitstory.asp
字号:
<%
buffer=true
%>
<HTML>
<head>
<title>编个小小故事</title>
</head>
<BODY BGColor="#AAFFBB">
<FORM Action="" Method="POST">
<TABLE Border=0>
<TR>
<TD>姓名：
<TD><Input Type="Text" Size="20" Name="Name">
<TD>Email：
<TD><Input Type="Text" Size="36" Name="Email">
</TR>
<TR>
<TD>标题：
<TD colspan="3"><Input Type="Text" Size="67" Name="Title">
</TR>
<TR Valign=Top>
<TD>小故事：
<TD colspan="3"><Textarea Name="Story" Rows="8" Cols="66">
</Textarea>
</TR>
</TABLE>
<center>
<INPUT Type=Submit Value=" 提 交 ">
</FORM>
<p align="right">
<a href="story.htm">返回</a>
</p>
</BODY>
</HTML>
<%
Story = request("Story")
Name = request("name")
Email = request("Email")
title = request("Title")
if Story<>"" and Name<>"" and Email<>"" And Title<>"" then
SET myfs=server.createobject("scripting.filesystemobject")
set mytf=myfs.opentextfile("e:\Story.txt",8,True)
mytf.writeline("标题:"&Title)
mytf.writeline("姓名:"&name)
mytf.writeline("Email:"&Email)
mytf.writeline(story)
mytf.writeline("<hr>")
mytf.close
end if
%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -