|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
缺点:安全性不是太差了,还行,只要你充分利用系统自带的工具;唯一缺点就是执行效率慢,如何进行网站优化以后,效果会比较好。统计|投票|原创<!--
//多题投票统计体系之SAVE篇
//CHEERY_KE版本:1.0
//撑持:ASP+ACCESSWINDOWS2000PRO+IIS5.0测试经由过程
//弱点:每题与数据库互换一次数据,举措对照年夜,不合用于多成绩投票(>20?)
//长处:利用一个数据表,操纵、统计都对照复杂
//――――――数据表布局――――――
//本例中数据库名为111.MDB,表名为111
//标题编号为字段值,另加一ID,共标题数+1个字段
//了局标记为每条记录的ID值,即共A,B,C,D,E……条记录
-->
<%@LANGUAGE=VBSCRIPT%>
<%ONERRORRESUMENEXT%>
<%
界说数据库毗连
SETCONN=SERVER.CreateObject("ADODB.CONNECTION")
DBPath=SERVER.MapPath("111.MDB")
CONN.Open"DRIVER={MicrosoftAccessDriver(*.mdb)};dbq="&DBPath
界说数组MYARRAY(X),个中X为标题数+1
DIMMYARRAY(6)
MYARRAY(0)=""
MYARRAY(1)=REQUEST("R1")
MYARRAY(2)=REQUEST("R2")
MYARRAY(3)=REQUEST("R3")
MYARRAY(4)=REQUEST("R4")
MYARRAY(5)=REQUEST("R5")
界说轮回变量I
I=1
声明I>标题数时加入轮回
DOWHILENOTI>5
界说RS
SETRS=SERVER.CreateObject("ADODB.RECORDSET")
界说SQL变量,S"&I&"为标题序号,ID为了局
SQL="UPDATE111SETS"&I&"=S"&I&"+1WHEREID="&MYARRAY(I)&""
RS.OpenSQL,CONN,3,2
开释RS及SQL变量
SETRS=NOTHING
SETSQL=NOTHING
I=I+1
LOOP
Response.Write("<CENTER><BR><BR>SAVEDYOURVOTESUCCED!!</CENTER>")
Response.WriteERR.DESCRIPTION
%></p>问题是他们究竟是喜欢他们是使用软件时,速度快还是速度慢好.(当然在3秒以内).无论是他们输入资料时,查找资料时,分析资料时. |
|