|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
asp可以轻松地实现对页面内容的动态控制,根据不同的浏览者,显示不同的页面内容。而浏览者一点觉察不出来,就像为他专门制作的页面一样。使用各种各样的组件,asp可以完成无比强大的功能。排序程序称号:revert.asp
程序功效:复兴表单
<!--#includefile="lybcon.inc"-->
<%
pageno=request("pageno")
keyid=request("keyid")
posttype=request("type")
ifposttype="revert"then
setguestconn=Server.CreateObject("ADODB.connection")
guestconn.Openlybstr
setguestrs=server.createobject("ADODB.recordset")
sqlstr="SELECT*FROMguestbookwherelybid="&keyid
guestrs.opensqlstr,guestconn,1,1
ifguestrs.eofthenresponse.redirect"index.asp"
endif
%>
<html>
<head><title>软件利用留言薄复兴</title>
<styleTYPE="text/CSS">
<!--
a{text-decoration:none}
a:hover{color:#FF0000}
.submit{line-height:9pt;font-size:9pt;font-family:宋体}
td{font-family:宋体;font-size:9pt;background-color:ECF7FF}
.td1{font-family:宋体;font-size:9pt;background-color:A2C8F2}
.td2{font-family:宋体;font-size:9pt;background-color:E9EDE0}
.small1{font-family:宋体;font-size:9pt;background-color:ffffff;line-height:9pt}
-->
</style>
</head>
<bodytopmargin=16>
<formname=revertmethod=POSTaction=savelyb.asp>
<inputtype=hiddenname=posttypevalue=<%=posttype%>>
<inputtype=hiddenname=pagenovalue=<%=pageno%>>
<tablewidth=100%align=center>
<%ifposttype="revert"then%>
<inputtype=hiddenname=keyidvalue=<%=guestrs("lybid")%>>
<trstyle="color:red">
<tdalign=centerclass=td1width=70%>留言题目</td>
<tdalign=centerwidth=70class=td1><imgsrc=http://www.163design.net/a/q/edit.gif>作者</td>
<tdalign=centerwidth=100class=td1>宣布工夫</td>
<tdalign=centerwidth=60class=td1nowrap>贴子字数</td>
<tdalign=centerwidth=60class=td1nowrap>贴子序号</td>
</tr>
<tr>
<tdstyle="color:red"align=centerwidth=80%><%=guestrs("guestitle")%></td>
<tdalign=rightwidth=70nowrap><%=guestrs("guestname")%></td>
<tdwidth=100nowrap><%=guestrs("putdate")&""&guestrs("puttime")%></td>
<tdalign=rightwidth=60nowrap><%=len(guestrs("guestcomm"))%></td>
<tdalign=rightwidth=60nowrap><%=guestrs("lybid")%></td>
</tr>
<tr><tdcolspan=5style="background-color:f3F7FF"height=50valign=top><%=guestrs("guestcomm")%><palign=right>[From:<%=guestrs("fromip")%>]</p></td></tr>
<%endif%>
<tr><td></td><tdwidth=70></td><tdwidth=100></td><tdwidth=60></td><tdwidth=60></td></tr>
<tr><tdheight=16colspan=5style="background-color:ffffff"></td></tr>
<tr><td>留言题目:<inputtype=textname=guestitlesize=36maxlength=100class=small1></td>
<tdcolspan=4><inputtype=checkboxname=emailflag>有复兴请关照我</td></tr>
<tr>
<td>网上昵名:<inputtype=textname=guestnamesize=36maxlength=20class=small1></td>
<tdcolspan=4>邮箱地点:<inputtype=textname=guestemailsize=25maxlength=50class=small1></td>
</tr>
<tr><tdcolspan=5valign=topstyle="background-color:f3F7FF">留言内容:<textareacols=80rows=6class=small1name=guestcomm></textarea></td></tr>
<tr><tdcolspan=5align=center><ahref="javascript:document.revert.submit();">发送留言</a><ahref=index.asp?pageno=<%=pageno%>>保持留言</a></td></tr>
</table>
</form>
</body>
</html>
<%
ifposttype="revert"then
guestrs.close
setguestrs=nothing
guestconn.close
&nbs</p>ASP一般认为只能运行在IIS上,正如前面所提到的,这并不是十分正确,事实上,ASP也能运行在Apache上。ApacheASP可在任意Apache服务器上运行有限的ASP功能,所需做的,只需打开mod_perl。 |
|