Category

Development Platform
Home > SourceCode/Document > Internet-Socket-Network > WEB(ASP,PHP,...) > View Code
Pinke_edit.asp
Package: pinke2010.rar　[view]
Upload User: pengwei803
Upload Date: 2021-02-10
Package Size: 3311k
Code Size: 10k
Category:

WEB(ASP,PHP,...)

Development Platform:

HTML/CSS

Pinke_edit.asp：Code Content
  1. <!--#include file="../Ku_inc/Ku_sql.asp"-->
  2. <!--#include file="../Ku_inc/Ku_config.asp"-->
  3. <!--#include file="Ku_conn.asp"-->
  4. <!--#include file="../Ku_inc/inc.asp"-->
  5. <!-- #include file="Session.asp"-->
  6. <%
  7. id=request("id")
  8. if id ="" then
  9.     response.Write("<script>alert(""黑客行为！"");location.href=""Pinke_list.asp"";</script>")
  10. end if   
  11.     set rs=server.createobject("adodb.recordset")
  12.     sql="select * from Gu_pinke where id="&id
  13.     rs.open sql,conn,1,3
  14. %>
  15. <html>
  16. <head>
  17. <title>增加拼客信息</title>
  19. <link href="include/style.css" rel="stylesheet" type="text/css">
  20. <style type="text/css">
  21. <!--
  22. .news_add{
  23. height:22px;
  24. border:1px solid #BEBEBE;
  25. background-color:#FFF;
  26. padding-top: 2px;
  27. padding-right: 8px;
  28. padding-bottom: 0pt;
  29. padding-left: 3px;
  31. }
  32. input{
  33. height:22px;
  34. border:1px solid #BEBEBE;
  35. background-color:#FFF;
  36. padding-top: 2px;
  37. padding-right: 8px;
  38. padding-bottom: 0pt;
  39. padding-left: 3px;
  40. }
  41. -->
  42. </style>
  43. </head>
  44. <body>
  45. <div align="center">
  47. <table border="0" width="95%" height="70" cellpadding="0" cellspacing="0"  >
  48. <tr >
  49. <td height="32" style="border: 1px solid #D0D4D9" bgcolor="#EEEEEE" >&nbsp;<b>当前栏目：</b>&gt; 
  50. 编辑拼客信息</td>
  51. </tr>
  52.     <tr><td height="38">
  53.       <input class="input_back" type="button" name="Submit4" value="拼客分类"onclick="location.href='pinke_kind.asp'"/>
  54. <input class="input_back" type="button" name="Submit3" value="信息列表"onclick="location.href='Pinke_list.asp'"/>
  55. <input class="input_back" type="button" name="Submit2" value="管理首页"onclick="location.href='main.asp'"/></td></tr>
  56. </table>
  58. </div>
  60. <div align="center">
  61. <table border="0" width="95%" cellpadding="0" cellspacing="0" height="506">
  62. <tr>
  63. <td height="506" width="100%">
  64.   <form name="myform" action="Deal_pinke.asp?action=edit_info&id=<%=id%>" method="post">
  65.   <div align="center">
  66.   <table width="100%" height="624" bgcolor="#ECECE3" cellpadding="0" cellspacing="1">
  67.   <tr>
  68.   <td width="12%" bgcolor="#FFFFFF" height="30"><div align="right">标&nbsp; 
  69. 题：</div></td>
  70.   <td bgcolor="#FFFFFF" height="27" width="88%">&nbsp; 
  71. <input name="biaoti" type="text" size="78" maxlength="35" value="<%=rs("title")%>" >
  72.   <font color="red">*</font> 审核<input name="shenhe" type="checkbox" id="kind" value="1"<%if rs(shenhe)=1 then%> checked<%end if%>></td>
  73.   </tr>
  74.   <tr>
  75.   <td width="12%" bgcolor="#FFFFFF" height="30"><div align="right">拼客分类：</div></td>
  76.   
  77.   <td bgcolor="#FFFFFF" height="28" width="88%">&nbsp;
  78.   <%  set rsk=server.createobject("adodb.recordset")
  79.     sqlk="select * from Gu_pkind where id="&rs("pkind")
  80.     rsk.open sqlk,conn,1,3
  82. set rsclass=server.createobject("adodb.recordset")
  83. sqlclass = "select * from Gu_pkind"
  84. rsclass.open sqlclass,conn,1,1
  85. if rsclass.eof and rsclass.bof then
  86. response.write "请先添加分类。"
  87. response.end
  88. else
  89. %> <SELECT name="pkind" size="1">
  90. <OPTION value="<%=trim(rsk("id"))%>"><%=trim(left(rsk("name"),6))%></OPTION>
  91. <%do while not rsclass.eof
  92. %><OPTION value="<%=trim(rsclass("id"))%>"><%=trim(left(rsclass("name"),6))%></OPTION>
  93. <%
  94. rsclass.movenext
  95. loop
  96. end if
  97. rsclass.close
  98. rsk.close
  99. %></SELECT> <font color="red">*</font>
  101.   </td>
  102.   </tr>
  103.    <tr>
  104.   <td width="12%" bgcolor="#FFFFFF" height="30">
  105. <p align="right">分类选择：</td>
  106.   <td bgcolor="#FFFFFF" width="88%">&nbsp;<%
  107. set rsk=server.createobject("adodb.recordset")
  108.     sqlk="select * from Gu_pgq where id="&rs("pgq")
  109.     rsk.open sqlk,conn,1,3   
  110.   
  111. set rsclass=server.createobject("adodb.recordset")
  112. sqlclass = "select * from Gu_pgq"
  113. rsclass.open sqlclass,conn,1,1
  114. if rsclass.eof and rsclass.bof then
  115. response.write "请先添加分类。"
  116. response.end
  117. else
  118. %> <SELECT name="pgq" size="1">
  119. <OPTION value="<%=trim(rsk("id"))%>"><%=trim(left(rsk("name"),6))%></OPTION>
  120. <%do while not rsclass.eof
  121. %><OPTION value="<%=trim(rsclass("id"))%>"><%=trim(left(rsclass("name"),6))%></OPTION>
  122. <%
  123. rsclass.movenext
  124. loop
  125. end if
  126. rsclass.close
  127. rsk.close
  128. %></SELECT> <font color="red">*</font>
  129. </td>
  130.   </tr>
  131.    <tr>
  132.   <td width="12%" bgcolor="#FFFFFF" height="30">
  133. <p align="right">地区选择：</td>
  134.   <td bgcolor="#FFFFFF" width="88%"><%
  135. dim rsclass,sqlclass
  136. set rsclass=server.createobject("adodb.recordset")
  137. sqlclass = "select * from Gu_qu"
  138. rsclass.open sqlclass,conn,1,1
  139. %><SCRIPT language = "JavaScript">
  140. var onecount;
  141. onecount=0;
  142. subcat = new Array();
  143.         <%
  144.         count = 0
  145.         do while not rsclass.eof 
  146.         %>
  147. subcat[<%=count%>] = new Array("<%= trim(rsclass("class2"))%>","<%= trim(rsclass("class1"))%>","<%= trim(rsclass("id"))%>");
  148.         <%
  149.         count = count + 1
  150.         rsclass.movenext
  151.         loop
  152.         rsclass.close
  153.         %>
  154. onecount=<%=count%>;
  156. function changelocation(locationid)
  157.     {
  158.     document.myform.class2.length = 0; 
  160.     var locationid=locationid;
  161.     var i;
  162.     for (i=0;i < onecount; i++)
  163.         {
  164.             if (subcat[i][1] == locationid)
  165.             { 
  166.                 document.myform.class2.options[document.myform.class2.length] = new Option(subcat[i][0], subcat[i][2]);
  167.             }        
  168.         }
  169.         
  170.     }    
  171. </SCRIPT><%
  172. sqlclass = "select * from Gu_shi"
  173. rsclass.open sqlclass,conn,1,1
  174. if rsclass.eof and rsclass.bof then
  175. response.write "请先添加分类。"
  176. response.end
  177. else
  178. %>&nbsp; <SELECT name="class1" onChange="changelocation(document.myform.class1.options[document.myform.class1.selectedIndex].value)" size="1">
  179. <%
  180. set rsk1=server.createobject("adodb.recordset")
  181.     sqlk1="select * from Gu_shi where id="&rs("shi")
  182.     rsk1.open sqlk1,conn,1,3  %>
  183.     <%
  184. set rsk2=server.createobject("adodb.recordset")
  185.     sqlk2="select * from Gu_qu where id="&rs("qu")
  186.     rsk2.open sqlk2,conn,1,3  %>
  187. <OPTION value="<%=trim(rsk1("id"))%>"><%=trim(left(rsk1("class1"),5))%></OPTION>
  188. <%do while not rsclass.eof
  189. %><OPTION value="<%=trim(rsclass("id"))%>"><%=trim(left(rsclass("class1"),5))%></OPTION>
  190. <%
  191. rsclass.movenext
  192. loop
  193. end if
  194. rsclass.close
  195. %></SELECT>
  196. <SELECT name="class2">
  197. <OPTION value="<%=trim(rsk2("id"))%>"><%=trim(left(rsk2("class2"),5))%></OPTION>
  198. </SELECT> 
  199.   <font color="red">*</font></td>
  200.   </tr>
  201.    <tr>
  202.   <td width="12%" bgcolor="#FFFFFF" height="30"><div align="right">有效期：</div></td>
  203.   <td bgcolor="#FFFFFF" width="88%" height="19">&nbsp; <select name="yxq">
  204. <option value="<%=rs("times")%>"><%=rs("times")%>天</option>
  205. <option value="1">1天</option>
  206. <option value="2">2天</option>
  207. <option value="3">3天</option>
  208.     <option value="7">7天</option>
  209. <option value="10">10天</option>
  210.     <option value="15">15天</option>
  211. <option value="20">20天</option>
  212.    <option value="30">30天</option>
  213.     <option value="45">45天</option>
  214. <option value="30">一个月</option>
  215. <option value="90">三个月</option>
  216.   </select><font color="red">*</font> </td>
  217.   </tr>
  218.    <tr>
  219.   <td width="12%" bgcolor="#FFFFFF" height="163"><div align="right">内&nbsp; 
  220. 容：</div></td>
  221.   <td bgcolor="#FFFFFF" height="163" width="88%">&nbsp; 
  222. <textarea name="neirong" cols="84" rows="11"><%=rs("content")%></textarea> 
  223.   <font color="red">*</font> </td>
  224.   </tr>
  225.    <tr>
  226.   <td width="12%" bgcolor="#FFFFFF" height="36">
  227. <p align="right">相关图片：</td>
  228.   <td bgcolor="#FFFFFF" height="36" width="88%">&nbsp;<input name="pic" type="text" id="pic" size="36" value="<%if rs("pic")<>"" then%>../<%=rs("pic")%><%end if%>" ></td>
  229.   </tr>
  230.    <tr>
  231.   <td width="12%" bgcolor="#FFFFFF" height="35">
  232. <p align="right">上传图片：</td>
  233.   <td bgcolor="#FFFFFF" height="35" width="88%">&nbsp;<iframe frameborder=0 width=290 height=25 scrolling=no src="upload.asp?action=art"></iframe>　</td>
  234.   </tr>
  235.    <tr>
  236.   <td width="12%" bgcolor="#FFFFFF" height="43"><div align="right">发布人：</div></td>
  237.   <td bgcolor="#FFFFFF" height="43" width="88%">&nbsp; 
  238. <input name="fbr" type="text" size="35" maxlength="15" value="<%=rs("username")%>"> 
  239.   <font color="red">*</font> (不可修改)</td>
  240.   </tr>
  241.    <tr>
  242.   <td width="12%" bgcolor="#FFFFFF" height="36"><div align="right">联系人：</div></td>
  243.   <td bgcolor="#FFFFFF" height="36" width="88%">&nbsp; 
  244. <input name="lianxiren" type="text" size="35" maxlength="15" value="<%=rs("lianxiren")%>"> 
  245.   <font color="red">*</font> </td>
  246.   </tr>   
  247.    <tr>
  248.   <td width="12%" bgcolor="#FFFFFF" height="32"><div align="right">联系电话：</div></td>
  249.   <td bgcolor="#FFFFFF" height="32" width="88%">&nbsp; 
  250. <input name="dianhua" type="text" size="35" maxlength="30" value="<%=rs("tel")%>"> 
  251.   <font color="red">*</font> </td>
  252.   </tr> 
  253.   <tr>
  254.   <td width="12%" bgcolor="#FFFFFF" height="34"><div align="right">联系QQ：</div></td>
  255.   <td bgcolor="#FFFFFF" height="34" width="88%">&nbsp; 
  256. <input name="qq" type="text" size="35" maxlength="11" value="<%=rs("qq")%>"> 
  257.   </td>
  258.   </tr>
  259.   <tr>
  260.   <td width="12%" height="38" bgcolor="#FFFFFF">
  261. <p align="right">联系E_mail：</td>
  262.   <td bgcolor="#FFFFFF" width="88%">&nbsp; 
  263. <input name="email" type="text" size="35" maxlength="20" value="<%=rs("email")%>"> 
  264.   </td>
  265.   </tr>
  266.   <tr>
  267.   <td width="12%" height="32" bgcolor="#FFFFFF"><div align="right">联系地址：</div></td>
  268.   <td bgcolor="#FFFFFF" width="88%">&nbsp; 
  269. <input name="dizhi" type="text" size="56" maxlength="50" value="<%=rs("address")%>"> 
  270.   </td>
  271.   </tr>
  272.   <tr>
  273.   <td colspan="2" bgcolor="#FFFFFF" height="42"><div align="center"><input type="submit" value="修改信息" >
  274.   &nbsp;&nbsp;<input type="reset" value="取消发布"></div></td>
  275.   </tr>
  276.   </table>
  277.   </div>
  278.   </form>
  281. </td>
  282. </tr>
  283. </table>
  284. </div><hr/>
  285. <p align="center"><!-- #include file="Ku_bottom.asp"--></p>
  287. </body>
  288. </html>