抽奖

来源：互联网发布：怎么用淘宝店做淘宝客编辑：程序博客网时间：2024/06/10 21:12

<html> <head><meta http-equiv="Content-Type" content="text/html; charset=gb2312"><title> </title><link rel="stylesheet" type="text/css" href="css/style.css" mce_href="css/style.css"> <mce:script language=JavaScript></mce:script></head> <mce:style></mce:style><style mce_bogus="1">body{background-image:url(image/1.gif); background-attachment:fixed; border:0px ; background-repeat:no-repeat; background-position:center;}</style><body bgcolor="#B80000" onLoad="init()" style="margin:0px" mce_style="margin:0px"><div align="center"><IFRAME src="top.asp" mce_src="top.asp" frameBorder=0 width=1024 scrolling=no height=219></IFRAME></div><form name = "Form1" method="POST"> <table border="0" cellspacing="0" cellpadding="0" align="center"> <tr> <td width="3"></td> <td align="center" style="text-align: center" mce_style="text-align: center"><input name="xyid" type=text style="border-style:solid;border:1px solid #FFCC00;background-color:#ffffff;color:#000000; font-size:42pt; font-family:黑体; width:680; text-align:center" <% if request("id")<>"" thenresponse.write "value="& "工号为" & request("Code") & "的" & request("Name")else%>value= "祝※您※中※奖※"<%end if%> size=16 maxlength=12></td> </tr> </table> <div align="center"> <br> <input type=button name="StartBnt" value="开始摇号" OnClick="startrnd()" style="color: #008080; border: 3px double #FFFF00" mce_style="color: #008080; border: 3px double #FFFF00"><input type=hidden name=tabvalue value=0> <input type=button name="StopBtn" value="停止摇号" disabled OnClick="stoprnd()" style="color: #008080; border: 3px double #00FF00" mce_style="color: #008080; border: 3px double #00FF00"> <input type=button name="saveBtn" value="保存记录" onClick="save()" style="color: #008080; border: 3px double #00FF00" mce_style="color: #008080; border: 3px double #00FF00"><input type=hidden name="StartBnt0" value="清除记录" onClick="Clear()" style="color: #008080; border: 3px double #FFFF00" mce_style="color: #008080; border: 3px double #FFFF00"><table width="542" border="1" cellpadding="2" cellspacing="0" bordercolor="#FFCC00" id="table1"> <tr><td colspan="6" height="39"><p align="center"><b><font size="6" color="#FFFFFF">中奖名单</font></b></td></tr><tr> <td align="center"><b><font color="#FFFFFF" size="6">序号</font></b></td><td align="center"><b><font color="#FFFFFF" size="6">奖项</font></b></td> <td align="center"><font color="#FFFFFF" size="6">幸运号</font></td> <td align="center"><font color="#FFFFFF" size="6">幸运名单</font></td></tr><% dj=0sql="select * from Win_List order by shunxu "rs.open sql,conn,1,3if rs.bof and rs.eof thenelsedo while not rs.eofdj=dj+1if dj<37 then%><tr><td align="center"><b><font size="5" color="#FFFFFF"><%=rs("sx")%></font></b></td> <td align="center"><b><font size="5" color="#FFFFFF"><%if dj<=20 thenresponse.write "三等奖 "elseif 20<dj and dj<=30 thenresponse.write "二等奖 "elseif 30<dj and dj<=35 thenresponse.write "一等奖 "elseif 35<dj and dj<=36 thenresponse.write "特等奖 "end if%></font></b></td> <td align="center"><b><font size="5" color="#FFFFFF"><%=rs("Code")%></font></b></td> <td align="center"><b><font size="5" color="#FFFFFF"><%=rs("name")%></font></b></td> </tr><%else response.write "<mce:script language=JavaScript></mce:script>"end ifrs.movenextloopend ifrs.Close()set rs = nothing%></table> <table width="100%" height="60" border="0" cellpadding="0" cellspacing="0"> <tr> <td align="center"> <font color="#008080">Design By:</font><a href="http://www.csuper.cn" mce_href="http://www.csuper.cn"><font color="#008080">Csuper</font></a> <a href="default.asp" mce_href="default.asp"><font color="#008080">Back</font></a> </td> </tr></table> </div></form></body></html>