NetBookRe.asp
Upload User: ahxunteng
Upload Date: 2022-05-16
Package Size: 1606k
Code Size: 3k
Development Platform:

VBScript

  1. <!--#include file="Include/System.asp"-->
  2. <%If Session("UserName")="" Then
  3. response.redirect"Server.asp"
  4. end if
  5. name=request.querystring("name")
  6. id=request.querystring("id")
  7. Set rs = Server.CreateObject("ADODB.Recordset")
  8. rs.Open "Select * from Book where id="&id, conn,3,3
  9. if rs("name")<>name then
  10. response.redirect "NetBook.asp"
  11. end if
  12. %>
  13. <html>
  14. <head>
  15. <title>∷<%=BsCompanyName%>∷</title>
  16. <meta http-equiv="Content-Type" content="text/html; charset=gb2312">
  17. <meta name="Author" content="haoxiao">
  18. <meta name="Contact" content="haoxiao@21cn.com">
  19. <meta name="Copyright" content="BOSSI">
  20. <meta name="Keywords" content="博識网络,BOSSI 公司(企业)网站管理系统">
  21. <meta name="Description" content="博識网络,BOSSI 公司(企业)网站管理系统">
  22. <link href="../Inc/Css.css" rel="stylesheet" type="text/css">
  23. <body bgcolor="#D9D9D9" leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
  24. <br>
  25. <TABLE width=90% height="400" align="center" cellPadding=4 cellSpacing=1 bgColor=#666666>
  26. <TR vAlign=top bgColor=#eeeeee> 
  27. <TD  width="100%" height="1" bgcolor="#999999"> 
  28. <%if rs("name")="管理员" then%>
  29. <font color="#FFFFFF">『公告标题』:</font> 
  30. <%else%>
  31. <font color="#FFFFFF">『您的留言标题』:</font> 
  32. <%end if%><font color="#006699"><%=rs("title")%></font>
  33. </TD>
  34. </TR>
  35. <TR vAlign=top bgColor=#eeeeee> 
  36. <TD  width="100%" height="366"> 
  37. <%if rs("name")="管理员" then%>
  38. 网站公告: 
  39. <%else%>
  40. 您的留言内容: 
  41. <%end if%>
  42. <div align="center"> 
  43. <center>
  44. <table border="0" width="98%" cellpadding="2">
  45. <tr> 
  46. <td width="100%"> <%=rs("content")%> </td>
  47. </tr>
  48. </table>
  49. </center>
  50. <p align="right">(时间:<%=rs("time")%>) </div>
  51. <div align="center"> 
  52. <center>
  53. <table border="0" width="98%" cellpadding="2">
  54. <tr> 
  55. <td width="100%">&nbsp; 
  56. <%If rs("rebook")<>"" then%>
  57. <hr size="1"> <p style="word-spacing: 0; margin-top: 0; margin-bottom: 0"><b>给您的回复</b></p>
  58. <p style="word-spacing: 0; margin-top: 0; margin-bottom: 0"> </p>
  59. <p style="word-spacing: 0; margin-top: 0; margin-bottom: 0"><font color="#FF0000"><b><%=Session("UserName")%> 您好:</b></font></p>
  60. <p style="word-spacing: 0; margin-top: 0; margin-bottom: 0"><font color="#FF0000">&nbsp;&nbsp;&nbsp; 
  61. <%=rs("rebook")%> 
  62. <%else if rs("name")<>"管理员" Then%>
  63. 我们的工作人员还未回复您的留言,请耐心等待! 
  64. <%end if%>
  65. <%End If%>
  66. &nbsp;</font></p></td>
  67. </tr>
  68. </table>
  69. </center>
  70. </div>
  71. </TD>
  72. </TR>
  73. <TR bgColor=#eeeeee> 
  74. <TD  width="530" height="26" bgcolor="#999999"><div align="center"
  75. ><input type="button" value="关闭" name="B5" onclick="window.close();" style="font-size: 9pt"></div></TD>
  76. </TR>
  77. </TABLE>
  78. </body>
  79. </html>
  80. <%
  81. rs.close
  82. set rs=nothing
  83. call CloseConn()
  84. %>