中查找“如何使用ASP在自己的网站建立投票机制（二）”更多相关内容
中查找“如何使用ASP在自己的网站建立投票机制（二）”更多相关内容
Copyright © 2006-2007 中国建站网. All Rights Reserved .
合作联系： QQ: 8856499 黔ICP备07001966号
如何使用ASP在自己的网站建立投票机制（二）
来源：网络收集 作者：佚名 时间：2007-04-25 16:54:26
Batman 翻译整理
4、文件default.asp
<%
ID = Request("ID")
If ID = "" Then
ID = 30
End If
Title = "Polls (Create your own poll)"
%>
<html>
<head><link rel="STYLESHEET" type="text/CSS" href="style.css">
<title>ASP Polls</title>
<script language="javascript">
function gatherForm(form){
if(form.Mode[0].checked){
form.submit();
}else{
form.action="collect.asp";
form.submit();
}
}
</script>
</head>
<body>
<div align="left"><img src=/images/NullPic.gif" width="231" height="90"><br>Another joint product from <a href="http://www.ncws.com/tippycow">Tipped Cow Development</a> and <a href="http://dstoflet.calweb.com">Adrenalin Labs</a>
<br><br>
</div>
<table width="100%" cellspacing="0" cellpadding="2">
<tr>
<td align="left" width="25%" valign="top" class="bold">
<form action="default.asp">
<table width="100" border="1" bordercolor=#ccccff>
<tr>
<td>
<table border=0 cellspacing=0 cellpadding=5 bgcolor=#4f4f4f><tr>
<td colspan=3 bgcolor=#000000 align=center class="bold2">Select A Poll</td>
</tr><tr>
<td colspan=3 bgcolor=#000000 align=center>
<select name="ID" onChange="gatherForm(this.form)" class="input">
<%
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open Application("ASPPollDSN")
sql = "select * from Poll"
Set rs = conn.Execute(sql)
Do While Not rs.EOF
%>
<option value="<%=rs("ID")%>"><%=rs("PollName")%>
<%
rs.MoveNext
Loop
%>
</select>
</tr>
<tr>
<td colspan=3 align=right bgcolor=#FFFFFF class="bold">
Vote In Poll:<input type="radio" name="Mode" value="Vote" CHECKED><br>
View Results:<input type="radio" name="Mode" value="View">
</td></tr>
<tr>
<td colspan=3 align=right bgcolor=#000000 align=center>
<input type="button" value=" Go " onClick="gatherForm(this.form)" class="inline">
</td></tr>
</table>
</td>
</tr>
</table></form><br>
<div align="left" class="bold">
<a href="create_poll1.asp">Create your own poll</a><br>
<a href='javascript:history.back()'>Back</a>
</div>
</td>
<td align="center" width="75%" valign="top">
<table width="100" border=1 cellspacing=2 cellpadding=0 bordercolor=#ccccff><tr><td>
<form method="post" action="collect.asp">
4、文件default.asp
<%
ID = Request("ID")
If ID = "" Then
ID = 30
End If
Title = "Polls (Create your own poll)"
%>
<html>
<head><link rel="STYLESHEET" type="text/CSS" href="style.css">
<title>ASP Polls</title>
<script language="javascript">
function gatherForm(form){
if(form.Mode[0].checked){
form.submit();
}else{
form.action="collect.asp";
form.submit();
}
}
</script>
</head>
<body>
<div align="left"><img src=/images/NullPic.gif" width="231" height="90"><br>Another joint product from <a href="http://www.ncws.com/tippycow">Tipped Cow Development</a> and <a href="http://dstoflet.calweb.com">Adrenalin Labs</a>
<br><br>
</div>
<table width="100%" cellspacing="0" cellpadding="2">
<tr>
<td align="left" width="25%" valign="top" class="bold">
<form action="default.asp">
<table width="100" border="1" bordercolor=#ccccff>
<tr>
<td>
<table border=0 cellspacing=0 cellpadding=5 bgcolor=#4f4f4f><tr>
<td colspan=3 bgcolor=#000000 align=center class="bold2">Select A Poll</td>
</tr><tr>
<td colspan=3 bgcolor=#000000 align=center>
<select name="ID" onChange="gatherForm(this.form)" class="input">
<%
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open Application("ASPPollDSN")
sql = "select * from Poll"
Set rs = conn.Execute(sql)
Do While Not rs.EOF
%>
<option value="<%=rs("ID")%>"><%=rs("PollName")%>
<%
rs.MoveNext
Loop
%>
</select>
</tr>
<tr>
<td colspan=3 align=right bgcolor=#FFFFFF class="bold">
Vote In Poll:<input type="radio" name="Mode" value="Vote" CHECKED><br>
View Results:<input type="radio" name="Mode" value="View">
</td></tr>
<tr>
<td colspan=3 align=right bgcolor=#000000 align=center>
<input type="button" value=" Go " onClick="gatherForm(this.form)" class="inline">
</td></tr>
</table>
</td>
</tr>
</table></form><br>
<div align="left" class="bold">
<a href="create_poll1.asp">Create your own poll</a><br>
<a href='javascript:history.back()'>Back</a>
</div>
</td>
<td align="center" width="75%" valign="top">
<table width="100" border=1 cellspacing=2 cellpadding=0 bordercolor=#ccccff><tr><td>
<form method="post" action="collect.asp">
Tags：
0%(0)
0%(0)
相关文章
广告赞助
文章随便看看 设计素材 建站学院 网页模板 视频教程
网友评论
共有 0 位网友发表了评论，得分 0 分，平均 0 分 查看完整评论
栏目导航
视频教程
- 32-02 绘制半曲线(2)
- 22-03 旋转画布(2)
- 17-04 拼写检查和查找替换
- 74.思考延伸
- 添加边框
- 27.钢笔工具（1）
- 21-09 调整画布大小(1)
- 字体对齐
- 24-06 变换-透视
- 30-05 钢笔工具(4)
阅读排行
- ASP函数库
- ASP平台如何打造金牌英文网站
- 微软建议的ASP性能优化28条守则
- 用两行代码在浏览器中实现文件上传...
- ASP开发中存储过程应用详解
- 使用ffmpeg.exe转换flv格式的ASP函...
- 一个xmlhttp读取xml的例子
- ASP Session对象的集合以及属性方法...
- Access与Sql Server之ASP代码比较
- UTF-8转GB2312函数
- 正则表达式的字符，定位字符和重复...
- 技巧：用 isapi rewrite 实现asp的...
下载排行