开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > Internet/网络编程 > WEB源码(ASP,PHP,...) > 查看源码
LuckVip.asp
资源名称：shop2.rar　[点击查看]
上传用户：btntkt
上传日期：2021-04-16
资源大小：5296k
文件大小：2k
源码类别：

WEB源码(ASP,PHP,...)

开发平台：

DOS

LuckVip.asp：源码内容
  2. <!--#include file="conn.asp"-->
  3. <%
  4. dim cls
  5. if session("admin")="" then
  6. Response.Redirect("admin.asp")
  7. else
  8. if session("flag")<>"0" then
  10. cls = Instr(session("flag"), "vipfig")
  11. if cls <= 0 then
  12. %>
  13. <script language="javascript">
  14. if (confirm("您的操作权限不够,系统拒绝你的访问,请点确定返回,或者点取消退出重新登录"))
  15.   location.href="login.asp";
  16. else
  17.   location.href="index.asp";
  18. </script>
  19. <%
  20. end if
  21. end if
  22. end if
  23. %>
  24. <html>
  25. <head>
  26. <title>Untitled Document</title>
  27. <meta http-equiv="Content-Type" content="text/html; charset=gb2312">
  28. <link href="../images/css.css" rel="stylesheet" type="text/css">
  29. </head>
  30. <body>
  31. <table cellpadding="3" cellspacing="1" border="0" width="100%" class="tableBorder" align=center>
  32.   <tr> 
  33.     <th  background="../images/admin_bg_1.gif" class="tableHeaderText" height=25>幸运VIP内容页面 </th>
  34.   </tr>
  35.   <%
  36.   set rs=server.CreateObject("adodb.recordset")
  37. rs.Open "select vipdyj from webinfo",conn,1,3
  38. %>
  39. <form name="form1" method="post" action="SaveVipActivity.asp" OnSubmit="return checkdata()" onReset="return ResetForm();">
  40.   <table cellpadding="3" cellspacing="1" border="0" width="100%" class="tableBorder" align=center>
  41.     <tr> 
  42.       <th class="tableHeaderText">VIP活动内容页面</th>
  43.     </tr>
  44.     <tr> 
  45.       <td align=center class="forumRowHighlight"style="PADDING-LEFT: 10px"><textarea name="Content" id="Content" style="display:none"><%=Server.HTMLEncode(rs("vipdyj"))%></textarea> 
  46.         <iframe ID="content" src="editubb/ewebeditor.asp?id=Content&style=standard" frameborder="0" scrolling="no" width="550" HEIGHT="350"></iframe> 
  47.         &nbsp;</td>
  48.     </tr>
  49.     <tr> 
  50.       <td class="forumRowHighlight" align=center>&nbsp; <br> <input type="submit" value=" 修 改 " name="Submit" class="unnamed5" onClick="document.form1.Content.value = frames.message.document.body.innerHTML;"> 
  51.       </td>
  52.     </tr>
  53.   </table>
  54. </form>
  55. </table>
  59. </body>
  60. </html>