国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁 > 學院 > 開發設計 > 正文

用排序串字段實現樹狀結構（例程——回復表單）

2019-11-18 22:29:56
字體：大 中 小
來源：轉載
供稿：網友
程序名稱：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
%>

發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
主站蜘蛛池模板： 德清县| 化隆| 高雄市| 铁力市| 易门县| 广宁县| 常德市| 出国| 开原市| 文昌市| 杂多县| 灵丘县| 红安县| 乡城县| 仁布县| 铁岭县| 五莲县| 二连浩特市| 九龙坡区| 北海市| 靖安县| 冀州市| 永靖县| 兴和县| 彭州市| 聂拉木县| 健康| 慈利县| 丰城市| 伊川县| 昭通市| 行唐县| 米脂县| 南投市| 舒城县| 彭阳县| 交口县| 城固县| 依兰县| 周宁县| 商城县|