BVB Source Codes

QQ number network source v1.0 Show tool_edit.asp Source code

Return Download QQ number network source v1.0: download tool_edit.asp Source code - Download QQ number network source v1.0 Source code - Type:.asp
  1. <%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
  2. <!--#include file="../conn/conn.asp" -->
  3. <!--#include file="../inc/Config.asp" -->
  4. <!--#include file="CheckAdmin.asp" -->
  5.  
  6. <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
  7. <html xmlns="http://www.w3.org/1999/xhtml">
  8. <head>
  9. <meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
  10. <title>无标题文档</title>
  11. <link href="images/css.css" rel="stylesheet" type="text/css" />
  12. <script language="javascript">
  13. function Check()
  14. {
  15.  
  16.         if(document.form2.type.value=="")
  17.         {
  18.            alert("请选择所属类别");
  19.            return false;
  20.         }
  21. }
  22.  
  23.  
  24. </script>
  25. </head>
  26.  
  27. <body>
  28.  
  29. <%
  30.  
  31.  
  32.  set rs1=server.CreateObject("adodb.recordset")
  33.        sql1="select * from tool where id="&trim(request.QueryString("id"))
  34.            rs1.open sql1,conn,1,1
  35.            if not rs1.eof then
  36. %>
  37. <div class="main">
  38.  
  39.         <h3>QQ群号修改</h3>
  40.     <form method="post" name="form2" action="tool_editsave.asp" onsubmit="return Check()">     
  41.                 <table width="100%" cellpadding="0" cellspacing="0" style="text-align:center">
  42.                         <tr>
  43.                           <td width="18%" class="one"><div align="right">QQ群号:</div></td>
  44.                                 <td width="75%" class="one">
  45.                                   <div align="left">
  46.                                     <input type="hidden" id="title" name="title" value="<%=rs1("title")%>" />
  47.                           <IFRAME ID="eWebEditor1" SRC="/editer/ewebeditor.asp?id=title&style=new" FRAMEBORDER="0" SCROLLING="no" WIDTH="460" HEIGHT="50"></IFRAME>
  48.                           </div></td>
  49.                                 <td width="7%" class="one">&nbsp;</td>
  50.                         </tr>
  51.                         <tr>
  52.                           <td class="one"><div align="right">群号价格:</div></td>
  53.                           <td class="one"><div align="left">
  54.                             <input name="type" type="text" id="type"  value="<%=rs1("type")%>"/>
  55.                             单位(<span class="STYLE1">元</span>)
  56.                           </div></td>
  57.                           <td class="one">&nbsp;</td>
  58.                   </tr>
  59.                   <!---
  60.                         <tr>
  61.                           <td class="one"><div align="right">价格说明:</div></td>
  62.                           <td class="one"><div align="left">
  63.                         <input name="url" type="text" id="url" size="50"  value="<%=rs1("url")%>"/>
  64.                           </div></td>
  65.                           <td class="one">&nbsp;</td>
  66.                   </tr>
  67.                   ------------------------->
  68.                   <tr>
  69.                           <td class="one"><div align="right">排列顺序:</div></td>
  70.                           <td colspan="2" class="one">
  71.                             <div align="left">
  72.                               <input name="shunxu" type="text" id="shunxu" value="<%=rs1("shunxu")%>" />
  73.                             </div>
  74.                           </td>
  75.                   </tr>
  76.                         <tr>
  77.                           <td class="one"><div align="right">群号状态:</div></td>
  78.                           <td class="one"><div align="left">
  79.                             <select name="tar" id="tar">
  80.                   <option value="1" <%if rs1("tar")="1" then response.Write("selected")%>>可交易</option>
  81.                   <option value="-1"<%if rs1("tar")="-1" then response.Write("selected")%>>已售完</option>
  82.                   <option value="0"<%if rs1("tar")="0" then response.Write("selected")%>>停售中</option>
  83.                 </select>
  84.                           </div></td>
  85.                           <td class="one">&nbsp;</td>
  86.                   </tr>
  87.                         <tr>
  88.                           <td class="one"><div align="right">群号说明:</div></td>
  89.                           <td class="one"><div align="left">
  90.                             <input type="hidden" id="content" value="<%=rs1("content")%>" name="content" />
  91.                           <IFRAME ID="eWebEditor1" SRC="/editer/ewebeditor.asp?id=content&style=new" FRAMEBORDER="0" SCROLLING="no" WIDTH="460" HEIGHT="150"></IFRAME>
  92.                       </div></td>
  93.                           <td class="one">&nbsp;</td>
  94.                   </tr>
  95.  
  96.                         <tr>
  97.                           <td class="one">&nbsp;</td>
  98.                           <td class="one">&nbsp;</td>
  99.                           <td class="one">&nbsp;</td>
  100.                   </tr>
  101.                         <tr>
  102.                           <td class="one">&nbsp;</td>
  103.                                 <td class="one">&nbsp;</td>
  104.                                 <td class="one">                                          </td>
  105.                         </tr>
  106.  
  107.                                 <tr>
  108.                                 <td colspan="3" class="one">
  109.                 <input name="pageid" type="hidden" value="<%=request("pageid")%>" />
  110.                                 <input name="ids" type="hidden" value="<%=rs1("id")%>" />
  111.                                 <input type="submit" name="Submit" value="保存" />
  112.                                   <input type="reset" name="Submit2" value="重置" /></td>
  113.                                 </tr>
  114.                 </table>
  115.   </form>
  116.                 </div>
  117.                 <%
  118.                 else
  119.                 response.Write("出现了未知的错误,错误编号:10003")
  120.                 response.End()
  121.                 end if
  122.                 rs1.close
  123.                 set rs1=nothing
  124.                
  125.                 %>
  126. </body>
  127. </html>
  128.  
downloadtool_edit.asp Source code - Download QQ number network source v1.0 Source code
Related Source Codes/Software:
Fate. Mobile message this v1.1 - Fate. Wind chimes guestbook, which is used to coll... 2016-11-11
400 simple message this V1.0 - 400 simple message this V1.0 2016-11-11
ASP cache them v1.0 premium - Released a few days before the ASP application emb... 2016-11-11
Ding v2.0 auspicious multi-user online customer service system - Multi-user online customer service system is an en... 2016-11-11
Think of concise message this v1.1 - Wisdom of concise message this V1.1 main functions... 2016-11-11
A small BBS V1.0 - Update: added SQL injection prevention program, re... 2016-11-11
Love will find clothing site www.2145.cc (full version) - It's nice to see you again. 2016-11-11
Qi qi ebook thief (pseudo static + background) v1.0 - Pseudo static + background Qi Qi thief programs ... 2016-11-11
Tao, ASP Trojan scanner v1.1 - Can scan all the specified type on the server (asp... 2016-11-11
138 MC v1.0 music network program - Installation instructions: 2016-11-11
ng-bootstrap - Angular powered Bootstrap h... 2017-04-09
vscode-go - An extension for VS Code which provides support fo... 2017-04-09
electron-builder - A complete solution to package and build a ready f... 2017-04-09
husky - 2017-04-09
eslint-plugin-react - React specific linting rules for ESLint 2017-04-09
fuckitjs - The Original Javascript Error Steamroller 2017-04-09
DeDRM_tools - DeDRM tools for ebook 2017-04-08
kcp - KCP - A Fast and Reliable ARQ Protocol 2017-04-08
cloc - cloc counts blank lines, comment lines, and physic... 2017-04-08

 Back to top