⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 vote.asp

📁 全新后台新闻编辑器 2.全新后台下载编辑器 3.增加图片友情链接管理功能 4.JMail在线发送邮件,支持在线导出Email 5.新增在后台网站配置中指定网站首页新闻条数 6.后台
💻 ASP
字号:
<!--#include file="conn.inc"-->
<html><head><title>IT零距离统计系统</title><meta http-equiv='Content-Type' content='text/html; charset=gb2312'>
<link href='css.css' rel='stylesheet' type='text/css'>
<%set rs=server.CreateObject("adodb.recordset")
sql="select * from title where id="&request.QueryString("id")
rs.open sql,connstr
if rs("choice")=true then
   types=true
else
   types=false
end if
%>


<script language="javascript">
function openwin(url,a,b){
var
newwin=window.open(url,"dddddd","toolbar=no,location=no,top=10,directories=no,status=no,menubar=no,scrollbars=no,resizable=no,width="+a+",height="+b+"");
newwin.focus();
return(newwin);
}
</script>
<style type="text/css">
<!--
body,td,th {
	font-family: 宋体;
	font-size: 12px;
}
body {
	margin-left: 0px;
	margin-top: 0px;
	margin-right: 0px;
	margin-bottom: 0px;
}
-->
</style>
<meta http-equiv=Content-Type content=text/html; charset=gb2312>
</head><body>
<table width="195"  border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <td bgcolor="#FFFFFF"><table width=100%  border=0 align=center cellpadding=0 cellspacing=4>
      <tr>
        <td width=536 height="20"><div align="left"></div>
          <div align="center"><strong><%=rs("title")%></strong></div></td>
      </tr>
    </table>
      <table width=100% height=125  border=0 align=center cellpadding=0 cellspacing=0>
        <form name=form1 method=post action=deal.asp?id=<%=request("id")%> target="_blank">
          <tr>
            <td valign=top>
              <%rs.close
set rs=nothing%>
              <%set rs=server.CreateObject("adodb.recordset")
sql="select * from choice where extends="&request("id")
rs.open sql,connstr
if rs.eof and rs.bof then
   response.write "您还没有添加投票选项!"
else 
   i=1
   do while not rs.eof%>
              <table width=100%  border=0 cellspacing=0 cellpadding=3>
                <tr>
                  <td width=23% align="center">
                    <div align="right">
                      <%
			if types=true then
			   if rs("IsDefault")=true then
			      %>
                      <input name=choice type=checkbox id=choice value=<%=rs("id")%> checked>
                      <%else%>
                      <input name=choice type=checkbox id=choice value=<%=rs("id")%>>
                      <%end if%>
                      <%else
			     if rs("IsDefault")=true then
			      %>
                      <input type=radio name=choice value=<%=rs("id")%> checked>
                      <%else%>
                      <input type=radio name=choice value=<%=rs("id")%>>
                      <%end if%>
                      <%end if%>
                  </div></td>
                  <td width=77%><div align=left><%=rs("choice")%></div></td>
                </tr>
              </table>
              <%rs.movenext
		  loop
		  rs.close
		  set rs=nothing%>
              <table width=100%  border=0 cellpadding=0 cellspacing=0>
                <tr>
                  <td><div align="center">
                      <input name=ids2 type=hidden id=ids2 value=<%=request("id")%>>
                      <input type=image src=image/button1.gif name=Submit22>
      &nbsp;&nbsp; <a href=# onclick=javascript:openwin('show.asp?id=<%=request("id")%>','600','400')><img src=image/button2.gif width=50 height=20 border=0></a></div></td>
                </tr>
            </table></td>
          </tr>
        </form>
    </table>    </td>
  </tr>
</table>
<div align="center">
  <p>
    <% end if%><br><br>
</div>
</body></html>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -