ASP网页编程之ASP做查询剖析器(Query Analyzer)(I)
Access是一种桌面数据库,只适合数据量少的应用,在处理少量数据和单机访问的数据库时是很好的,效率也很高。但是它的同时访问客户端不能多于4个。access数据库有一定的极限,如果数据达到100M左右,很容易造成服务器iis假死,或者消耗掉服务器的内存导致服务器崩溃。查询剖析sqlultimate.asp--PartA<%@LANGUAGE=VBScript%>
<%
OptionExplicit
Response.Buffer=True
Session.Timeout=1
Response.ContentType="text/html;charset=iso-8859-1"
--------------------------------------------------------------
---Declarations
--------------------------------------------------------------
DimstrQueryType
DimstrClipStringtodisplayworkspace
DimstrDBStringtodisplayrelativedatabasepath
DimstrTableStringtoholdthetablename
DimnumTableValue
DimstrDBName
Dimstrdbpath
DimstrConnect
DimstrSQL
DimboolTableInfo
DimstrServer
DimstrUserID
DimstrPassword
Dimcount
DimintSpacer
DimstrIdentity
DimstrQuery
DimstrLoad
DimstrCreate
DimstrTableName
DimstrQOption,strQOption1,strQOption2,strQOption3
--------------------------------------------------------------
---Initialization
--------------------------------------------------------------
strTable=request("schema")
strClip=Trim(Request.Form("strClip"))
Ifrequest("selectdb")="SelectDB"Then
strSQL=""
Else
strSQL=Trim(Request.Form("strSQL"))
strSQL=replace(strSQL,vbCrLf,"")
strClip=Trim(Request("strClip"))getworkspacevaluesfromform
EndIf
strLoad=request("Load")
Ifrequest("submitquery")="SubmitQuery"Then
strSQL=Trim(request("strSQL"))
strSQL=replace(strSQL,vbCrLf,"")
strClip=Trim(Request("strClip"))getworkspacevaluesfromform
ElseIfstrLoad="Load"Then
strSQL=request("strSQLLoad")
strSQL=replace(strSQL,vbCrLf,"")
EndIf
strServer=request("sqlServer")
strUserID=request("log_in")
strPassword=request("user_password")
strDB=request("choosetable")
Ifrequest("tableinfo")="TableInfo"Then
boolTableInfo="True"
ElseIfrequest("saveMyQuery")="Save"Then
booltableinfo=request("booltableinfo")
ElseIfrequest("createSQLStatement")="Create"Then
booltableinfo=request("booltableinfo")
ElseIfrequest("Load")="Load"Then
booltableinfo=request("booltableinfo")
ElseIfrequest("createTable")="createTable"Then
booltableinfo=request("booltableinfo")
EndIf
strConnect="Provider=SQLOLEDB.1;Password="&strPassword&";UserID="&strUserID&";InitialCatalog="&strDB&";DataSource="&strServer&";"
strIdentity=request.cookies(strDB&"strCookieIdentity")
strquery=request("savequery")
strCreate=request("sqlType")
strTableName=request("strTableName")
strQOption=""
strQOption1=""
strQOption2=""
strQOption3=""
Ifrequest("sqlType")=""Then
strQOption="Selected"
ElseIfrequest("sqlType")="Select"Then
strQOption1="Selected"
ElseIfrequest("sqlType")="Insert"Then
</p>asp可以轻松地实现对页面内容的动态控制,根据不同的浏览者,显示不同的页面内容。而浏览者一点觉察不出来,就像为他专门制作的页面一样。使用各种各样的组件,asp可以完成无比强大的功能。 没有坚实的理论做基础,那么我们连踏入社会第一步的资本都没有,特别对于计算机专业的学生学好专业知识是置关重要的。在这里我侧重讲一下如何学习ASP,从平时的学习过程中。 不能只是将它停留在纸上谈兵的程度上。 完全不知道到底自己学的是什么。最后,除了教程里面说的几个例子,还是什么都不会。 作为IE上广为流传的动态网页开发技术,ASP以它简单易学博得了广大WEB程序爱好这的青睐,而且它对运行环境和开发品台的不挑剔,以及有大量有效的参考手册,极大的推广了它的发展。 Request:从字面上讲就是“请求”,因此这个是处理客户端提交的东东的,例如Resuest.Form,Request.QueryString,或者干脆Request("变量名") 运用ASP可将VBscript、javascript等脚本语言嵌入到HTML中,便可快速完成网站的应用程序,无需编译,可在服务器端直接执行。容易编写,使用普通的文本编辑器编写,如记事本就可以完成。由脚本在服务器上而不是客户端运行,ASP所使用的脚本语言都在服务端上运行。 兴趣爱好,那么你无须学编程,申请一个域名和空间,在网上下载一些免费开源的CMS系统,你不用改代码,只须熟悉它们的后台操作,像office一样简单方便,很快就能建一个站点,很多站长都是这样做的 作为IE上广为流传的动态网页开发技术,ASP以它简单易学博得了广大WEB程序爱好这的青睐,而且它对运行环境和开发品台的不挑剔,以及有大量有效的参考手册,极大的推广了它的发展。 学习ASP其实应该上升到如何学习程序设计这种境界,其实学习程序设计又是接受一种编程思想。比如ASP如何学习,你也许在以前的学习中碰到过。以下我仔细给你说几点: Response:从字面上讲是“响应”,因此这个是服务端向客户端发送东西的,例如Response.Write
页:
[1]