 |
|
|
 首页 |
名片设计 CorelDRAW Illustrator AuotoCAD Painter 其他软件 Photoshop Fireworks Flash |
|
程序名称：revert.asp 程序功能：回复表单 <!-- #include file="lybcon.inc" --> <% pageno=request("pageno") keyid=request("keyid") posttype=request("type") if posttype="revert" then set guestconn=Server.CreateObject("ADODB.connection") guestconn.Open lybstr set guestrs=server.createobject("ADODB.recordset") sqlstr="SELECT * FROM guestbook where lybid="&keyid guestrs.open sqlstr,guestconn,1,1 if guestrs.eof then response.redirect "index.asp" end if %> <html> <head><title>软件使用留言薄回复</title> <style TYPE="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> <body topmargin=16> <form name=\\'revert\\' method=\\'POST\\' action=\\'savelyb.asp\\'> <input type=hidden name=posttype value=\\'<% =posttype %>\\'> <input type=hidden name=pageno value=<% =pageno %>> <table width=100% align=center> <% if posttype="revert" then %> <input type=hidden name=keyid value=<% =guestrs("lybid") %>> <tr style="color:red"> <td align=center class=\\'td1\\' width=70%>留言标题</td> <td align=center width=70 class=\\'td1\\'><img src=\\'edit.gif\\'>作 者</td> <td align=center width=100 class=\\'td1\\'>发表时间</td> <td align=center width=60 class=\\'td1\\' nowrap>贴子字数</td> <td align=center width=60 class=\\'td1\\' nowrap>贴子序号</td> </tr> <tr> <td style="color:red" align=center width=80%><% =guestrs("guestitle") %></td> <td align=right width=70 nowrap><% =guestrs("guestname") %> </td> <td width=100 nowrap><% =guestrs("putdate")&" "&guestrs("puttime") %></td> <td align=right width=60 nowrap><% =len(guestrs("guestcomm")) %> </td> <td align=right width=60 nowrap><% =guestrs("lybid") %> </td> </tr> <tr><td colspan=5 style="background-color:f3F7FF" height=50 valign=top><% =guestrs("guestcomm") %><p align=right>[From:<% =guestrs("fromip") %>] </p></td></tr> <% end if %> <tr><td></td><td width=70></td><td width=100></td><td width=60></td><td width=60></td></tr> <tr><td height=16 colspan=5 style="background-color:ffffff"></td></tr> <tr><td> 留言标题：<input type=\\'text\\' name=\\'guestitle\\' size=\\'36\\' maxlength=\\'100\\' class=\\'small1\\'></td> <td colspan=4> <input type=\\'checkbox\\' name=\\'emailflag\\'>有回复请通知我</td></tr> <tr> <td> 网上昵名：<input type=\\'text\\' name=\\'guestname\\' size=36 maxlength=20 class=\\'small1\\'></td> <td colspan=4> 邮箱地址：<input type=\\'text\\' name=\\'guestemail\\' size=25 maxlength=50 class=\\'small1\\'></td> </tr> <tr><td colspan=5 valign=top style="background-color:f3F7FF"> 留言内容：<textarea cols=80 rows=6 class=\\'small1\\' name=\\'guestcomm\\'></textarea></td></tr> <tr><td colspan=5 align=center><a href="javascript:document.revert.submit();"> 发送留言 </a> <a href=\\'index.asp?pageno=<% =pageno %>\\'> 放弃留言 </a></td></tr> </table> </form> </body> </html> <% if posttype="revert" then guestrs.close set guestrs=nothing guestconn.close set guestconn=nothing end if %> 返回类别: 教程 上一教程: 利用ASP.NET来访问Excel文档 下一教程: 如何使聊天室发言时屏幕不闪？ 您可以阅读与"用排序串字段实现树状结构（例程??回复表单）"相关的教程: · 用排序串字段实现树状结构(例程??回复表单) · 用排序串字段实现树状结构(例程??删除贴子) · 用排序串字段实现树状结构（例程??删除贴子） · 用排序串字段实现树状结构（例程??保存贴子内容） · 用排序串字段实现树状结构(例程??保存贴子内容) |
  |
| 快精灵印艺坊 版权所有 |
首页 会员中心在线印刷在线编辑付款方式索取样品设计指南连锁门店
|
||
