|
![]() |
名片设计 CorelDRAW Illustrator AuotoCAD Painter 其他软件 Photoshop Fireworks Flash |
|
程序名称:delrec.asp 程序功能:删除贴子(剪枝) <!-- #include file="lybcon.inc" --> <% flag=request("flag") keyid=request("keyid") pageno=request("pageno") password=request.form("password") if flag="1" then if password="你的治理密码" then set guestconn=Server.CreateObject("ADODB.connection") guestconn.Open lybstr set cm = Server.CreateObject("ADODB.Command") Set cm.ActiveConnection = guestconn cm.CommandText = "lybdel" cm.CommandType = 4 set p = cm.Parameters p.Append cm.CreateParameter("@keyid",3,1,4) cm("@keyid")=keyid cm.execute guestconn.close set guestconn=nothing response.redirect "index.asp?pageno="&pageno end if end if %> <html> <head><title>软件使用留言薄治理</title> <style TYPE="text/css"> <!-- a { text-decoration: none} body {line-height:18px;font-size:9pt;font-family:宋体} a:hover {color:#FF0000;text-decoration:none} .submit {line-height:9pt;font-size:9pt;font-family:宋体} .submit1 {line-height:8pt;font-size:8pt;font-family:宋体} .selectform {font-family: 宋体; font-size: 9pt;background-color:ffE4E4} td {font-family: 宋体; font-size: 9pt;background-color:ECF7FF} .td1 {font-family: 宋体; font-size: 9pt;background-color:A2C8F2} .td2 {font-family: 宋体; font-size: 9pt;background-color:E9EDE0} .small1 {font-family: 宋体; font-size: 9pt;background-color:ffffff;line-height:9pt} --> </style> </head> <body topmargin=16 background=\\\'topbg.gif\\\'> <br><br><br> <form name=\\\'manage\\\' action=\\\'delrec.asp\\\' method=\\\'post\\\'> <input type=hidden name=\\\'flag\\\' value=\\\'1\\\'> <input type=hidden name=\\\'keyid\\\' value=\\\'<% =keyid %>\\\'> <input type=hidden name=\\\'pageno\\\' value=\\\'<% =pageno %>\\\'> <table width=80% align=center> <tr> <td align=right>请输入治理密码:</td> <td align=left><input type=\\\'password\\\' name=\\\'password\\\' size=20 class=\\\'submit\\\'></td> <td align=center><input type=\\\'submit\\\' value=\\\'删除该留言\\\' class=\\\'submit\\\'></td> </tr> </table> </form> 返回类别: 教程 上一教程: ASP小偷(远程数据获取)程序入门教程 下一教程: ASP中文本文件与数据库文件的数据交换(FSO) 您可以阅读与"用排序串字段实现树状结构(例程??删除贴子)"相关的教程: · 用排序串字段实现树状结构(例程??删除贴子) · 用排序串字段实现树状结构(例程??保存贴子内容) · 用排序串字段实现树状结构(例程??显示贴子内容) · 用排序串字段实现树状结构(例程??保存贴子内容) · 用排序串字段实现树状结构(例程??回复表单) |
![]() ![]() |
快精灵印艺坊 版权所有 |
首页![]() ![]() ![]() ![]() ![]() ![]() ![]() |