ASP编程常用的代码

1.ASP与Access数据库连接：

复制代码 代码如下:

<%

dimconn,mdbfile

mdbfile=server.mappath("数据库名称.mdb")

setconn=server.createobject("adodb.connection")

conn.open"driver={microsoftaccessdriver(*.mdb)};uid=admin;pwd=数据库密码;dbq="&mdbfile

%>

最常用的asp与access连接的字符串函数

复制代码 代码如下:

CallOpenConn

SubOpenConn()

OnErrorResumeNext

IfDataBaseType=1Then

ConnStr="Provider=Sqloledb;UserID="&datauser&";Password="&databasepsw&";InitialCatalog="&databasename&";DataSource="&dataserver&";"

Else

ConnStr="Provider=Microsoft.Jet.OLEDB.4.0;DataSource="&Server.MapPath(DBPath)

EndIf

Setconn=Server.CreateObject("ADODB.Connection")

conn.openConnStr

IfErrThenErr.Clear:Setconn=Nothing:Response.Write"数据库连接出错，请检查Conn.asp文件中的数据库参数设置。":Response.End

CollcetConnStr="Provider=Microsoft.Jet.OLEDB.4.0;DataSource="&Server.MapPath(CollectDBPath)

EndSub

2.ASP与SQL数据库连接：

<%

dimconn

setconn=server.createobject("ADODB.connection")

con.open"PROVIDER=SQLOLEDB;DATASOURCE=SQL服务器名称或IP地址;UID=sa;PWD=数据库密码;DATABASE=数据库名称

%>

建立记录集对象：

setrs=server.createobject("adodb.recordset")

rs.openSQL语句,conn,3,2

3.SQL常用命令使用方法：

(1)数据记录筛选：

sql="select*from数据表where字段名=字段值orderby字段名"

sql="select*from数据表where字段名like‘%字段值%‘orderby字段名"

sql="selecttop10*from数据表where字段名orderby字段名"

sql="select*from数据表where字段名in(‘值1‘,‘值2‘,‘值3‘)"

sql="select*from数据表where字段名between值1and值2"

(2)更新数据记录：

sql="update数据表set字段名=字段值where条件表达式"

sql="update数据表set字段1=值1,字段2=值2……字段n=值nwhere条件表达式"

(3)删除数据记录：

sql="deletefrom数据表where条件表达式"

sql="deletefrom数据表"(将数据表所有记录删除)

(4)添加数据记录：

sql="insertinto数据表(字段1,字段2,字段3…)valuess(值1,值2,值3…)"

sql="insertinto目标数据表select*from源数据表"(把源数据表的记录添加到目标数据表)

(5)数据记录统计函数：

AVG(字段名)得出一个表格栏平均值

COUNT(*|字段名)对数据行数的统计或对某一栏有值的数据行数统计

MAX(字段名)取得一个表格栏最大的值

MIN(字段名)取得一个表格栏最小的值

SUM(字段名)把数据栏的值相加

引用以上函数的方法：

sql="selectsum(字段名)as别名from数据表where条件表达式"

setrs=conn.excute(sql)

用rs("别名")获取统的计值，其它函数运用同上。

(5)数据表的建立和删除：

CREATETABLE数据表名称(字段1类型1(长度),字段2类型2(长度)……)

例：CREATETABLEtab01(namevarchar(50),datetimedefaultnow())

DROPTABLE数据表名称(永久性删除一个数据表)

(6)记录集对象的方法：

rs.movenext将记录指针从当前的位置向下移一行

rs.moveprevious将记录指针从当前的位置向上移一行

rs.movefirst将记录指针移到数据表第一行

rs.movelast将记录指针移到数据表最后一行

rs.absoluteposition=N将记录指针移到数据表第N行

rs.absolutepage=N将记录指针移到第N页的第一行

rs.pagesize=N设置每页为N条记录

rs.pagecount根据pagesize的设置返回总页数

rs.recordcount返回记录总数

rs.bof返回记录指针是否超出数据表首端，true表示是，false为否

rs.eof返回记录指针是否超出数据表末端，true表示是，false为否

rs.delete删除当前记录，但记录指针不会向下移动

rs.addnew添加记录到数据表末端

rs.update更新数据表记录

判断所填数据是数字型

ifnotisNumeric(request("字段名称"))then

response.write"不是数字"

else

response.write"数字"

endif