📄 wldc.asp
字号:
<!--#include file="conn.asp"-->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="ex.css" rel="stylesheet" type="text/css">
<title>网络调查</title>
<script language="javascript1.2">
<!--
function gosw()
{
location.replace("gowldc.asp");
}
function godca()
{
document.s.action="gowldc.asp?ditem=add";
document.s.submit();
}
//-->
</script>
</head>
<body>
<form name="s" method="post" action="gowldc.asp?ditem=add">
<%
set dcrs=conn.execute("select * from wldc where dcbegin=true order by id desc")
if not dcrs.eof then
if trim(dcrs("dctype"))="单选" then
sinput="<input type='radio'"
else
sinput="<input type='checkbox'"
end if
dtm=split(trim(dcrs("dcitem")),",,,")
response.write "<table border='0' cellpadding='0' cellspacing='1' width='100%' bgcolor='#6699CC' align='right'>"&_
"<tr bgcolor='#FFFFFF'><td>"&dcrs("dctitle")&"</td></tr><tr bgcolor='#FFFFFF'><td>"
for dcjj=0 to cint(dcrs("dcnum"))-1
response.write sinput&" name='mkdci' value='"&dcjj&"'>"&dcjj+1&"．"&dtm(dcjj)&"<br>"
next
response.write "</td></tr><tr bgcolor='#FFFFFF'><td align=center><input type='submit' name='sdfs' value='我要投票'> <input type='button' name='sddfs' value='查看结果' onclick='gosw();'></td></tr></table>"
else
response.Write "没有调查展开"
end if
set dcrs=nothing
set conn=nothing
%>
</form>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -