1.ASP+ACCESS网站调查代码，网网站不知道哪里有问题
ASP+ACCESS网站调查代码，站源股票在线交易源码不知道哪里有问题
投票结果查看页的码a码可可softxlic.dll源码代码:
<!--#include file="inc/conn.asp"-->
<%
dim options,total,sql,i,answer,action
if request.QueryString("stype")="" then
if Request.ServerVariables("REMOTE_ADDR")=request.cookies("IPAddress") then
response.write"<SCRIPT language=JavaScript>alert('感谢您的支持，您已经投过票了，源代hdmi源码输出格式谢谢！网网站ssh实现oa系统源码');"
response.write"javascript:window.close();</SCRIPT>"
else
options=request.form("options")
response.cookies("IPAddress")=Request.ServerVariables("REMOTE_ADDR")
conn.execute("UPDATE vote set answer"&options&"=answer"&options&"+1 where IsChecked=1")
end if
end if
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb" />
<title>投票结果</title>
<LINK href=images/css.css rel=stylesheet>
</head>
<body>
<table width="%" border="0" cellspacing="0" cellpadding="0" align="center">
<tr>
<td height="">
<table width= height="" align="center" cellpadding=0 cellspacing=0>
<tr>
<td width=5> </td>
<td width=>
<div align="center"></div>
</td>
<td class=hg valign=bottom width=""> <font color="#"><b>投票结果</b></font></td>
<td width=> </td>
</tr>
</table>
</td>
</tr>
</table>
<table width="%" border="0" cellspacing="0" cellpadding="0" align="center">
<tr>
<td height="">
<table border="0" cellpadding="0" cellspacing="0" width="%" height="" style="border-collapse: collapse" align="center">
<%
total=0
set rs=server.createobject("adodb.recordset")
sql="select * from vote where IsChecked=1"
rs.open sql,站源233网校 源码conn,3,3
%>
<tr>
<td height="" valign="top" colspan="3" align=left><font color="#"><br>
=======================================================<br>
</font> <font color="#"> <%=rs("Title")%></font> </td>
</tr>
<tr>
<td valign="top">序号</td>
<td valign="top">百比分</td>
<td valign="top">人数</td>
</tr>
<%
for i=1 to 8
if rs("Select"&i)<>"" then
total=total+rs("answer"&i)
end if
next
%>
<%for i=1 to 8
if rs("Select"&i)<>"" then
if total=0 then
answer=0
else
answer=(rs("answer"&i)/total)
*end if
%>
<tr>
<td valign="top"><%=i%>.<%=rs("select"&i)%>：</td>
<td valign="top"><img src=images/RSCount.gif width=<%=int(answer*2)%> height=8>
<%=round(answer,3)%>%</td>
<td valign="top"><%=rs("answer"&i)%>人</td>
<%
end if
next
%>
<tr>
<td colspan="3"> 共有<%=total%>人参加投票<br>
=======================================================</td>
</tr>
</table>
<div align="center"></div>
<p align="center"><a href="javascript:window.close()">关闭窗口</a>
<% rs.close
set rs=nothing
conn.close
set conn=nothing %>
</td>
</tr>
</table>
<table width="%" border="0" cellspacing="0" cellpadding="0" align="center">
<tr>
<td height="">
<div align="center"></div>
</td>
</tr>
</table>
</body>
</html>
2024-11-21 02:092948人浏览
2024-11-21 01:302532人浏览
2024-11-21 01:122282人浏览
2024-11-21 01:051070人浏览
2024-11-20 23:55153人浏览
2024-11-20 23:532210人浏览
1.成品网站W灬源码入口APP入口重新开放-成品网站W灬源码入口APP访客瞬间涌入！2.盲盒商城源码开源完整版附搭建教程UNIAPP·HashMart3.html5魔塔广场安卓APK下载地址4.微博L
1.c语言源代码怎么看2.c语言怎么反编译源码？3.后缀为.c的文件是什么格式的?使用什么软件来打开4.c++源代码怎么打开？5.手机怎么检查源代码c语言源代码怎么看 1. cl.x.xyz似乎是
1.????Զ?????vbsԴ??2.电脑vbs是什么3.VBS脚本基础教程：[1]编写及运行VBS代码????Զ?????vbsԴ?? 调用外部程序，不知道你说的是不是这个意思set ws =
