/admin/pf_yyhd.asp

https://github.com/hare1987/kaidun180 · ASP · 116 lines · 91 code · 5 blank · 20 comment · 0 complexity · 1dcd2bf134cefe18a4a6bcd271b740cf MD5 · raw file 

    

  1. <%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>

    2. 

  2. <!--#include file="pf_conn.asp"-->

    3. 

  3. <!--#include file="pf_function.asp"-->

    4. 

  4. <!--#include file="pf_session.asp"-->

    5. 

  5. <%

    6. 

  6. If request.Form("submit") = "È·ÈÏÌí¼Ó" Then

    7. 

  7.     If request.Form("pf_link_name") = "" Then

    8. 

  8.         Call infoback("Ô¤Ô¼»î¶¯²»ÄÜΪ¿Õ£¡")

    9. 

  9.     End If

    10. 

  10.     'If request.Form("pf_link_text") = "" Then

    11. 

  11.         'Call infoback("¼òҪ˵Ã÷²»ÄÜΪ¿Õ£¡")

    12. 

  12.     'End If

    13. 

  13. 	'If request.Form("content2") = "" Then

    14. 

  14.         'Call infoback("ÄÚÈݲ»ÄÜΪ¿Õ£¡")

    15. 

  15.     'End If

    16. 

  16.     'If request.Form("pf_link_url") = "" Then

    17. 

  17.         'Call infoback("Á´½ÓµØÖ·²»ÄÜΪ¿Õ£¡")

    18. 

  18.     'End If

    19. 

  19.     'If request.Form("pf_link_order") = "" Or Not IsNumeric(request.Form("pf_link_order")) Then

    20. 

  20.         'Call infoback("ÅÅÐòÊý×Ö²»ÄÜΪ¿Õ£¡¶øÇÒ±ØÐëΪÊý×Ö£¡")

    21. 

  21.     'End If

    22. 

  22.     Set rs = server.CreateObject("adodb.recordset")

    23. 

  23.     sql = "select * from pf_hdyy"

    24. 

  24.     rs.Open sql, conn, 1, 3

    25. 

  25.     rs.addnew

    26. 

  26.     rs("pf_link_name") = request.Form("pf_link_name")

    27. 

  27.     'If request.Form("pf_uploadfile") = "" Then

    28. 

  28.         'rs("pf_uploadfile") = "text"

    29. 

  29.     'Else

    30. 

  30.         'rs("pf_uploadfile") = request.Form("pf_uploadfile")

    31. 

  31.     'End If

    32. 

  32.     'rs("pf_link_style") = request.Form("pf_link_style")

    33. 

  33. 	'rs("pf_link_text") = request.Form("pf_link_text")

    34. 

  34.     'rs("content") = request.Form("content2")

    35. 

  35.     rs.update

    36. 

  36.     Call close_rs

    37. 

  37. 	

    38. 

  38. 		set rsop = server.CreateObject("adodb.recordset")

    39. 

  39. 		rsop.open "select * from pf_oprate",conn,1,3

    40. 

  40. 		rsop.addnew

    41. 

  41. 		rsop("pf_op_name") = session("pf_admin_name")

    42. 

  42. 		rsop("pf_op_sources") = "Ôö¼ÓÔ¤Ô¼»î¶¯:"&request.Form("pf_link_name")

    43. 

  43. 		rsop.update

    44. 

  44. 		rsop.close

    45. 

  45. 		set rsop = nothing

    46. 

  46. 	

    47. 

  47.     Call close_conn

    48. 

  48.     Call infohref("Ìí¼Ó³É¹¦£¡", "pf_yyhd.asp")

    49. 

  49. End If

    50. 

  50. %>

    51. 

  51. <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">

    52. 

  52. <html xmlns="http://www.w3.org/1999/xhtml">

    53. 

  53. <head>

    54. 

  54. <meta http-equiv="Content-Type" content="text/html; charset=gb2312" />

    55. 

  55. <title>¿­Ù¶ùͯÃÀÓïѧУ»Ó­Äú!</title>

    56. 

  56. <link href="pf_style.css" rel="stylesheet" type="text/css" />

    57. 

  57. </head>

    58. 

  58. <body>

    59. 

  59. <!--#include file="pf_top.asp"-->

    60. 

  60. <div id="content">

    61. 

  61. 	<!--#include file="pf_left.asp"-->

    62. 

  62. 	<div id="right">

    63. 

  63. 		<div class="right_title">

    64. 

  64. 			<h1>Ô¤Ô¼»î¶¯Ñ¡Ïî</h1>

    65. 

  65. 			

    66. 

  66. 		</div>

    67. 

  67. 		<div class="right_body">

    68. 

  68. 			<table>

    69. 

  69. 				<tr>

    70. 

  70. 					<th width="200">Ô¤Ô¼»î¶¯</th>

    71. 

  71. 					<th>Ð޸IJÙ×÷</th>

    72. 

  72. 				</tr>

    73. 

  73. 				<%

    74. 

  74. Set rs = server.CreateObject("adodb.recordset")

    75. 

  75. sql = "select * from pf_hdyy"

    76. 

  76. rs.Open sql, conn, 1, 1

    77. 

  77. Do While Not rs.EOF

    78. 

  78. 

    79. 

  79. %>

    80. 

  80. 				<tr align="center">

    81. 

  81. 					<td><%=rs("pf_link_name")%></td>

    82. 

  82. 					<td>[<a href="pf_yyhd_delete.asp?id=<%=rs("ID")%>&opname=<%=rs("pf_link_name")%>" onclick="return confirm('È·¶¨ÒªÉ¾³ý´Ë»î¶¯Âð£¿É¾³ýºó½«²»¿É»Ö¸´£¡')">ɾ³ý</a>]</td>

    83. 

  83. 				</tr>

    84. 

  84. 				<%

    85. 

  85. rs.movenext

    86. 

  86. Loop

    87. 

  87. Call close_rs

    88. 

  88. 

    89. 

  89. %>

    90. 

  90. 			</table>

    91. 

  91. 		</div>

    92. 

  92. 		<div class="right_title">

    93. 

  93. 			<h1>Ìí¼ÓÊ×Ò³»î¶¯ÐÂÎÅ</h1>

    94. 

  94. 		</div>

    95. 

  95. 		<div class="right_body">

    96. 

  96. 			<table>

    97. 

  97. 				<form name="pcfinal" method="post">

    98. 

  98. 					<tr>

    99. 

  99.                       <td width="9%" align="center">Ô¤Ô¼»î¶¯£º</td>

    100. 

  100.                       <td width="91%"><input type="text" name="pf_link_name" size="60" />

    101. 

  101.                           <span class="red">±ØÌî</span> </td>

    102. 

  102. 				  </tr>

    103. 

  103. 					<tr>

    104. 

  104. 						<td colspan="2" align="center">

    105. 

  105. 							<input type="submit" name="submit" class="submit_button" value="È·ÈÏÌí¼Ó">

    106. 

  106. 						</td>

    107. 

  107. 					</tr>

    108. 

  108. 				</form>

    109. 

  109. 			</table>

    110. 

  110. 		</div>

    111. 

  111. 	</div>

    112. 

  112. 	<div class="clear"></div>

    113. 

  113. </div>

    114. 

  114. <!--#include file="pf_bottom.asp"-->

    115. 

  115. </body>

    116. 

  116. </html>
    117.