📄 lotterynew.asp

📁 宁波娱乐在线城市,丰富的内容版块

💻 ASP

字号:

<!--#include file="lotteryconn.asp"-->
<% 
if UCase(Request.Cookies("NC")) <> UCase(Application("NC")) then
        Response.Write("对不起，您不是管理员！")
        Response.End
end if

set rec=server.createobject("adodb.recordset")
rec.open "Select * From lottery where lotteryclose=0",ltconn,1,1

if not rec.eof then
    rec.close
	ltconn.close
	set rec=nothing
    set ltconn=nothing
    response.redirect "error.asp?reason=错误&msg=还有彩票没有开奖，您不得开设新的彩票!"
    response.end
end if

allclose=1
%>
<HTML>
<HEAD>
<title>青浦热线 -虚拟城市 福利彩票</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" type="text/css" href="STYLE.CSS">
</HEAD>

<body  style="font-size:9pt" text="#000000" link="#0033CC" vlink="#003399" background="images/bg.jpg">
  <div align="left"></div>
  <div align=center>彩票管理--开设新的彩票</div>
  <br>
  <div align=center>
    <form name=newlottery method=post action="lotterynew2.asp">
    <table width=95% border="1" cellspacing="0" cellpadding="3" bordercolorlight="#000000" cellspacing="0" bordercolordark="#FFFFFF">
      <tr >
        <td align=center>
         彩票名称：
        </td>
        <td align=left>
         <input type=text name="lotteryname" value="福利彩票" size=15 maxlength=20>
        </td>
      </tr>
      <tr>
        <td align=center>
         中奖金额:
        </td>
        <td align=left>
         <input type=text name="lotterymoney" value="" size=15 maxlength=8>元（社区货币）
        </td>
      </tr>
      <tr>
        <td align=center>
         彩票简介:
        </td>
        <td align=left>
         <textarea style="width:300;height:200" name="lotterycontent">支持社区福利彩票是每位公民的光荣义务。</textarea>
        </td>
      </tr>
    </table>
    <center>
    <input type=submit name=ok value="开设">—<input type=reset name=cancel value="重来">
    </center>
    </form>
  </div>
  <br>
   <br>
<center>
</center>

</body>
</html>
<%
rec.close
ltconn.close
set rec=nothing
set ltconn=nothing
%>

</body>
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -