/admin/pf_class_modify.asp

https://github.com/hare1987/kaidun180 · ASP · 105 lines · 102 code · 3 blank · 0 comment · 0 complexity · f2da58f665046fe69fe00232f38a720c MD5 · raw file

  1. <%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
  2. <!--#include file="pf_conn.asp"-->
  3. <!--#include file="pf_function.asp"-->
  4. <!--#include file="pf_session.asp"-->
  5. <%
  6. Call iderror
  7. If request.Form("submit") = "È·ÈÏÐÞ¸Ä" Then
  8. If request.Form("class_name") = "" Then
  9. Call infoback("¿ª°àÃû³Æ²»ÄÜΪ¿Õ£¡")
  10. End If
  11. If request.Form("class_date") = "" Then
  12. Call infoback("ÉÏ¿ÎÈÕÆÚ²»ÄÜΪ¿Õ£¡")
  13. End If
  14. If request.Form("class_time") = "" Then
  15. Call infoback("ÉÏ¿Îʱ¼ä²»ÄÜΪ¿Õ£¡")
  16. End If
  17. If request.Form("class_address") = "" Then
  18. Call infoback("ÉϿεص㲻ÄÜΪ¿Õ£¡")
  19. End If
  20. Set rs = server.CreateObject("adodb.recordset")
  21. sql = "select * from class where ID= "&request.QueryString("ID")&""
  22. rs.Open sql, conn, 1, 3
  23. rs("class_name") = request.Form("class_name")
  24. rs("class_time") = request.Form("class_time")
  25. rs("class_date") = request.Form("class_date")
  26. rs("class_address") = request.Form("class_address")
  27. rs.update
  28. Call close_conn
  29. Call infohref("Ð޸ijɹ¦£¡", "pf_class.asp")
  30. End If
  31. %>
  32. <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
  33. <html xmlns="http://www.w3.org/1999/xhtml">
  34. <head>
  35. <meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
  36. <title>¿­Ù¶ùͯÃÀÓïѧУ»Ó­Äú!</title>
  37. <link href="pf_style.css" rel="stylesheet" type="text/css" />
  38. </head>
  39. <body>
  40. <!--#include file="pf_top.asp"-->
  41. <div id="content">
  42. <!--#include file="pf_left.asp"-->
  43. <div id="right">
  44. <div class="right_title">
  45. <h1>Ð޸Ŀª°àÐÅÏ¢</h1>
  46. </div>
  47. <div class="right_body">
  48. <table>
  49. <%
  50. Set rs = server.CreateObject("adodb.recordset")
  51. sql = "select * from class where ID= "&request.QueryString("ID")&""
  52. rs.Open sql, conn, 1, 1
  53. If rs.EOF Then
  54. Call infoback("²»´æÔÚ´ËÊý¾Ý")
  55. End If
  56. %>
  57. <form name="pcfinal" method="post">
  58. <tr>
  59. <td width="9%" align="center">¿ª°àÃû³Æ£º</td>
  60. <td width="91%"><input type="text" name="class_name" size="60" value="<%=rs("class_name")%>" />
  61. <span class="red">±ØÌî</span> </td>
  62. </tr>
  63. <tr>
  64. <td width="9%" align="center">¿ª°àʱ¼ä£º</td>
  65. <td width="91%"><input type="text" name="class_time" size="60" value="<%=rs("class_time")%>"/>
  66. </td>
  67. </tr>
  68. <tr>
  69. <td width="9%" align="center">¿ª°àÈÕÆÚ£º</td>
  70. <td width="91%"><input type="text" name="class_date" size="60" value="<%=rs("class_date")%>"/>
  71. </td>
  72. </tr>
  73. <tr>
  74. <td align="center">¿ª°àµØµã£º</td>
  75. <td><select name="class_address" id="class_address">
  76. <option value="<%=rs("class_address")%>">²»ÐÞ¸Ä</option>
  77. <option>Ðì»ãÌïÁÖУ</option>
  78. <option>»ÆÆÖÊé³ÇУ</option>
  79. <option>ÆÖ¶«½ðÇÅУ</option>
  80. <option>ãÉÐÐݷׯУ</option>
  81. <option>ºç¿Ú¶«±¦Ð£</option>
  82. <option>³¤ÄþºçÇÅУ</option>
  83. <option>Ëɽ­¾ÅͤУ</option>
  84. <option>±¦É½´ó»ªÐ£</option> </select>
  85. <tr>
  86. <td colspan="2" align="center">
  87. <input type="submit" name="submit" class="submit_button" value="È·ÈÏÐÞ¸Ä">
  88. </td>
  89. </tr>
  90. </form>
  91. <%
  92. Call close_rs
  93. Call close_conn
  94. %>
  95. </table>
  96. </div>
  97. </div>
  98. <div class="clear"></div>
  99. </div>
  100. <!--#include file="pf_bottom.asp"-->
  101. </body>
  102. </html>