ASP语法大全
- 格式:doc
- 大小:54.00 KB
- 文档页数:11
常用ASP代码大全1.获得系统时间:<%=now()%>2. 取得来访用的IP:<%=request.serverVariables("remote_host")%>3.获得系统,浏览器版本:<script>window.document.write(" 版本:"+navigator.appName+navigator.appVersion+" browser.")</script>4.去除IE混动条:<body scroll="no"><body style="overflow-y:hidden">5.进入网站,跳出广告:<script language="javascript"><!--<!-- 注意更改文件所在路径-->window.open(''",'''',''height=200,width=300,top=0,left=30'');// --></script>6.随机数:<%randomize%><%=(int(rnd()*n)+1)%>N 为可改变数7.向上混动代码:<marquee direction="up" scrolldelay="200" style="font-size: 9pt; color: #FF0000;line-height: 150%; font-style:italic; font-weight:bold" scrollamount="2" width="206"height="207" bgcolor="#FFFF00">Unix中文站</marquee>8.自动关闭网页:<script LANGUAGE="javascript"><!--setTimeout(''window.close();'', 10000); //60秒后关闭// --> </script><p align="center">本页10秒后自动关闭,请注意刷新页面</p>9.随机背景音乐:<%randomize%><bgsoundsrc="/qz.q/mids/<%=(int(rnd()*60)+1)%>.mid"loop="-1"> 可以修改数字,限制调用个数,我这里是60个.10.自动刷新本页面:<script><!--var limit="0:10"if (document.images){var parselimit=limit.split(":")parselimit=parselimit[0]*60+parselimit[1]*1 }function beginrefresh(){if (!document.images)returnif (parselimit==1)window.location.reload()else{parselimit-=1curmin=Math.floor(parselimit/60)cursec=parselimit%60if (curmin!=0)curtime=curmin+"分"+cursec+"秒后重刷本页!"elsecurtime=cursec+" 秒后重刷本页!"window.status=curtimesetTimeout("beginrefresh()",1000) } }window.onload=beginrefreshfile://--></script>11.ACCESS数据库连接:<%option explicitdim startime,endtime,conn,connstr,dbstartime=timer()'更改数据库名字db="data/dvBBS5.mdb"Set conn = Server.CreateObject("ADODB.Connection")connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(db)'如果你的服务器采用较老版本Access驱动,请用下面连接方法'connstr="driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath(db)conn.Open connstrfunction CloseDatabaseConn.closeSet conn = NothingEnd Function %>12.SQL数据库连接:<%option explicitdim startime,endtime,conn,connstr,dbstartime=timer()connstr="driver={SQLServer};server=HUDENQ-N11T33NB;uid=sa;pwd=xsfeihu;database=dvbbs"Set conn = Server.CreateObject("ADODB.Connection")conn.Open connstrfunction CloseDatabaseConn.closeSet conn = NothingEnd Function%>13.用键盘打开网页代码:<script language="javascript">function ctlent(eventobject){ if((event.ctrlKey && window.event.keyCode==13)(event.altKey && window.event.keyCode==83)){ window.open('网址','','') } }</script>这里是Ctrl+Enter和Alt+S的代码自己查下键盘的ASCII码再换就行14.让层不被控件复盖代码:<div z-Index:2><object ***></object></div> #前面<div z-Index:1><object ***></object></div> #后面<div style="position:absolute; top:40;width:400px; height:95px;z-index:2"><table height=100% width=100% bgcolor="#ff0000"><tr><td height=100% width=100%></td></tr></table><iframe width=0 height=0></iframe></div><div style="position:absolute; top:50;width:200px; height:115px;z-index:1"><iframe height=100% width=100%></iframe></div>。
ASP语法速查表Abs (数值)绝对值。
一个数字的绝对值是它的正值。
空字符串 (null) 的绝对值,也是空字符串。
未初始化的变数,其绝对为 0 例子:ABS(-2000)结果:2000Array (以逗点分隔的数组元素) Array 函数传回数组元素的值。
例子:A=Array(1,2,3)B=A(2)结果: 2说明:变量B为A数组的第二个元素的值。
Asc (字符串)将字符串的第一字母转换成 ANSI (美国国家标准符号)字码。
例子:Asc("Internet")结果:73说明:显示第一字母 I 的 ANSI 字码。
CBool(表达式)转换成布尔逻辑值变量型态(True 或False )例子:CBool(1+2)结果:TrueCDate (日期表达式)换成日期变量型态。
可先使用 IsDate 函数判断是否可以转换成日期。
例子: CDate (now( )+2)结果:2000/5/28 10:30:59CDbl(表达式)转换成DOUBLE变量型态。
Chr ( ANSI 字码)将ASCII 字码转换成字符。
例子: Chr ( 72 )结果: HCInt (表达式)转换成整数变量型态。
例子: CInt ("3.12")结果: 3CLng (表达式)转换成LONG 变量型态。
CSng (表达式)转换成SINGLE 变量型态。
CStr (表达式)转换成字符串变量型态。
Date ()top 传回系统的日期。
例子: Date结果: 2000/5/13DateAdd ( I , N , D )将一个日期加上一段期间后的日期。
I :设定一个日期( Date )所加上的一段期间的单位。
譬如 interval= "d" 表示 N的单位为日。
I的设定值如下:yyyy Year 年q Quarter 季m Month 月d Day 日w Weekday 星期h Hour 时n Minute 分s Second 秒N :数值表达式,设定一个日期所加上的一段期间,可为正值或负值,正值表示加(结果为 >date 以后的日期),负值表示减(结果为 > date 以前的日期)。
asp的常用函数用法关于asp 的常用函数用法Array()FUNCTION:返回一个数组SYNTAX:Array(list)ARGUMENTS:字符,数字均可EXAMPLE:<%DimmyArray()Fori=1to7RedimPreservemyArray(i)myArray(i)=WeekdayName(i)Next%>RESULT:建立了一个包含7个元素的数组myArraymyArray("Sunday","Monday",......"Saturday")CInt()FUNCTION:将一个表达式转化为数字类型SYNTAX:CInt(expression)ARGUMENTS:任何有效的字符均可EXAMPLE:<%f="234"response.writecINT(f)+2%>RESULT:236转化字符"234"为数字"234",如果字符串为空,则返回0值CreateObject()FUNCTION:建立和返回一个已注册的ACTIVEX组件的实例。
SYNTAX:CreateObject(objName)ARGUMENTS:objName是任何一个有效、已注册的ACTIVEX组件的名字.EXAMPLE:<%Setcon=Server.CreateObject("ADODB.Connection")%>RESULT:CStr()FUNCTION:转化一个表达式为字符串.SYNTAX:CStr(expression)ARGUMENTS:expression是任何有效的表达式。
EXAMPLE:<%s=3+2response.write"Theresultis:"&cStr(s)%>RESULT:转化数字“5”为字符“5”。
ASP语法基础1.1 VBScript语法简介由于本文主要使用VBScript编写ASP脚本,因此在这一节中主要介绍VBSc ript的一些简单语法,这些语句对于编写一个简单的论坛来说已经足以胜任了。
如果你了解VB的语法就请跳过这一节,因为本节涉及的语法决不会比你所学的更多;如果你曾经学习过任一种语言,那么本节只需简单的浏览即可,因为下面这些VBScript语法与你所学的语言中相应语法是类似的;如果你是个初学者,不要担心,VBScript是只要认字就能理解的简单工具。
(1)条件判断语句IF:句法:if [条件式1] then[语句块1]elseif [条件式2] then[语句块2]......(n次)else[语句块n+1]end ifBASIC是相当易用的,我们从它的IF语句就很容易看出这一点。
如同其它任何一种语言,条件式中主要是对于表达式值的判断,主要包括相等(=)、大于(>)、小于(<)、大于等于(>=)、小于等于(<=)和不等(<>),对于BOOL型的变量,判断为真(TRUE)只要直接用[变量名]作为判断式即可,为假(FALSE)只要使用[not变量名]进行判断。
不同的判断条件之间可以使用and/or连接,and类似于C语言中的&&,表示同时满足and左右两边的条件;or类似于||,表示或者满足or 左侧的条件或满足其右侧的条件均可视为判断成立。
对于各种判断符号的使用我们将在后面的实际应用中进一步讲解。
elseif语句在其它许多种语言中是不存在的(如被广泛使用的C语言),elseif的作用正如其字面的意义,是在所有不满足上一次判断要求的剩余情况中进行进一步的分类判断,它所使用的判断和if是一致的。
elseif的使用虽然感觉上很像switch语句,但在实际的使用中还是能够感觉到一些不同的,在后面遇到使用它的时候再详细地介绍。
else的作用于其它语言中的else一样,表示对于不满足判断条件的情况进行的处理(如果使用了elseif就表示对所有判断都不满足时所进行的处理)。
ASP语法大全语句Call[call] name [argumentlist]把控制转移到函数或子程序。
当调用函数或子程序时,Call是可写可不写的。
但是如果你用了Call,那么argumentlist必须用括号括起来。
Const[Public | Private] Const constantname=expression用于申明常数。
你可以在一行里申明多个常数,此时你必须用逗号把常数赋值语句隔开。
DimDim varname[ ( [subscripts])][, varname [( [subscripts])]...创建一个新变量并且分配存储空间。
DO . . . LOOP语法 1:Do [{While | Until } condition ][statements][Exit Do][statements]LOOP语法 2:Do[statements][Exit Do][statements]LOOP [{While | Until } condition ]当条件condition为真时或直到条件condition为真时,两种形式都重复执行语句。
EraseErase array清理数组,对于固定长度的数组,重新初始化元素;对于动态数组,重置存储空间。
ExitExit Do退出一个 DO . . . LOOP 循环。
Exit For退出一个 For . . . Next 循环或For Each . . . Next循环。
Exit Function退出一个函数。
Exit Sub退出一个子程序。
For . . . NextFor counter = start To End [Step step][statements][Exit For][statements]Next由loop 计数器指定的次数重复执行statements语句群。
For Each . . . NextFor Each element In group[statements][Exit For][statements]Next [element]对于每一个在数组或集合中的元素,重复执行statements语句群。
asp教程ASP(Active Server Pages)是一种服务器端脚本语言,它主要用于动态网站的开发。
它具有易学易用的特点,同时也是一种功能强大且广泛应用的技术。
在本教程中,将为你介绍ASP的基本概念、语法和常用技巧。
第一部分:ASP概述(100字)ASP是一种由微软公司开发的服务器端脚本语言,它可以在HTML页面中嵌入,用于生成动态网页内容。
通过使用ASP,我们可以在网页中嵌入脚本代码,实现动态数据的展示和交互。
第二部分:ASP语法(200字)在ASP中,我们可以使用VBScript或JavaScript来编写脚本代码。
下面是一些常用的ASP语法要点:- 使用<% %>标签来定义ASP代码块,在其中可以编写要执行的程序逻辑。
- 使用Response对象来向客户端发送输出,例如:Response.Write("Hello, World!")。
- 使用Server对象来操作服务器端资源,例如:Server.MapPath("文件路径")可以获取文件在服务器上的物理路径。
- 使用Request对象来获取客户端传递的请求参数和数据,例如:Request.QueryString("参数名")可以获取URL中的参数值。
- 可以使用条件语句、循环语句以及函数和子过程来实现程序的逻辑控制和复用。
第三部分:ASP应用(300字)ASP广泛应用于Web开发领域。
通过使用ASP,我们可以轻松地实现动态网页内容的生成和更新。
例如,我们可以使用ASP连接数据库,从数据库中获取数据,并将其显示在网页中。
同时,ASP还可以接收来自客户端的表单数据,并进行处理和验证。
此外,ASP还可以用于处理用户认证、文件上传、电子邮件发送等常见的Web开发任务。
第四部分:ASP常用技巧(300字)在使用ASP进行开发时,我们还可以运用一些技巧来提高开发效率和代码质量。
asp循环语句总结asp的循环语句有以下⼏类:循环语句的作⽤就是重复执⾏程序代码,循环可分为三类:⼀类在条件变为“假”之前重复执⾏语句,⼀类在条件变为“真”之前重复执⾏语句,另⼀类按照指定的次数重复执⾏语句。
在VBScript 中可使⽤下列循环语句:Do...Loop: 当(或直到)条件为“真”时循环。
While...Wend: 当条件为“真”时循环。
For...Next: 指定循环次数,使⽤计数器重复运⾏语句。
For Each...Next: 对于集合中的每项或数组中的每个元素,重复执⾏⼀组语句。
现在看⼏个例⼦:<body>do while....loop<br /><%'do while....loop 类似.net中的while(){}i=6Do while i < 10response.Write(i&"<br>")i=i+1Loop%>do ....loop until<br /><%'do while....loop 类似.net中的while(){}i=6Doresponse.Write(i&"<br>")i=i+1Loop until i < 10%>while....wend <br /><%i=10while i<20response.Write(i&"<br>")i=i+1wend%>For...Next<br /><%for i=0 to 10 ' 包括0到10response.Write(i&"<br>")if i=5 thenexit forend ifnext%>For.....each....next<br /><%dim array(3)array(1)="A"array(2)="B"array(3)="C"for each a in arrayresponse.Write(a&"<br>")next%></body></html>从数据库读取数据<%while not rs.eof%><li><a href="#"><%=rs("classname")%></a></li><%rs.movenextwend%>以上就是asp循环语句⼩结,希望对⼤家掌握asp循环语句有所帮助。
asp教程ASP(Active Server Pages)是一种由Microsoft开发的服务器端技术,用于动态生成和交互式网页。
下面是ASP的一些基本概念和用法。
1. ASP基本语法ASP使用尖括号 "<%" 和 "%>" 标记来包围服务器端代码。
例如:```asp<%Response.Write "Hello, World!"%>```2. 变量和数据类型在ASP中,可以使用 "Dim" 关键字声明变量,并指定其数据类型。
常用的数据类型包括字符串(String)、整数(Integer)、浮点数(Double)等。
3. 条件语句和循环语句ASP支持常见的条件语句和循环语句,例如if语句、for循环和while循环等。
通过这些语句,可以根据不同的条件执行不同的代码块,或者重复执行一段代码。
4. 表单处理在ASP中,可以通过表单来接收用户的输入,并进行相应的处理。
使用"Request.Form"对象可以获取表单数据的值,然后可以对其进行验证和处理。
5. 数据库访问ASP可以连接和操作各种类型的数据库,如Microsoft SQL Server、MySQL等。
可以使用ADO对象(ActiveX Data Objects)来执行SQL查询和更新操作。
6. 错误处理和调试对于可能发生的错误,ASP提供了一些处理方法,如使用Try-Catch块来捕获异常并进行相应的处理。
还可以通过日志记录或输出错误信息来帮助调试程序。
7. 会话管理ASP提供了会话管理功能,可以跟踪用户的访问,并在多个页面之间共享数据。
可以使用Session对象来存储和获取会话变量的值。
以上是ASP的一些基本概念和用法,通过学习和掌握这些内容,可以开始使用ASP开发动态网页和Web应用程序。
ASP常见语法1、ASP开始结束符语法:<% %>文件后缀.asp2、判断语句:判断表单传来的用户名和密码是否下确,并提示If request("username")="admin"thenResponse.write"恭喜,你已经登录成功"ElseResponse.write"对不起,您输入的用户名错误,请返回重新输入"End ifif request("name"0="admin" and request("pass")="admin"thenResponse.redirect"admim.asp"ElseResponse.redirect"login.asp"End if3、循环语句“循环显示范条数据库中记录写法:for n=1 to 6response.write rs("title")&"<br>"if not rs,eof thenexit forelsers.movenextend ifnext写法2:do while not rs.eofresponse.write rs("title")&"<br>"rs.movenextloop4、常用充量转换函数:Now()函数返回系统时间date()函数返回当前系统日期CStr(int)函数转化一个表达式为字符串CInt(string)将一个表达式转化为数字类型Trim(request("username"))函数去掉字符串左右空格Left(rs("litle"),10)函数返回字符串左边第length个字符以前的字符(含第length个字符),一般在限制新闻标题的显示长度的时候用Len(string)函数返回字符串的长度5、Access数据库连接代码方法一:db="mydata.mdb" ‘如果放在目录中,亦要写明“database/mydata.mdb"Set conn=Server.CreateObject("ADODB.Connection")connstr="provider=Microsoft.Jet.OLEDB.4.0;Data Source="& Server.MapPath(db) conn.Open connstr方法二:‘如果你的服务器采用较老版本Access驱动,请用下面连接方法db="mydats.mdb" ‘如果放在目录中,亦要写明“database/mydata.mdb"Set conn=Server.CreateObject("ADODB.Connection")connstr="driver={Microsoft Access Driver (*.mdb)};dbp=& Server.MapPath(db) conn.open connstr6、Recordset对象操作数据库语法(1)打开spl语句指定的表中的数据,把这批数据放放rs对象中取出news表中所有的数据放到rs中Set Rs=Server.CreateObject("ADODB.RecordSet")SqlStr="select*from news"Rs.Open SqlStr,conn,1,1取出news表中前6条数据放到rs中Set Rs=Server.CreateObjject("ADODB.RecordSet")SplStr="select top 6*from news"Rs.Open SqlStr,conn,1,1(2)循环显示6条st对象中存在的数据,列不显示不带边接的写法for n=1 to 6response.write rs("title")&"<br>'if not rs.eof thenexit forrs.movenextend ifnext不带连接的写法for n=1 to 6response.write"<aheref=show.asp?id=rs("id")>"&left(rs("title"),20) &"</a><br>"if not rs.eof thenexit forelsers.movenextend ifnext带连接的写法for n=1 to 6response.write"<ahref=show.asp?id=rs("id")>"&left(rs("title"),20)&"</a> <br>"if not rs.eof thenexit forrs.movenextend ifnext(3)向数据库添加一条数据代码Set Rs=Server.CreateObject("ADODB.RecordSet")SqlStr="select * from news"Rs.Open SqlStr,conn,1,3 ‘注意这里的1,3代码可以写入的打开数据表Rs.addnewRs("title")=trim(request("title"))Rs("neirong")=request("neirong")Rs("date")=now()rs.updae ‘真正写入数据库(4)修改一条记录的代盛开,通过(2)中的连接传递过来了id数值Set Rs=Server.CreateObject("ADODB.RecordSet")SqlStr="select * from news where id="&request("id")Rs.Open SplsStr,conn,1,3 ‘注意这里的1,3代表可以写入的打开数据表Rs("neirong")=request("neirong")Rs("date")=now()rs.update ‘真正写入数据库(5)删除数据库中一条记录,通过连接传递过来了数据得id数值Set Rs=Server.CreateObject("ADODB.RecordSet")SqlStr='select * from news where id="&repuedt("id")Rs.Open SqlStr,conn,1,3 ‘注意这里的确良,3代表可以写入的打开数据表rs.delete ‘删除该条数据7、标准Sql语句写法包括取全部记录Set Rs=Server.CreateObject("ADODB.RecordSet")Splstr="select * from news"Rs.Open SplStr,conn,1,1 ‘运行sql语句,把数据提出到rs对象中选取几条数据Set Rs=Server.CreateObject("ADODB.RecordSet")SqlStr="select top 6 * from nows"Rs.Open Sqlstr,conn, 1,1 ‘运行sql语句,把6条数据提出到rs对象中选取一条指定表中id字段数值的数据Set Rs=Server.CreateObject("ADODB.RecordSet")SqlStr="select top 6 * from news"Rs.Open SqlStr,conn,1,1 ‘运行Sql语句,把6条数据提出到rs 对象中选取一条指定表中id字段数值的数据Set Rs=Server.CreateObject("ADODB.RecordSet")SqlStr="select * from news where id="&request("id")Rs.Open SqlStr,conn,1,1 ‘运行Sql语句,把6条数据提出到rs对象中添回一条表单传过来的数据替换Set Rs=Server.CreateObject("ADODB.RecordSet")SqlStr="insert into news(title, neirong) values(request("title"),request("neirong"))修改一条指定表中id字段数值的数据,用表单传过来的数据替换Set Rs=Server.CreateObject("ADODB.RecordSet")SqlStr="update news set title='"&request("title")&"',neirong='"&request("内容")&"'where id="&re[iest("id")Rs.Open SqlStr,conn,1,3 '运行Sql语句,把数据提出到rs对象中删除一条指定表中id字段数值数据Set Rs=Server.CreateObject("ADODB.RecordSet")SqlStr="delete from news where id="L&request("id")Rs.Open SqlStr,conn,1,3 '运行Sql语句,把数据提出到rs对象中删除一条指定表中id字段数值的数据Set Rs=Server.CreateObject("ADODB,RecordSet")SqkStr="dekete from news where id="&request("id")Rs.Open SqlStr,conn,1,3 '运行Sql语句,把数据提出到rs对象8 当点击按钮时侯表单带着的数据传送到哪个文件,在哪里指定?<from method="post" action="addsave.asp"><input type="text" name="title"><input type="text" name="neirong"><input type="submit" name="Submit"value="提交"></from>9 表单提交来的数据接收并显示到屏幕上的代码response.write request("name")response.write trim(request("nane"))10 利用Application对象作为计数器的语法在网页的头部加入Application.lockApplication("counter")=Application("counter")+1Application.Unlock在需要显示计数内容的网页的地方,加入下面的语句response.write Application("counter")11 利用Session对象保护后台管理页面admin.asp,防止未登陆用户进入在网站后台网页admin.asp的头部加入下面的代码if session(admin)<>"ok" thenresponse.redirect"login.asp"response.endend if在网站后台登陆页的密码验证部分标准写法AdmName=Request.Form("Name")AdmName=Request.Form("Pass")Set Rs=Server.GreateObject("ADODB,RecordSet")SqlStr="Select*from Admin where name='"&AdmName&"'and pass='"&AdmPass&"'"Rs.Open SqlStr,conn,1,3if RS.EOF AND RS.BOF thenResponse.Redirect("login.asp")response.endelsesession(admin)<>"ok"Response.Redirect("admin.asp")response.endend if12 分页代码sql="select........................省略了Sql语句Set rs=Server.CreateObject("ADODB,RecordSet")rs.Open sql,conn, 1,1if not rs.eof thenpages=30 '定义每页面显示的记录数rs.pageSize=pages '定义每页显示的记录数allPags=rs.pageCount '计算一共能分多少页page=Request.QueryString("page") '通过浏览器传递的页数'if语句属于基本的排错处理if isEmpt(page) or Cint(page)<1 thenpage=1elseif Cint(page)>allPage thenpage=allpgesend ifrs.absolutePage=pageDo while not rs.eof and pages>0'这里输出你要的内容...............pages=pages-1rs.MoveNextLoopelseResponse.Write("数据库暂无内容!")End ifrs.closeSet rs=Nothing分页页码连接和跳转页码程序<form Action="v3.asp"Method="GET"><%If page<>1 thenResponse.Write"<A HREF=?Page=1>第一页</A> "Response.Write"<A HREF=?Page"&(Page-1)&">上一页</A> "End IfIF Pag<>rs.PageCount ThenResponse.Write"<A HREF=?Page"&(Page+1)&">下一页</A> "Response.Write"<A HREF=?Page"& rs.PageCount &">最后一页</A> "End If%><p>输入页数:<input TYPE="TEXT" Name="Page"SIZE="3"> 页数:<font COLOR="Red"><%=Pege%>/<%=rs.pageCount%></font></P></form>13 分行列显示图片和产品名称的代码(4列*3行=12个)<%Set Rs=Server.CreateObject('ADODB.RecordSet")SqlStr=" select top 12*from myproduct"Rs.Open SqlStr,conn,1,1i=1%><table width="90%" border="1" cellspacing="0" sellpadding="0'. <tr><%do while not rs.eof%><td align="center"><img src="<%=rs("imgurl")%>"width="52"height="120"><br> <%=rs("productname")%></td><%if i mod 4=0 then response.write"</tr><tr>"i=i+1rs.movenextlooprs.close%></tr></table>十四、ASP数据库连接之ACCESS-SQLSERVER<%IsSqlDsta=0 定义数据库类别,0为Assess数据库,1为SQL 数据库If IsSqlData=0 ThenAccess数据库datapath ="data/" 数据库目录的相对路径datafile ="data.mdb" 数据库的文件名connstr=Provider=Microsoft.Jet.OLEDB.4.0;Data"Source="&Server.MapPath(""&datapath&""&datafile&"")"Connstr="DBQ"=&server.mappath(""&datapath&""&datafile&"")&";DR IVER={Microsoft Access Driver(*.mdb)};"]ElseSQL数据库SqlLocalName ="(loca)" 连接IP[本地用(local)外地用IP]SqlUsername ="sa" 用户名SqlPassword ="1" 用户密码SqlDatabaseName="date" 数据库名ConnStr="Provider=Sqloledb;User ID="&SqlUsername & ";Password="&SqlPassword&";InitialCatalog="&SqlDatabaseName&";Data Source="&SqlLocaalName&";"END IFOn Error Resume NextSet conn=Server.CreateObject("ADODB.Connection")conn.open ConnStrIf Err Thenerr.ClearSet Conn=NothingResponse.Write"数据库连接出错,请检查连接字串"Response.EndEnd IfOn Error GoTO 0%>ASP与Access数据库连接:dim conn,mdbfilemdbfile=server.mappath("数据库名称.mdb")set conn=server.createobject("adodb.connection")conn.open "driver={microsoft access driver (*.mdb)};uid=admin;pwd=数据库密码;dbq="&mdbfile2. ASP与SQL数据库连接:dim connset conn=server.createobject("ADODB.connection")con.open "PROVIDER=SQLOLEDB;DATA SOURCE=SQL服务器名称或IP地址;UID=sa;PWD=数据库密码;DATABASE=数据库名称建立记录集对象:set rs=server.createobject("adodb.recordset")rs.open SQL语句,conn,3,23. SQL常用命令使用方法:(1) 数据记录筛选:sql="select * from 数据表where 字段名=字段值order by 字段名"sql="select * from 数据表where 字段名like ‘%字段值%‘order by 字段名"sql="select top 10 * from 数据表where 字段名order by 字段名"sql="select * from 数据表where 字段名in (‘值1‘,‘值2‘,‘值3‘)"sql="select * from 数据表where 字段名between 值1 and 值2"(2) 更新数据记录:sql="update 数据表set 字段名=字段值where 条件表达式"sql="update 数据表set 字段1=值1,字段2=值2 ……字段n=值n where 条件表达式"(3) 删除数据记录:sql="delete from 数据表where 条件表达式"sql="delete from 数据表" (将数据表所有记录删除)(4) 添加数据记录:sql="insert into 数据表(字段1,字段2,字段3 …) valuess (值1,值2,值3 …)"sql="insert into 目标数据表select * from 源数据表" (把源数据表的记录添加到目标数据表)(5) 数据记录统计函数:A VG(字段名) 得出一个表格栏平均值COUNT(*|字段名) 对数据行数的统计或对某一栏有值的数据行数统计MAX(字段名) 取得一个表格栏最大的值MIN(字段名) 取得一个表格栏最小的值SUM(字段名) 把数据栏的值相加引用以上函数的方法:sql="select sum(字段名) as 别名from 数据表where 条件表达式"set rs=conn.excute(sql)用rs("别名") 获取统的计值,其它函数运用同上。
ASP入门简单教材<%语句……%><2>定义变量dim语句<%dim a,ba=10b=”ok!”%>注意:定义的变量可以是数值型,也可以是字符或者其他类型的<3>简单的控制流程语句1. If 条件1 then语句1elseif 条件2 then语句2else语句3endif2.while 条件语句wend3.for count=1 to n step m语句1exit for语句2next二.ASP数据库简单*作教程<1>.数据库连接(用来单独编制连接文件conn.asp)<%Set conn = Server.CreateObject("ADODB.Connection")conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("\bbs\db1\user.mdb")%>(用来连接bbs\db1\目录下的user.mdb数据库)<2>显示数据库记录原理:将数据库中的记录一一显示到客户端浏览器,依次读出数据库中的每一条记录如果是从头到尾:用循环并判断指针是否到末使用: not rs.eof如果是从尾到头:用循环并判断指针是否到开始使用:not rs.bof<!--#include file=conn.asp--> (包含conn.asp用来打开bbs\db1\目录下的user.mdb数据库) <%set rs=server.CreateObject("adodb.recordset") (建立recordset对象)sqlstr="select * from message" ---->(message为数据库中的一个数据表,即你要显示的数据所存放的数据表)rs.open sqlstr,conn,1,3 ---->(表示打开数据库的方式)rs.movefirst ---->(将指针移到第一条记录)while not rs.eof ---->(判断指针是否到末尾)response.write(rs("name")) ---->(显示数据表message中的name字段)rs.movenext ---->(将指针移动到下一条记录)wend ---->(循环结束)------------------------------------------------------rs.closeconn.close 这几句是用来关闭数据库set rs=nothingset conn=nothing-------------------------------------------------------%>其中response对象是服务器向客户端浏览器发送的信息<3>增加数据库记录增加数据库记录用到rs.addnew,rs.update两个函数<!--#include file=conn.asp--> (包含conn.asp用来打开bbs\db1\目录下的user.mdb数据库) <%set rs=server.CreateObject("adodb.recordset") (建立recordset对象)sqlstr="select * from message" ---->(message为数据库中的一个数据表,即你要显示的数据所存放的数据表)rs.open sqlstr,conn,1,3 ---->(表示打开数据库的方式)rs.addnew 新增加一条记录rs("name")="xx" 将xx的值传给name字段rs.update 刷新数据库------------------------------------------------------rs.closeconn.close 这几句是用来关闭数据库set rs=nothingset conn=nothing-------------------------------------------------------%><4>删除一条记录删除数据库记录主要用到rs.delete,rs.update<!--#include file=conn.asp--> (包含conn.asp用来打开bbs\db1\目录下的user.mdb数据库) <%dim nameset rs=server.CreateObject("adodb.recordset") (建立recordset对象)sqlstr="select * from message" ---->(message为数据库中的一个数据表,即你要显示的数据所存放的数据表)rs.open sqlstr,conn,1,3 ---->(表示打开数据库的方式)-------------------------------------------------------while not rs.eofif rs.("name")=name thenrs.deleters.update 查询数据表中的name字段的值是否等于变量name的值"xx",如果符合就执行删除,else 否则继续查询,直到指针到末尾为止rs.movenextemd ifwend------------------------------------------------------------------------------------------------------------rs.closeconn.close 这几句是用来关闭数据库set rs=nothingset conn=nothing-------------------------------------------------------%><5>关于数据库的查询(a) 查询字段为字符型<%dim user,pass,qq,mail,messageuser=request.Form("user")pass=request.Form("pass")qq=request.Form("qq")mail=request.Form("mail")message=request.Form("message")if trim(user)&"x"="x" or trim(pass)&"x"="x" then (检测user值和pass值是否为空,可以检测到空格)response.write("注册信息不能为空")elseset rs=server.CreateObject("adodb.recordset")sqlstr="select * from user where user='"&user&"'" (查询user数据表中的user字段其中user字段为字符型)rs.open sqlstr,conn,1,3if rs.eof thenrs.addnewrs("user")=userrs("pass")=passrs("mail")=mailrs("message")=messagers.updaters.closeconn.closeset rs=nothingset conn=nothingresponse.write("注册成功")end ifrs.closeconn.closeset rs=nothingset conn=nothingresponse.write("注册重名")%>(b)查询字段为数字型<%dim numnum=request.Form("num")set rs=server.CreateObject("adodb.recordset")sqlstr="select * from message where id="&num (查询message数据表中id字段的值是否与num 相等,其中id为数字型)rs.open sqlstr,conn,1,3if not rs.eof thenrs.deleters.updaters.closeconn.closeset rs=nothingset conn=nothingresponse.write("删除成功")end ifrs.closeconn.closeset rs=nothingset conn=nothingresponse.write("删除失败")%><6>几个简单的asp对象的讲解response对象:服务器端向客户端发送的信息对象,包括直接发送信息给浏览器,重新定向URL,或设置cookie值request对象:客户端向服务器提出的请求session对象:作为一个全局变量,在整个站点都生效server对象:提供对服务器上方法和属性的访问(a) response对象的一般使用方法比如:<%resposne.write("hello, welcome to asp!")%>在客户端浏览器就会看到hello, welcome to asp! 这一段文字<%response.Redirect("")%>如果执行这一段,则浏览器就会自动连接到“搜狐”的网址关于response对象的用法还有很多,大家可以研究研究request对象的一般使用方法比如客户端向服务器提出的请求就是通过request对象来传递的列如:你在申请邮箱的所填写的个人信息就是通过该对象来将你所填写的信息传递给服务器的比如:这是一段表单的代码,这是提供给客户填写信息的,填写完了按“提交”传递给request.asp文件处理后再存入服务器数据库<form name="form1" method="post" action="request.asp"><p><input type="text" name="user"></p><p><input type="text" name="pass"></p><p><input type="submit" name="Submit" value="提交"></p></form>那么request.asp该如何将其中的信息读入,在写入数据库,在这里就要用到request对象了,下面我们就来分析request.asp的写法<%dim name,password (定义user和password两个变量)name=request.form(“user”) (将表单中的user信息传给变量name)password=request.form(“pass”) (将表单中的pass信息传给变量password)%>通过以上的几句代码我们就将表单中的数据读进来了,接下来我们要做的就是将信息写入数据库了,写入数据库的方法上面都介绍了,这里就不一一复述了[ Last edited by 流烟回眸on 2005-7-26 at 13:53 ]【分享】asp论坛制作(初学的好东西)前言:现在网上的论坛到处都有,但不知您是否遇到过这样的情况:在杂乱无章的讨论信息中来寻找自己想要的内容,是一件很费费时费力的事情,到后来,您就都不想去看什么论坛了。
ASP中if语句、select、while循环的使⽤⽅法<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%><!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "/TR/xhtml1/DTD/xhtml1-transitional.dtd"> <html xmlns="/1999/xhtml"><head><meta http-equiv="Content-Type" content="text/html; charset=gb2312" /><title><%="页⾯标题"%></title></head><body><%="多条件判断"%><%response.Write("<br />")response.Write("利⽤response对象的Write⽅法输出地内容!")%><br /><%dim a,ba=200b=300response.Write("两数之和为:")response.Write(a+b)response.Write("<br />")if a=100 thenresponse.Write("a=100,第⼀个条件满⾜。
")elseif a=200 thenresponse.Write("a=200,第⼆个条件满⾜。
ASP语法大全.txt我的优点是:我很帅;但是我的缺点是:我帅的不明显。
什么是幸福?幸福就是猫吃鱼,狗吃肉,奥特曼打小怪兽!令堂可是令尊表姐?我是胖人,不是粗人。
ASP 语法大全语句Call[call] name [argumentlist]把控制转移到函数或子程序。
当调用函数或子程序时,Call是可写可不写的。
但是如果你用了Call,那么argumentlist必须用括号括起来。
Const[Public | Private] Const constantname=expression用于申明常数。
你可以在一行里申明多个常数,此时你必须用逗号把常数赋值语句隔开。
DimDim varname[ ( [subscripts])][, varname [( [subscripts])]...创建一个新变量并且分配存储空间。
DO . . . LOOP语法 1:Do [{While | Until } condition ][statements][Exit Do][statements]LOOP语法 2:Do[statements][Exit Do][statements]LOOP [{While | Until } condition ]当条件condition为真时或直到条件condition为真时,两种形式都重复执行语句。
EraseErase array清理数组,对于固定长度的数组,重新初始化元素;对于动态数组,重置存储空间。
ExitExit Do退出一个 DO . . . LOOP 循环。
Exit For退出一个 For . . . Next 循环或For Each . . . Next循环。
Exit Function退出一个函数。
Exit Sub退出一个子程序。
For . . . NextFor counter = start To End [Step step][statements][Exit For][statements]Next由loop 计数器指定的次数重复执行statements语句群。
ASP基础语法(ASPSyntax)ASP基础语法 (ASP Syntax)ASP基础语法一个 ASP 文件和一般 HTML 文件很相似,都包含有 HTML 的标签(tags),但是不同的是,ASP 文件中还包含有服务器端脚本(server-side script)。
在 ASP 文件中,用<%来标志服务器端脚本的开始,用%>来标志服务器端脚本的结束。
比如,在 ASP 里定义并输出一个变量:<%Dim vNamevName = "站长站站长书库 "%>ASP输出语法在 ASP 文件中,用 Response.Write 显示输出结果。
见下面的示例代码:<html><head><title>ASP输出语法:使用Response.Write</title></head><body><%Response.Write("站长站站长书库 ")%></body></html>下面的 ASP 代码示例演示如何输出带 HTML 格式的文本。
<% response.write("<h2>站长站站长书库</h2>") %><% response.write("<p style='color:red'>/html</p>") %>除了Response.Write 以外,还可以用另外一个简写的方式表示输出,就是用<%=。
见下面的代码示例:<%= "站长站站长书库 " %>ASP 脚本语言设定ASP 的缺省脚本语言是 VBScript 。
VBScript 是编写 ASP 最合适的脚本语言。
除了VBScript 之外,你还可以用其它的脚本语言编写ASP 网页。
ASP基本的语法规则ASP基本的语法规则ASP语法有哪些基本规则?通常情况下,ASP 文件包含 HTML 标签,类似 HTML 文件。
不过,ASP 文件也能够包含服务器端脚本,这些脚本被分隔符 <% 和 %> 包围起来。
服务器脚本在服务器上执行,可包含合法的表达式、语句、或者运算符。
向浏览器写输出response.write 命令用来向浏览器写输出。
下面的例子向浏览器传送了一段文本:"Hello World"。
<html><body><%response.write("Hello World!")%></body></html>还有一种 response.write 命令的简写方法。
下面的例子和上面的例子是等效的:<html><body><%="Hello World!"%></body></html>在 ASP 中使用 VBScript你可以在ASP 中使用若干种脚本语言。
不过,默认的脚本语言是VBScript:<html><body><%response.write("Hello World!")%></body></html>上面的例子向文档的 body 部分写入了文本 "Hello World!"。
在 ASP 中使用 JavaScript如果需要使用JavaScript 作为某个特定页面的默认脚本语言,就必须在页面的顶端插入一行语言设定:<%@ language="javascript"%><html><body><%Response.Write("Hello World!")%></body></html>注意:与 VBScript 不同 - JavaScript 对大小写敏感。
ASP语法大全语句Call[call] name [argumentlist]把控制转移到函数或子程序。
当调用函数或子程序时,Call是可写可不写的。
但是如果你用了Call,那么argumentlist必须用括号括起来。
Const[Public | Private] Const constantname=expression用于申明常数。
你可以在一行里申明多个常数,此时你必须用逗号把常数赋值语句隔开。
DimDim varname[ ( [subscripts])][, varname [( [subscripts])]...创建一个新变量并且分配存储空间。
DO . . . LOOP语法 1:Do [{While | Until } condition ][statements][Exit Do][statements]LOOP语法 2:Do[statements][Exit Do][statements]LOOP [{While | Until } condition ]当条件condition为真时或直到条件condition为真时,两种形式都重复执行语句。
EraseErase array清理数组,对于固定长度的数组,重新初始化元素;对于动态数组,重置存储空间。
ExitExit Do退出一个 DO . . . LOOP 循环。
Exit For退出一个 For . . . Next 循环或For Each . . . Next循环。
Exit Function退出一个函数。
Exit Sub退出一个子程序。
For . . . NextFor counter = start To End [Step step][statements][Exit For][statements]Next由loop 计数器指定的次数重复执行statements语句群。
For Each . . . NextFor Each element In group[statements][Exit For][statements]Next [element]对于每一个在数组或集合中的元素,重复执行statements语句群。
Function[Public | Private] Function name [(arglist)][statements][name=expression][Exit Function][statements][name=expression]End Function定义一个函数,指明函数名,参数及代码。
If . . . Then . . . Else语法1:If condition Then statements [Else elsestatements]语法2:If condition Thenstatements[ElseIf condition-n Then[elseifstatements]] . . .[Else[elsestatements]]End If两种格式都条件执行一系列语句。
On ErrorOn Error Resume Next当一个错误发生时,这条语句就执行紧*发生错误语句后面的语句,或者执行紧*调用进程后面的语句。
Option ExplicitOption Explicit在使用变量之前强制明确定义该变量,可以用Dim,Private,Public或 ReDim语句定义变量。
PrivatePrivate varname[([下标])][, varname[([下标])] . . .创建私有变量并且分配存储空间。
(私有变量只能在定义该变量的脚本中可用)PublicPublic varname[([下标])][, varname[([下标])] . . .创建公有变量并且分配存储空间。
(公有变量在程序的任何地方均可使用)RandomizeRandomize [number]给Rnd函数的随机数发生器一个新种子值。
ReDimReDim [Preserve] varname(subscripts)[, varname(subscripts)] . . .修改维的下标,大小;或重置动态数组的大小。
Preserve 保护已存数组的数据。
Rem语法1:Rem comment语法2:‘comment这两种语句形式都能使注释的句子不被处理。
如果Rem和其它语句在同一行上,Rem 语句必须在后且二者之间必须用冒号隔开。
Select CaseSelect Case testexpression[Case expressionlist-n[statements-n]] . . .[Case Else expressionlist-n[elsestatements-n]]End Select如果某一个expressionlist 和testexpression 匹配,则执行和expressionlist对应的语句;如果没有一个expressionlist 和testexpression 相匹配,则执行和Case Else 相对应的语句。
SetSet obectvar= {objectexpression | Nothing}赋予一个变量或一个性质对象引用。
当赋予的值为Nothing 时,使obectva 和任何以前指明的对象解除关系。
Sub[Public | Private] Sub name [(arglist)][statements][Exit Sub][statements]End Sub定义一个子程序,指明名称,参数及代码。
While . . . WendWhile condition[statements][color=Maroon]Wend不停地连续执行语句statements 直到条件condition为True。
-------------------------------------------------------1.允许使用VBscript或Javascript简易Script语言,并可在文件中结合Html;2.无需编译,由WEBserver执行产生;3.与任何ActiveX Script兼容;4.ASP原始代码不会传到客户端,客户端显示的是执行结果。
<Form>表单语法:<Form name="StrName" id="StrId" action="" method="post/get">content</Form>;<Input>类型:<input type=text name="StrName" value="StrValue" size="num" maxlength="num" [disable]>;<input type=password name="StrName" value="StrValue">;<input type=radio name="StrName" value="StrValue" [checked]>;<input type=checkbox name="StrName" value="StrValue" [checked]>;<INPUT type=file NAME="StrName" SIZE="20"><input type=hidden name="StrName" value="StrValue"><input type="submit" name="StrName" value="StrValue"><input type="reset" name="StrName" value="StrValue"><input type="button" name="StrName" value="StrValue"><select name="StrName" [multiple]><option value="StrValue" selected>text[<option>n]</select><textarea name="StrName" rows="num" cols="num">text</textarea><frameset>语法:<frameset rows/cols="num,num/*.."><frame name="StrName" src="StrSrc">[<frame>n [<frameset>..</frameset>]]</frameset><noframe><body>warning!</body></noframe> 无框架提示;控制框架内容:<a href="StrSrc" target="StrFrameName"> 就可以了。
用JavaScript: Document.frame.StrFrameName.Location="StrSrc";VBscript常用函数:1.数值型函数:abs(num): 返回绝对值sgn(num): num>0 1; num=0 0; num<0 -1;判断数值正负hex(num): 返回十六进制值直接表示:&Hxx 最大8位oct(num): 返回八进制值直接表示:&Oxx 最大8位sqr(num): 返回平方根 num>0int(num): 取整 int(99.8)=99; int(-99.2)=100fix(num): 取整 fix(99.8)=99; fix(-99.2)=99round(num,n): 四舍五入取小数位 round(3.14159,3)=3.142 中点数值四舍五入为近偶取整round(3.25,1)=3.2log(num): 取以e为底的对数 num>0exp(n): 取e的n次幂通常用 num^nsin(num): 三角函数,以弧度为值计算(角度*Pai)/180=弧度con(num); tan(num); atn(num)2.字符串函数:len(str):计算字符串长度中文字符长度也计为一!mid(str,起始字符,[读取长度]):截取字符串中间子字符串left(str,nlen):从左边起截取nlen长度子字符串right(str,nlen):从右边起截取nlen长度子字符串Lcase(str):字符串转成小写Ucase(str):字符串转成大写trim(str):去除字符串两端空格Ltrim(str):去除字符串左侧空格Rtrim(str):去除字符串右侧空格replace(str,查找字符串,替代字符串,[起始字符,替代次数,比较方法]):替换字符串注:默认值:起始字符 1;替代次数不限;比较方法区分大小写(0)InStr([起始字符,]str,查找字符串[,比较方法]):检测是否包含子字符串可选参数需同时选返回起始位置InStrRev(str,查找字符串[,起始字符][,比较方法]):反向检测是否包含子字符串返回起始位置space(n):构造n个空格的字符串string(n,str):构造由n个str第一个字符组成的字符串StrReverse(str):反转字符串split(str,分割字符串[,次数][,比较方法]):以分割字符串为分割标志将字符串转为字符数组可选参数需同时选3.数据类型转换函数:Cint(str):转换正数 True -1;False 0;日期距离1899/12/31天数;时间上午段 0;下午段 1;Cstr(str):日期输出格式 yyyy/mm/dd;时间输出格式 Am/Pm hh:mm:ssClng(str):与Cin()类似Cbool(num):num不为零 True;反之 FalseCdate(str):转换日期格式 0:#Am 12:00:00#;正数距离1899/12/31天数的日期;浮点数日期+小数时间Cbyte(num):num<255 转换为字节Csng(str):转换为单精度数值Cdbl(str):转换为双精度数值Ccur(str):转换为现金格式4.时间函数:date:取系统当前日期time:取系统当前时间now:取系统当前时间及日期值 Datetime类型timer:取当前时间距离零点秒值,计时器,可计算时间差DateAdd(间隔单位,间隔值,日期):推算相邻日期DateDiff(间隔单位,日期一,日期二):计算时间差日期二-日期一Datepart(间隔单位,日期):计算日期的间隔单位值Dateserial(date):输出日期值(按序列计算)Timeserial(time):输出时间值(按序列计算)DateValue(datetime):取出字符串中日期值Timevalue(datetime):取出字符串中时间值weekday(date):计算星期几MonthName(date):输出月分名year(datetime):截取年份month(datetime):截取月份day(datetime):截取日hour(datetime):截取小时minute(datetime):截取分钟second(datetime):截取秒5.其它函数:Array(unit,..):动态生成数组Asc(str):输出字符串第一个字符的ASCII码Chr(asc):转换ASCII为字符 Enter:Chr(13)&Chr(10)Filter(数组名称,关键字符串,[,包含][,比较方法]):将字符串数组中含有关键字符串的元素存成新的数组(默认) [包含]为false则取不包含的元素Join(ArrayName):将数组中元素连成字符串Ubound(ArrayName[,维数]):取得数组相应维数的上界Lbound(ArrayName[,维数]):取得数组相应维数的下界一般为0Randmize n:启动随机数种子Rnd(n):取得随机数,n>0或为空,取序列下一随机值,n<0,随机值相同,n=0,生产与上一随机值相同的数取介于A和B之间的随机正数C,公式:C=Int((B-A+1)*Rnd+A) 条件(B>A)子程序和自定义函数Sub StrSubName Function StrFunName(arg[1],..)子程序体函数体Exit Sub 中途跳出 Exit Function 中途跳出End Sub StrFunName=Value 返回值End Function[call] StrSubName 引用子程序 Var=StrFunName(arg[1],..) 引用函数子程序和自定义函数可以递归调用;ASP六大对象常用语句示范:Response:Response.write StrVar/"String":向网页写出参数值或字符串等同于在Html标记中嵌入<%=StrVar/"String"%>Response.End:停止页面编译,并将已经编译内容输出到浏览器Response.Buffer=True&#124;False:页面编译时是否使用缓存的设置,一般在页面头部设置Response.Flush:强制输出页面已编译部分内容Response.Clear:将缓冲区内的数据清除Response.Redirect URL:停止页面编译或输出,转载指定所需页面Response.IsClientConnected:返回True&#124;False,检测用户是否还处于连接状态Response.Charset(CharsetName):设置页面编码类型,即<meta http-equiv="Content-Type" content="text/html; charset=gb2312">Response.ContentType [= ContentType ]:设置页面文件类型,同上Response.Expires [= number]:设置页面失效时间,单位分钟Response.ExpiresAbsolute [= [date] [time]]:设置页面失效的绝对时间Response.Status = StatusDescription:设置页面状态描述Request:Request("PassStrName"):读取网页传递值,包括表单及以?PassStrName=value&PassStrName_n=value_n形式Request[.collection&#124;property&#124;method](variable)Request.querystring("PassStrName"):读取Get方法传递的表单值和?PassStrName=valueRequest.QueryString(Varible)[(Index).Count]Request.form("PassStrName"):读取Post方法传递的纯表单域的值Request.Form(Parameter)[(Index).Count]Request.ServerVaribles(Server Environment Variable):读取客户端系统环境变量,详见参考Request.BinaryRead(Count):读取指定字节数的传送值Request.TotalBytes:查询体的长度,以字节为单位,只读注:同名表单如:CheckBox如有多项值,传递形式如右,StrName=value1,value2,...需要用Split函数分割各项值Multiple的Select表单与CheckBox类似,TextArea的值可包含换行字符,用Replace转为<br>,以满足格式需要Session:(用户全局变量)Session("SesName")=value:存储Session变量值,也可读取该值Session("SesName")=Empty:判断Session值是否存在的两种方法IsEmpty(Session("SesName"))=True&#124;False:判断Session值是否存在的两种方法Session.TimeOut=num:设置Session变量的存在时效,单位分钟Session.Abandon:清除所有Session变量值Session.SessionID:Session变量的ID序列号,只读Application:(应用程序全局变量)Application("AppName")=value:存储Application变量值,也可读取该值Application("AppName")=Empty:判断Application值是否存在的两种方法IsEmpty(Application("AppName"))=True&#124;False:判断Application值是否存在的两种方法Application.Lock:Application变量值锁定,防止同时更改变量值Application.UnLock:Application变量值解锁,允许更改变量值注:Session与Application变量都可以用来存储数组和系统对象,引用方法是变量名相当于数组名而已,但不能直接改变其值,需要借助临时数组修改值后,再赋给Session与Application变量Global.asa文件的结构:<% @language="VBscript"%><% Sub Application_OnStart ...End SubSub Application_OnEnd ... End SubSub Session_OnStart ...End SubSub Session_OnEnd ... End Sub%>Server:Server.MapPath("FileUrl"):映射文件名的服务器站点绝对地址,Path=Server.MapPath(./)可以得到虚拟目录根路径Server.HtmlEncode("string"):转换为可以直接显示带Html格式的字符串,如:<,>等Server.URLEncode( "string"):转换为浏览器地址编码set Var=Server.CreatObject("ObjName"):创建对象变量Server.ScriptTimeout = NumSeconds:ASP程序页面执行时限,以秒为单位Cookies: 存储在用户本机的临时变量,每个Cookie的最大字节4KB,最多可以有300个Cookie 1.2MBResponse.cookies("StrCookieName")=value:存储Cookie变量值,也可读取该值Response.cookies("StrCookieName")="":判断是否为空Response.cookies("StrCookieName").Expires=Date:变量有效期,以天为单位,小于当前时间立即失效Response.Cookies(Cookie[(key).Attribute]):标准语法ObjectContext 控制ASP的事务处理ObjectContext.OnTransactionAbort:由放弃的事务处理事件激发,在脚本完成处理后发生ObjectContext.OnTransactionCommit:由成功的事务处理事件激发,在脚本完成处理后发生ObjectContext.SetAbort:显式的放弃一次事务处理ObjectContext.SetComplete:覆盖前面任何调用ObjectContext.SetAbort方法的调用Msgbox "string"/StrName:VBscript提示框表单的Onsubmit事件:在同一页面写入Function FormName_onsubmit()..FormName_onsubmit=True/False..end Function,页面会在提交前先执行语句,并根据返回值判断是否完成提交任务。