ASP网页设计一段前往随机纪录的代码
问题是他们究竟是喜欢他们是使用软件时,速度快还是速度慢好.(当然在3秒以内).无论是他们输入资料时,查找资料时,分析资料时.随机好久没用ACCESS了，只是看到常常碰着有人问怎样前往随机纪录的成绩，以是就贴了下去，任意看看。<!--#includevirtual="/adovbs.inc"-->
<%
DimobjConn
DimobjRst
DimstrSQL
DimstrConnection
Dimstr
Dimstr1
Dimcnt
Dimcnt1
DimrndMax
DimRndNumber
strConnection="driver={MicrosoftAccessDriver(*.mdb)};dbq="&server.mappath("/testdb.mdb")
strSQL="SELECTidFROMtblQuestions"
setobjConn=Server.CreateObject("ADODB.Connection")
SetobjRst=Server.CreateObject("ADODB.Recordset")
objConn.OpenstrConnection
setobjRst.ActiveConnection=objConn
objRst.LockType=adLockOptimistic
objRst.CursorType=adOpenKeySet
objRst.OpenstrSQL
objRst.MoveLast
cnt=objRst.RecordCount
cnt1=cnt
rndMax=cnt
IfCInt(Request.Form("maxNumber"))<cntThen
cnt1=CInt(Request.Form("maxNumber"))
EndIf
str=","
str1=","
DoUntilcnt1=0
Randomize
RndNumber=Int(Rnd*rndMax)
If(InStr(1,str1,","&RndNumber&",")=0)Then
str1=str1&RndNumber&","
cnt1=cnt1-1
objRst.MoveFirst
objRst.MoveRndNumber
str=str&objRst("id")&","
EndIf
Loop
objRst.Close
SetobjRst=Nothing
sql="SELECT*FROMtblQuestionsWHERE(((InStr(1,"&str&",(,&&,)))0))"
SetobjRst=Server.CreateObject("ADODB.Recordset")
setobjRst.ActiveConnection=objConn
objRst.LockType=adLockOptimistic
objRst.CursorType=adOpenKeySet
objRst.Opensql
%>
...DISPLAYTHERECORDSRETURNED...
<%
objRst.Close
SetobjRst=Nothing
objConn.Close
SetobjConn=Nothing
%>
</p>asp可以轻松地实现对页面内容的动态控制，根据不同的浏览者，显示不同的页面内容。而浏览者一点觉察不出来，就像为他专门制作的页面一样。使用各种各样的组件，asp可以完成无比强大的功能。 如何学好ASP,以前也有人问过,把回答给你转过来看看能否对你有帮助: 封装性使得代码逻辑清晰，易于管理，并且应用到ASP.Net上就可以使业务逻辑和Html页面分离，这样无论页面原型如何改变，业务逻辑代码都不必做任何改动；继承性和多态性使得代码的可重用性大大提高。 不是很难但是英文要有一点基础网上的教程很少有系统的详细的去买书吧,另不用专门学习vb关于vbscript脚本在asp教材都有介绍 如何学好ASP,以前也有人问过,把回答给你转过来看看能否对你有帮助: 以HTML语言整合(HTML负责界面上，ASP则负责功能上)形成一个B/S(浏览器/服务器)模式的网页程序。 他的语法和设计思路和VB完全相同，导致很多ASP的书都留一句“相关内容请参考VB的相关教材....”更糟糕的是，相当多的ASP教程混合了Javascript,VBscript等等脚本语言，搞的初学者。 学习ASP其实应该上升到如何学习程序设计这种境界，其实学习程序设计又是接受一种编程思想。比如ASP如何学习，你也许在以前的学习中碰到过。以下我仔细给你说几点: 掌握asp的特性而且一定要知道为什么。 学习ASP其实应该上升到如何学习程序设计这种境界，其实学习程序设计又是接受一种编程思想。比如ASP如何学习，你也许在以前的学习中碰到过。以下我仔细给你说几点: 如何更好的使自己的东西看上去很不错等等。其实这些都不是问题的实质，我们可以在实践中不断提升自己，不断充实自己。 不是很难但是英文要有一点基础网上的教程很少有系统的详细的去买书吧,另不用专门学习vb关于vbscript脚本在asp教材都有介绍
页:
[1]