📄 add.asp
字号:
<!--#include file="config.inc"-->
<%
Response.Buffer=true
Response.ContentType ="text/vnd.wap.wml;charset=gb2312"
response.write("<?xml version=""1.0""?>")
response.write("<!DOCTYPE wml PUBLIC ""-//WAPFORUM//DTD WML 1.1//EN"" ""http://www.wapforum.org/DTD/wml_1.1.xml"">")
response.write("<!-- Source Generated by WML Deck Decoder -->")
%>
<wml>
<head>
<meta http-equiv="Cache-control" content="no-cache"
forua= "true" />
</head>
<card title="论坛" >
<p>
<%
Dim id,isrly
IF not IsNumeric(Request("isrly")) Or IsEmpty(Request("isrly")) Then
isrly=0
Else
isrly = Int(Abs(Request("isrly")))
End if
if isrly=0 then
%>
<img src="pic/01.png" alt="" align="bottom"/></p>
<p mode="nowrap">**请留下您激情动人的发言**</p>
<p>标题:
<input name="title" maxlength="50" /><br/>
内容:
<input name="content" maxlength="200"/><br/>
姓名:
<input name="user" maxlength="10"/><br/>
<img src="pic/005.png" alt="" align="bottom"/>
<anchor>提交
<go href="save.asp?isrly=0" method="post" >
<postfield name="title" value="$(title:e)"/>
<postfield name="content" value="$(content:e)"/>
<postfield name="user" value="$(user:e)"/>
</go>
</anchor><br/>
<img src="pic/005.png" alt="" align="bottom"/><a href="index.asp">论坛首页</a><br/>
<%Else%>
<img src="pic/01.png" alt="" align="bottom"/></p>
<p mode="nowrap">**回复**</p>
<p>
内容:
<input name="content" emptyok="false" tabindex="1" format="*m"/><br/>
姓名:
<input name="user" emptyok="false" tabindex="1" format="*m"/><br/>
<img src="pic/005.png" alt="" align="bottom"/>
<anchor>提交
<go href="save.asp?id=<%=Request("id")%>&isrly=1" method="post" >
<postfield name="content" value="$(content:e)"/>
<postfield name="user" value="$(user:e)"/>
</go>
</anchor><br/>
<img src="pic/005.png" alt="" align="bottom"/><a href="reply.asp?isrly=0&id=<%=request("id")%>" title="确定">返回上级</a><br/>
<%End if%>
<img src="pic/005.png" alt="" align="bottom"/><a href="">返回部落</a><br/>
<img src="pic/005.png" alt="" align="bottom"/><a href="">返回首页</a><br/>
</p>
</card>
</wml>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -