|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
asp可以轻松地实现对页面内容的动态控制,根据不同的浏览者,显示不同的页面内容。而浏览者一点觉察不出来,就像为他专门制作的页面一样。使用各种各样的组件,asp可以完成无比强大的功能。数据|数据库数据库文件挪用的技能
(1)现实上,不管换成哪一个Access数据库,翻开数据库毗连与读取表纪录的步骤是不异的,个中的变量在于数据库文件的称号及表的称号,以是能够将上述程序的第3~13行改写成函数的情势,并存成一个文件如:ADOFunctions.asp,往后要翻开某个数据库文件的话,就把该文件ADOFunctions.asp装(include)出去,代码以下:
<%
DimobjConn
’变量Filename为数据库文件名,变量TableName为表名
FunctionGetRecordset(FileName,TableName)
’利用ASP的Connection工具翻开数据库
SetobjConn=Server.CreateObject("ADODB.Connection")
objConn.ConnectionString="Provider=Microsoft.Jet.OLEDB.4.0;"&_
"DataSource="&Server.MapPath("Filename")
objConn.Open
’读取表的纪录,然后寄存在Recordset工具"objRS"
DimobjRS
SetobjRS=Server.CreateObject("ADODB.Recordset")
ObjRS.OpenTableName,objConn,adOpenKeyset,adLockOptimistic,adCmdTable
EndFunction
%>
由上述代码可知,函数名为GetRecordSet,其前往值是寄存了表纪录的Recordset工具实例,存成文件名为ADOFunctions.asp。如今,使用该文件就能够读取任何数据库文件的纪录了。如一样平常读取数据库的编程可简化以下:
<HTML><BODY>
<!--#Includefile="adovbs.inc"-->
<!--#includefile="ADOFunctions.asp"-->
<%
’挪用GetRecordset函数获得一个Recordset工具实F例,然后指派给变量objRS
DimobjRS
SetobjRS=GetRecordset("Friend.mdb","data")
’将今朝指针所指到的纪录显现在扫瞄器上
IfNotobjRS.EOFThen
Response.Write"编号:"&objRS("编号")&"<BR>"
Response.Write"姓名:"&objRS("姓名")&"<BR>"
Response.Write"性别:"&objRS("性别")&"<BR>"
Else
Response.Write"抵达数据库的开头,已显现完一切切合前提的纪录"
EndIf
’封闭数据库毗连并开释工具实例
ObjRS.Close
SetobjRS=Nothing
ObjConn.Close
SetobjConn=Nothing
%>
</BODY></HTML>
因而,只需在这句代码SetobjRS=GetRecordset("Friend.mdb","data")中改动数据库称号和表称号就能够挪用任何Access数据库文件了,固然,要注重的是,前面的数据库中每一个表的字段名必定要婚配。
(2)别的,不管换成哪一个Access数据库,翻开数据库毗连与选择表纪录的步骤也是不异的,个中的变量在于SQL语句(如:"SELECT*FROMdata")、数据库文件的称号及表的称号。因而一样事理,能够将这3个变量作为函数的参数,撰写GetSQLRecordset函数,并存成文件名为ADOSQLFunctions.asp,往后要用到的话,只需在程序的最后面把这个文件Include出去,就能够使用GetSQLRecordset函数翻开数据库毗连,同时也举行选择表纪录,该函数的前往值是寄存了切合SQL语句的Recordset工具实例。
代码以下:
<%
DimobjConn
DimGetSQLRecordset
FunctionGetSQLRecordset(strSQL,FileName,TableName)
’利用ASP的Connection工具翻开数据库
SetobjConn=Server.CreateObject("ADODB.Connection")
objConn.ConnectionString="Provider=Microsoft.Jet.OLEDB.4.0;"&_
"DataSource="&Server.MapPath("Filename")
objConn.Open
’从表读取切合SQL语句的纪录并寄存在Recordset工具
SetGetSQLRecordset=Server.CreateObject("ADODB.Recordset")
GetSQLRecordset.Open_strSQL,objConn,adOpenKeyset,adLockOptimistic,adCmdText
EndFunction
%>
</p>ASP.NET和ASP的比较,技术上比较已经没什么可说的了.新一代在大部分程度来说当然是比旧一代好了.关键看你对所做软件的理解了.因人而定.会写的话也可能比ASP.NET写得更有效率和更方便重用 |
|