ASP连接Access或SQLServer数据库的终极代码
教你怎么用asp连接access数据库
教你怎么用asp连接access数据库
asp怎幺连接access数据库,或者asp连接access数据库的方法,其实很简单。
本文就是关于asp连接access数据库方面的知识,希望给您提供不一样的收获。
方法/步骤
首先新建一个access数据库。
access的版本建议是2003年版本的,没有access可以自行下载安装。
数据库的名字我们就叫db1.mdb,新建数据库表明为table_1,在表1中新建name等几个字段,并相应插入字段值
用FTP工具在虚拟服务器中新建一个mytest文件夹,将该数据库上传到mytest文件夹中
在mytest文件夹下,新建一个test.asp文件,该文件的内容如下:
set conn=Server.CREATEOBJECT(“ADODB.CONNECTION”)
DBPath = Server.MapPath(“db1.mdb”)
conn.Open “driver={Microsoft Access Driver (*.mdb)};dbq=“ & DBPath sql=“select * from table_1 order by id asc”
set rs=server.createobject(“adodb.recordset”)
rs.open sql,conn,1,1
do while not rs.eof
response.write(rs(“name”))
rs.movenext
loop。
ASP连接MSSQL和Access数据库的接口代码文库
连接MSSQL代码(附加判断代码):引用内容<%dim cnset cn=server.createobject("adodb.connection")cn.connectionstring="driver={SQLserver};server=taihang;datebase=taihang;uid=sa;pwd=hacker"cn.openIf cn.state=1 Thenresponse.write"数据库连接对象已打开"Elseresponse.write"数据库连接对象未打开"end Ifcn.closeSet cn=nothing%>连接Access常用方法:引用内容Dim conn,strDataPath,connStrset conn=server.createobject("ADODB.connection") '//定义数据库连接对象strDataPath=server.MapPath("example.mdb") '//数据库路径字符串connStr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & strDataPath '//数据库连接conn.open connStr也可以用:引用内容Dim conn,strDataPath,connStrset conn=server.createobject("ADODB.connection") '//定义数据库连接对象strDataPath=server.MapPath("example.mdb") '//数据库路径字符串connStr="driver={Microsoft Access Driver (*.mdb)};dbq=" & strDataPath '//数据库连接conn.Open connStr注解:因为我们想打开的是Access(.mdb)数据库,所以我们要透过Access的ODBC驱动程序{Microsoft Access Driver (*.mdb)}来存取数据库,dbp参数则是用来指定想打开的数据库文件,因为它必须是完整路径名称,所以我们上一语句用了Server.MapPath 函数。
ASP与ACCESS数据库建立连接(附源码)
前言:如何通过ASP与数据库建立连接是一个非常现实的问题,我尽量写得非常详细。
相信看了这篇文章相信您已经能够写出类似的比较简单和实用的程序了。
(一)数据库的选择:有许多的数据库你可以选择,SQL SERVER、ACCESS(*.mdb)、EXCEL(*.xls)、FOXPRO(*.dbf)甚至普通的文本文件(*.txt)都可以达到存储数据的功能。
那么到底选择什么数据库最合适呢?其中SQL SERVER是服务器级的,足以应付每天上万次的访问量。
对于非服务器级的数据库建议使用ACCESS97。
因为:(1)只要安装了PWS或IIS4肯定有ACCESS的ODBC驱动,即你的系统肯定支持ACCESS数据库的存取。
(2)ACCESS支持的SQL指令非常齐全。
(3)ACCESS ODBC驱动程序的效率非常高。
虽然它不是服务器级的数据库,但是作为中小型企业内部网的数据库支持还是绰绰有余的。
(4)ACCESS97在OFFICE97中就有,非常方便得到和使用。
本文就以ACCESS数据库为准介绍基于WEB的数据库存取方法。
(二)例子:我们建立一个“客户”数据库,需要保存如下的客户资料:客户名称、联络人姓名、所在城市、电话号码。
(1)首先建立ACCESS数据库customer.mdb(今后有用的)。
建立如下字段:客户名称、联络人姓名、所在城市、电话号码、客户编号、时间。
将表保存为"客户"(今后有用的,===>看看图)。
注意:建立字段时多作了2个(客户编号、时间),因为在今后排序时要用到它们。
建议今后做数据库时最好都加上这2项,不会没用的。
此外,在保存表时ACCESS会询问是否建立一个住关键字,我们不需要它所以不必建立。
还有:时间字段的"默认值"设成"now()",即去系统当时的时间。
同时将索引项设成"有(允许重复)",含义:WEB上极有可能同时存取数据,所以允许重复,索引设成"有"可以加快排序速度。
Aspnetc连接各类数据库代码共7页文档
1.C#连接连接Access程序代码:-------------------------------------------------------------------------------using System.Data;using System.Data.OleDb;..string strConnection="Provider=Microsoft.Jet.OleDb.4.0;";strConnection+=@"Data Source=C:BegASPNETNorthwind.mdb";OleDbConnection objConnection=new OleDbConnection(strConnection);..objConnection.Open();objConnection.Close();解释:连接Access数据库需要导入额外的命名空间,所以有了最前面的两条using命令,这是必不可少的!strConnection这个变量里存放的是连接数据库所需要的连接字符串,他指定了要使用的数据提供者和要使用的数据源."Provider=Microsoft.Jet.OleDb.4.0;"是指数据提供者,这里使用的是Microsoft Jet引擎,也就是Access中的数据引擎,asp就是靠这个和Access的数据库连接的."Data Source=C:\BegASPNET\Northwind.mdb"是指明数据源的位置,他的标准形式是"Data Source=MyDrive:MyPath\MyFile.MDB".PS:1."+="后面的"@"符号是防止将后面字符串中的"\"解析为转义字符.2.如果要连接的数据库文件和当前文件在同一个目录下,还可以使用如下的方法连接:strConnection+="Data Source=";strConnection+=MapPath("Northwind.mdb");这样就可以省得你写一大堆东西了!3.要注意连接字符串中的参数之间要用分号来分隔."OleDbConnection objConnection=new OleDbConnection(strConnection);"这一句是利用定义好的连接字符串来建立了一个链接对象,以后对数据库的操作我们都要和这个对象打交道. "objConnection.Open();"这用来打开连接.至此,与Access数据库的连接完成.--------------------------------------------------------------------------------2.C#连接SQL Server程序代码:--------------------------------------------------------------------------------using System.Data;using System.Data.SqlClient;..string strConnection="user id=sa;password=;";strConnection+="initial catalog=Northwind;Server=YourSQLServer;";strConnection+="Connect Timeout=30";SqlConnection objConnection=new SqlConnection(strConnection);..objConnection.Open();objConnection.Close();解释:连接SQL Server数据库的机制与连接Access的机制没有什么太大的区别,只是改变了Conn ection对象和连接字符串中的不同参数.首先,连接SQL Server使用的命名空间不是"System.Data.OleDb",而是"System.Data.SqlClient ".其次就是他的连接字符串了,我们一个一个参数来介绍(注意:参数间用分号分隔):"user id=sa":连接数据库的验证用户名为sa.他还有一个别名"uid",所以这句我们还可以写成"uid=sa"."password=":连接数据库的验证密码为空.他的别名为"pwd",所以我们可以写为"pwd=".这里注意,你的SQL Server必须已经设置了需要用户名和密码来登录,否则不能用这样的方式来登录.如果你的SQL Server设置为Windows登录,那么在这里就不需要使用"user id"和"password"这样的方式来登录,而需要使用"Trusted_Connection=SSPI"来进行登录. "initial catalog=Northwind":使用的数据源为"Northwind"这个数据库.他的别名为"Database ",本句可以写成"Database=Northwind"."Server=YourSQLServer":使用名为"YourSQLServer"的服务器.他的别名为"Data Source"," Address","Addr".如果使用的是本地数据库且定义了实例名,则可以写为"Server=(local)\实例名";如果是远程服务器,则将"(local)"替换为远程服务器的名称或IP地址."Connect Timeout=30":连接超时时间为30秒.在这里,建立连接对象用的构造函数为:SqlConnection.--------------------------------------------------------------------------------3.C#连接Oracle程序代码:--------------------------------------------------------------------------------using System.Data.OracleClient;using System.Data;//在窗体上添加一个按钮,叫Button1,双击Button1,输入以下代码private void Button1_Click(object sender, System.EventArgs e){string ConnectionString="Data Source=sky;user=system;password=manager;";//写连接串OracleConnection conn=new OracleConnection(ConnectionString);//创建一个新连接try{conn.Open();OracleCommand cmd=conn.CreateCommand();cmdmandText="select * from MyTable";//在这儿写sql语句OracleDataReader odr=cmd.ExecuteReader();//创建一个OracleDateReader对象while(odr.Read())//读取数据,如果odr.Read()返回为false的话,就说明到记录集的尾部了{Response.Write(odr.GetOracleString(1).ToString());//输出字段1,这个数是字段索引,具体怎么使用字段名还有待研究}odr.Close();}catch(Exception ee){Response.Write(ee.Message); //如果有错误,输出错误信息}finally{conn.Close(); //关闭连接}}-------------------------------------------------------------------------------4.C#连接MySQL程序代码:--------------------------------------------------------------------------------using MySQLDriverCS;// 建立数据库连接MySQLConnection DBConn;DBConn = new MySQLConnection(new MySQLConnectionString("localhost","mysql","root"," ",3306).AsString);DBConn.Open();// 执行查询语句MySQLCommand DBComm;DBComm = new MySQLCommand("select Host,User from user",DBConn);// 读取数据MySQLDataReader DBReader = DBComm.ExecuteReaderEx();try{while (DBReader.Read()){Console.WriteLine("Host = {0} and User = {1}", DBReader.GetString(0),DBReader.GetString (1));}}finally{DBReader.Close();DBConn.Close();}//关闭数据库连接DBConn.Close();--------------------------------------------------------------------------------5.C#连接IBM DB2程序代码:--------------------------------------------------------------------------------OleDbConnection1.Open();//打开数据库连接OleDbDataAdapter1.Fill(dataSet1,"Address");//将得来的数据填入dataSetDataGrid1.DataBind();OleDbConnection1.Close();//关闭连接//增加数据库数据在Web Form上新增对应字段数量个数的TextBox,及一个button,为该按键增加Click响应事件代码如下:this.OleDbInsertCommand1mandText = "INSERTsintosADDRESS(NAME,EMAIL, AGE, ADDRESS) VALUES('"+TextBox1.Text+"','"+TextBox2.Text+"','"+TextBox3.Text+"','"+TextBox4.Text+"')";OleDbInsertCommand1.Connection.Open();//打开连接OleDbInsertCommand1.ExecuteNonQuery();//执行该SQL语句OleDbInsertCommand1.Connection.Close();//关闭连接--------------------------------------------------------------------------------6.C#连接SyBase程序代码: (OleDb)--------------------------------------------------------------------------------Provider=Sybase.ASEOLEDBProvider.2;Initial Catalog=数据库名;User ID=用户名;Data Sour ce=数据源;Extended Properties="";Server Name=ip地址;Network Protocol=Winsock;Server P ort Address=5000;。
Asp连接access数据库时,报未知错误及错误码-2147467259的解决方案
Asp连接access数据库时,报未知错误及错误码-2147467259的解决方案Asp连接access数据库时,报未知错误及错误码-21474672 59的解决方案ASP程序连接access数据库的代码如下:<%set conn=server.createobject("adodb.connection")'连接数据库的方法1:使用oledbstr="provider=microsoft.jet.oledb.4.0;data source=" & server.mappath("学习.mdb")conn.open str%>结果在服务器上运行该程序时提示如下错误:err.Number显示的是-2147467259,err.Description显示的是“未知错误”迷惑了很久,当时在课堂上一直找不到原因。
之前运行其他ASP 程序都是好好的,一遇到数据库就出错了。
很尴尬,跟学生解释说服务器出了点小问题,随后我解决了再告诉大家。
硬着头皮接着讲课,其实很心虚。
一下课,猛蹬着自行车回到家中,立马上网搜索答案。
找了很久,决定下次上课试试这些方法行不行。
下次上课我提早到教室。
心说这次解决不了那以后就回机房上课好了。
结果一次就成功了!欢呼!解决方案:为”C:\Windows\T emp“目录添加用户Authenticated Users,为该用户开放所有权限。
(1)WindowsXP、Windows 2003用户请在“C:\Windows\T emp”目录添加一个有权限的“Authenticated Users”用户即可!Vista用户请在“C:\Windows\ServiceProfiles\NetworkService\AppData\Local\T emp”目录添加一个有权限的“Authenticated Users”用户即可!具体设置权限步骤:右击T emp文件夹,选择“属性”->“安全”->“编辑”->“添加”,在下面的“输入对象名称来选择”中输入Authenticated Users,确定-> 返回到“Temp 的权限”,将Authenticated Users的权限中的完全控制给勾上。
ASP连接Access数据库几种常见方法
ASP连接Access数据库几种常见方法在弹出来的“自定义连接字符串”对话框中,"连接名称"随便写一个。
“连接字符串”就要好好填写了。
当"使用此计算机上的驱动程序"时应用绝对路径:DRIVER={Microsoft Access Driver (*.mdb)};DBQ=d:\newgn\database\cnbruce.mdb否则“使用测试服务器上的驱动程序”采用Mappath转换路径:"Driver={Microsoft Access Driver (*.mdb)};DBQ="& server.mappath("/newgn/database/cnbruce.mdb")注:如果将要上传到网上去的页子就可以直接采用Mappath了点击“测试”,出现成功即爽。
附注:需要更多了解的,可以打开DW的帮助教程。
第一种连接和记录集分开声明<%db="db/darden.mdb"set conn=server.createobject("ADODB.connection")connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("" & db & "")conn.open connstr%><%set rs=server.createobject("adodb.recordset")sql="select * from ebook order by id desc"rs.open sql,conn,3,3rs.addnew............rs.update (rs.delete)rs.closeset rs=nothingconn.closeset conn=nothingresponse.write("<center><a href=viewdatabase.asp>显示文字</a></center>")Response.Redirect "homepage.asp"%>第二种连接和记录集一同声明<%set rs=server.createobject("adodb.recordset")sql="select * from ebook order by id desc"conn = "DBQ=" + server.mappath("book.mdb") + ";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"rs.open sql,conn,3,3rs.addnew............rs.update (rs.delete)rs.closeset rs=nothingresponse.write("<center><a href=viewdatabase.asp>显示文字</a></center>")%>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 namename=xxset 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(qq)=qqrs(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(删除失败)。
ASP.NETC#各种数据库连接字符串大全——SQLServer、Oracle、Access
C#各种数据库连接字符串⼤全——SQLServer、Oracle、Access 刚开始学习C#开发项⽬时,长期会为了写⼀个安全的⾼效的数据库连接发愁。
我发现现在很多刚开始学习的朋友和有些做了⼀两年的朋友,也有点犯愁,我就贴上这个代码,给⾃⼰以后做个参考,也给朋友做个学习的参考。
我主要在这⾥统计了.NET项⽬下常⽤的数据库连接字符串:SQLServer、Oracle、Access三种数据库(MySql、SQLLite、Excel、HTML Table等等暂不列⼊)。
⼀、常⽤连接字符串参数说明如需查看详细说明请参见:关键字默认描述Server 或 Data Source N/A要连接的数据库实例的名称或⽹络地址(可以在名称后指定端⼝号),指定本地实例可⽤(Local),如果是SqlExpress(名称\SqlExpress)。
Initial Catalog 或 Database N/A数据库的名称。
User ID 或 UID N/A登录帐户。
Password 或 Pwd N/A帐户登录的密码。
Persist Security Info 'false'当该值设置为 false 或 no(强烈推荐)时,如果连接是打开的或者⼀直处于打开状态,那么安全敏感信息(如密码)将不会作为连接的⼀部分返回。
重置连接字符串将重置包括密码在内的所有连接字符串值。
可识别的值为 true、false、yes 和 no。
Enlist 'false'true 表明连接池程序在创建线程的当前事务上下⽂中⾃动登记连接。
可识别的值为 true、false、yes 和 no。
Connection Lifetime 0当连接被返回到池时,将其创建时间与当前时间作⽐较,如果时间长度(以秒为单位)超出了由 Connection Lifetime 指定的值,该连接就会被销毁。
这在聚集配置中很有⽤(⽤于强制执⾏运⾏中的服务器和刚置于联机状态的服务器之间的负载平衡)。
asp连接access数据库时报未知错误及错误码-2147467259的解决方案
Asp连接access数据库时,报未知错误及错误码-2147467259的解决方案Asp连接access数据库时,报未知错误及错误码-2147467259的解决方案ASP程序连接access数据库的代码如下:<%set conn=server.createobject("adodb.connection")'连接数据库的方法1:使用oledbstr="provider=microsoft.jet.oledb.4.0;data source=" & server.mappath("学习.mdb")conn.open str%>结果在服务器上运行该程序时提示如下错误:err.Number显示的是-2147467259,err.Description显示的是“未知错误”迷惑了很久,当时在课堂上一直找不到原因。
之前运行其他ASP程序都是好好的,一遇到数据库就出错了。
很尴尬,跟学生解释说服务器出了点小问题,随后我解决了再告诉大家。
硬着头皮接着讲课,其实很心虚。
一下课,猛蹬着自行车回到家中,立马上网搜索答案。
找了很久,决定下次上课试试这些方法行不行。
下次上课我提早到教室。
心说这次解决不了那以后就回机房上课好了。
结果一次就成功了!欢呼!解决方案:为”C:\Windows\Temp“目录添加用户Authenticated Users,为该用户开放所有权限。
(1)WindowsXP、Windows 2003用户请在“C:\Windows\Temp”目录添加一个有权限的“Authenticated Users”用户即可!Vista用户请在“C:\Windows\ServiceProfiles\NetworkService\AppData\Loc al\Temp”目录添加一个有权限的“Authenticated Users”用户即可!具体设置权限步骤:右击Temp文件夹,选择“属性”->“安全”->“编辑”->“添加”,在下面的“输入对象名称来选择”中输入Authenticated Users,确定-> 返回到“Temp 的权限”,将Authenticated Users的权限中的完全控制给勾上。
ASP连接数据库的11种方法
ASP连接数据库的11种方法ASP连接数据库的11种方法——本文总结了使用ASP链接各种数据库的方法:1.Access数据库的DSN-less连接方法:set adocon=Server.Createobject("adodb.connection")adoconn.Open"Driver={Microsoft Access Driver(*.mdb)};DBQ="& _Server.MapPath("数据库所在路径")2.Access OLE DB连接方法:set adocon=Server.Createobject("adodb.connection")adocon.open"Provider=Microsoft.Jet.OLEDB.4.0;"& _"Data Source=" & Server.MapPath("数据库所在路径")3.SQL server连接方法:set adocon=server.createobject("adodb.recordset")adocon.Open"Driver={SQL Server};Server=(Local);UID=***;PWD=***;"& _"database=数据库名;"4.SQL server OLE DB连接方法:set adocon=Server.Createobject("adodb.connection")adocon.open"provider=SQLOLEDB.1;Data Source=RITANT4;"& _"user ID=***;Password=***;"& _"inital Catalog=数据库名"5.Oracle 连接方法:set adocon=Server.Createobject("adodb.connection")adocon.open"Driver={microsoft odbc for oracle};server=oraclesever.world;uid=admin;pwd=pass;"6.Oracle OLE DB 连接方法:set adocon=Server.Createobject("adodb.connection")adocon.open"Provider=OraOLEDB.Oracle;data source=dbname;user id=admin;password=pass;"7.dBase 连接方法:set adocon=Server.Createobject("adodb.connection")adocon.open"Driver={microsoft dbase driver(*.dbf)};driverid=277;dbq=------------;"8.mySQL 连接方法:set adocon=Server.Createobject("adodb.connection")adocon.open"Driver={mysql};database=yourdatabase;uid=username;pwd=yourpassword;option=16386;"9.Visual Foxpro 连接方法:set adocon=Server.Createobject("adodb.connection")adocon.open"Driver={microsoft Visual Foxpro driver};sourcetype=DBC;sourceDB=*.dbc;Exclusive=No;"10.MS text 连接方法:set adocon=Server.Createobject("adodb.connection")adocon.open"Driver={microsoft text driver(*.txt; *.csv)};dbq=-----;"&_"extensions=asc,csv,tab,txt;Persist SecurityInfo=false;"11.MS text OLE DB 连接方法:set adocon=Server.Createobject("adodb.connection")adocon.open"Provider=microsof.jet.oledb.4.0;data source=your_path;"&_"Extended Properties'text;FMT=Delimited'"<二>常用的四种SQL命令:1.查询数据记录(Select)语法:Select 字段串行From table Where 字段=内容例子:想从book表中找出作者为"cancer"的所有记录,SQL语句便如下:select * from book where author=’cancer’"*"是取出book表所有的字段,如查询的字段值为数字,则其后的"内容"便无须加上单引号,如是日期,则在Access中用(#)包括,而在SQL server中则用(’)包括,如:select * from book where id=1select * from book where pub_date=#2002-1-7# (Access)select * from boo k where pub_date=’2002-1-7’ (SQL Server)提示:日期函数to_date不是标准sql文,不是所有的数据库适用,所以大家在使用的时候要参考数据库具体语法另外如果是查询传入的变量,则如下:strau=request.form("author")strsql="select * from book where author=’"&strau&"’"如果查询的是数字,则:intID=request.form("id")strsql="select * from book where id="&intID在很多数据库中,如:oracle,上面的语句是可以写成:strsql="select * from book where id='"&intID&"'"但是字符型一定不能按照数字格式写,需要注意。
asp连接sqlserver数据库实现代码
针对比较有代表性的问题,我们整理了 asp 连接 sqlserver 数据库,希望 对此感兴趣的朋友有所参考。 通过 driver 建立连接 代码如下 Const DataBaseType=1 If DataBaseType=0 then DBPath=“/jb51/news.asp” SqlNowString = “Now()” ystr=true nstr=false suiji=“rnd(id)” Else
Байду номын сангаас
ConnStr=“driver={SQL Server};server=“&dataserver&”;UID=“&datauser&”;PWD=“ &databasepsw&”;Database=“&databasename Else ConnStr = “Provider=Microsoft.Jet.OLEDB.4.0;Data Source=“ &
‘如果是 SQL 数据库,请认真修改好以下数据库选项 DataServer = “www111cnnet” ‘数据库服务器 IP DataUser = “jb51net” ‘访问数据库用户名 DataBaseName = “jb51net” ‘数据库名称 DataBasePsw = “密码” ‘访问数据库密码 SqlNowString = “getdate()” ystr=1 nstr=0 suiji=“newid()” End if On Error Resume Next If DataBaseType = 1 Then
Server.MapPath(DBPath) End If Set conn = Server.CreateObject(“ADODB.Connection”) conn.open ConnStr If Err Then Err.Clear:Set conn = Nothing:Response.Write “数据库连接出错, 请检查 Conn.asp 文件中的数据库参数设置。”:Response.End %>; 通过 driver 建立连接 通过 driver 建立页面与数据库的连接,同样不需要创建 ODBC DSN 数据
Aspnetc连接各类数据库代码共7页文档
1.C#连接连接Access程序代码:-------------------------------------------------------------------------------using System.Data;using System.Data.OleDb;..string strConnection="Provider=Microsoft.Jet.OleDb.4.0;";strConnection+=@"Data Source=C:BegASPNETNorthwind.mdb";OleDbConnection objConnection=new OleDbConnection(strConnection);..objConnection.Open();objConnection.Close();解释:连接Access数据库需要导入额外的命名空间,所以有了最前面的两条using命令,这是必不可少的!strConnection这个变量里存放的是连接数据库所需要的连接字符串,他指定了要使用的数据提供者和要使用的数据源."Provider=Microsoft.Jet.OleDb.4.0;"是指数据提供者,这里使用的是Microsoft Jet引擎,也就是Access中的数据引擎,asp就是靠这个和Access的数据库连接的."Data Source=C:\BegASPNET\Northwind.mdb"是指明数据源的位置,他的标准形式是"Data Source=MyDrive:MyPath\MyFile.MDB".PS:1."+="后面的"@"符号是防止将后面字符串中的"\"解析为转义字符.2.如果要连接的数据库文件和当前文件在同一个目录下,还可以使用如下的方法连接:strConnection+="Data Source=";strConnection+=MapPath("Northwind.mdb");这样就可以省得你写一大堆东西了!3.要注意连接字符串中的参数之间要用分号来分隔."OleDbConnection objConnection=new OleDbConnection(strConnection);"这一句是利用定义好的连接字符串来建立了一个链接对象,以后对数据库的操作我们都要和这个对象打交道. "objConnection.Open();"这用来打开连接.至此,与Access数据库的连接完成.--------------------------------------------------------------------------------2.C#连接SQL Server程序代码:--------------------------------------------------------------------------------using System.Data;using System.Data.SqlClient;..string strConnection="user id=sa;password=;";strConnection+="initial catalog=Northwind;Server=YourSQLServer;";strConnection+="Connect Timeout=30";SqlConnection objConnection=new SqlConnection(strConnection);..objConnection.Open();objConnection.Close();解释:连接SQL Server数据库的机制与连接Access的机制没有什么太大的区别,只是改变了Conn ection对象和连接字符串中的不同参数.首先,连接SQL Server使用的命名空间不是"System.Data.OleDb",而是"System.Data.SqlClient ".其次就是他的连接字符串了,我们一个一个参数来介绍(注意:参数间用分号分隔):"user id=sa":连接数据库的验证用户名为sa.他还有一个别名"uid",所以这句我们还可以写成"uid=sa"."password=":连接数据库的验证密码为空.他的别名为"pwd",所以我们可以写为"pwd=".这里注意,你的SQL Server必须已经设置了需要用户名和密码来登录,否则不能用这样的方式来登录.如果你的SQL Server设置为Windows登录,那么在这里就不需要使用"user id"和"password"这样的方式来登录,而需要使用"Trusted_Connection=SSPI"来进行登录. "initial catalog=Northwind":使用的数据源为"Northwind"这个数据库.他的别名为"Database ",本句可以写成"Database=Northwind"."Server=YourSQLServer":使用名为"YourSQLServer"的服务器.他的别名为"Data Source"," Address","Addr".如果使用的是本地数据库且定义了实例名,则可以写为"Server=(local)\实例名";如果是远程服务器,则将"(local)"替换为远程服务器的名称或IP地址."Connect Timeout=30":连接超时时间为30秒.在这里,建立连接对象用的构造函数为:SqlConnection.--------------------------------------------------------------------------------3.C#连接Oracle程序代码:--------------------------------------------------------------------------------using System.Data.OracleClient;using System.Data;//在窗体上添加一个按钮,叫Button1,双击Button1,输入以下代码private void Button1_Click(object sender, System.EventArgs e){string ConnectionString="Data Source=sky;user=system;password=manager;";//写连接串OracleConnection conn=new OracleConnection(ConnectionString);//创建一个新连接try{conn.Open();OracleCommand cmd=conn.CreateCommand();cmdmandText="select * from MyTable";//在这儿写sql语句OracleDataReader odr=cmd.ExecuteReader();//创建一个OracleDateReader对象while(odr.Read())//读取数据,如果odr.Read()返回为false的话,就说明到记录集的尾部了{Response.Write(odr.GetOracleString(1).ToString());//输出字段1,这个数是字段索引,具体怎么使用字段名还有待研究}odr.Close();}catch(Exception ee){Response.Write(ee.Message); //如果有错误,输出错误信息}finally{conn.Close(); //关闭连接}}-------------------------------------------------------------------------------4.C#连接MySQL程序代码:--------------------------------------------------------------------------------using MySQLDriverCS;// 建立数据库连接MySQLConnection DBConn;DBConn = new MySQLConnection(new MySQLConnectionString("localhost","mysql","root"," ",3306).AsString);DBConn.Open();// 执行查询语句MySQLCommand DBComm;DBComm = new MySQLCommand("select Host,User from user",DBConn);// 读取数据MySQLDataReader DBReader = DBComm.ExecuteReaderEx();try{while (DBReader.Read()){Console.WriteLine("Host = {0} and User = {1}", DBReader.GetString(0),DBReader.GetString (1));}}finally{DBReader.Close();DBConn.Close();}//关闭数据库连接DBConn.Close();--------------------------------------------------------------------------------5.C#连接IBM DB2程序代码:--------------------------------------------------------------------------------OleDbConnection1.Open();//打开数据库连接OleDbDataAdapter1.Fill(dataSet1,"Address");//将得来的数据填入dataSetDataGrid1.DataBind();OleDbConnection1.Close();//关闭连接//增加数据库数据在Web Form上新增对应字段数量个数的TextBox,及一个button,为该按键增加Click响应事件代码如下:this.OleDbInsertCommand1mandText = "INSERTsintosADDRESS(NAME,EMAIL, AGE, ADDRESS) VALUES('"+TextBox1.Text+"','"+TextBox2.Text+"','"+TextBox3.Text+"','"+TextBox4.Text+"')";OleDbInsertCommand1.Connection.Open();//打开连接OleDbInsertCommand1.ExecuteNonQuery();//执行该SQL语句OleDbInsertCommand1.Connection.Close();//关闭连接--------------------------------------------------------------------------------6.C#连接SyBase程序代码: (OleDb)--------------------------------------------------------------------------------Provider=Sybase.ASEOLEDBProvider.2;Initial Catalog=数据库名;User ID=用户名;Data Sour ce=数据源;Extended Properties="";Server Name=ip地址;Network Protocol=Winsock;Server P ort Address=5000;。
asp连接SQL和Access数据代码(asp里的随机函数)
asp连接SQL和Access数据代码(asp⾥的随机函数)第⼀种写法:复制代码代码如下:MM_conn_STRING = "Driver={SQL Server};server=(local);uid=sa;pwd=;database=infs;"Set conn = Server.Createobject("ADODB.Connection")conn.open MM_conn_STRINGSET RS=SERVER.CreateObject("ADOBD.recordset")SQL="SELECT * FROM TABLE ORDER BY ID DESC"RS.open SQL,CONN,3,3复制代码代码如下:DataServer = "jb51" '数据库服务器IPDataUser = "jb51" '访问数据库⽤户名DataBaseName = "jb51" '数据库名称DataBasePsw = "" '访问数据库密码Set conn = Server.CreateObject("ADODB.Connection")ConnStr="driver={SQLServer};server="&dataserver&";UID="&datauser&";PWD="&databasepsw&";Database="&databasenameconn.open ConnStrIf Err Then Err.Clear:Set conn = Nothing:Response.Write "数据库连接出错,请检查Conn.asp⽂件中的数据库参数设置。
ASP连接Access数据库代码
<!-- ASP与数据库的连接--><!-- ADO的对象和集合ADO对象模型包括7个对象和4个集合:Connection(接连对象)用来建立数据源和ADO程序之间的连接Command(命令对象)用来嵌入SQL查询,包括对存储过程的调用Parameter(参数对象)用来传递参数给SQL查询,在使用存储过程时用到Recordset(记录对象)用来浏览及操作实际数据库内的数据,这是非常重要的一个对象Field(字段对象)用来取得一个记录集(Recordset)内不同字段的值Error(错误对象)用来返回一个数据库连接(Connection)上的错误Property(属性对象) 指明一个ADO对象的属性Errors 所有的Error对象集合。
这个集合用来响应一个连接(Connection)上的单一错误Parameters 所有的Parameter对象集合。
这个集合关联着一个Command对象Fields 所有的Field对象集合。
这个集合关联着一个Recordset对象的所有字段Propertys 所有的Rroperty对象集合。
这个集合关联着Connection、Command、Recordset 或Field对象ADO操作数据库的步骤如下:(1)连接数据源。
(2)设置访问数据源的命令,一般为SQL语句。
(3)执行命令。
(4)如果命令按行返回数据,则将数据存储在缓存中。
使用Select语句,则将返回的数据保存在Recordset对象中。
(5)对缓存中的数据进行更改操作。
(6)检测出现的错误。
(7)结束连接。
--><!-- Connection对象Connection对象是与数据库进行连接的对象,代表一个打开的、与数据源的连接。
与数据源的通信都要通过一个打开的连接来进行,成功的连接才可以使应用程序访问沂源。
Connection常用的属性:ConnectionString 连接字符串,表示与数据源建立连接的相关信息。
ASP连接access数据库的两种方法、如何读取数据库内容
我的ASP经验之路(4)--连接access数据库的两种方法、读取数据库内容这篇主要介绍以下两个问题:asp连接access数据库常用的两种方法、asp创建记录集与如何读取数据库的内容。
ASP最常连接的是ACCESS与MSSQL两种数据库,本文先介绍简单的连接ACCESS数据库的两种常用方法。
假设数据库名称为data.mdb,位于根目录下,与conn.asp文件同一目录。
连接数据库文件conn.asp写法如下:第一种:<%dim conndim connstrconnstr="DBQ="+server.mappath("data.mdb")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};" set conn=server.createobject("ADODB.CONNECTION") '创建数据库连接对象conn.open connstr '连接数据库%>第二种:<%dim conndim connstrConnstr="Provider=;Data Source=" & Server.MapPath("data.mdb")Set conn = Server.CreateObject("ADODB.Connection")Conn.Open Connstr%>接下来,我们看下asp是如何创建记录集以及如何来读取数据库里的内容的。
首先,我们要建一个数据库,里面放些需要读取的内容。
1、建立一个数据库文件,名称估且命为data.mdb ,里面准备存放一些公司企业的电话地址等内容。
数据库中建一个名为company的表,表设计以下四个字段:companyname,tel,address,website (公司名称,电话,地址,网址),字段类型全部选择“文本”,字段大小设置为250,创建好表后,打开表,自己输入随意输入几条记录值(所有建立数据库的具体操作本文略过)建好后,表设计如下图:打开表,内容如下:2、新建一个文件名为index.aspindex.asp文件代码里,首先要建立数据库连接,代码如上面介绍:dim conndim connstrconnstr="DBQ="+server.mappath("data.mdb")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};" set conn=server.createobject("ADODB.CONNECTION") '创建数据库连接对象conn.open connstr '连接数据库创建记录集:set rs=server.CreateObject("adodb.recordset") '创建rs记录集sql="select * from [company]" '读取数据库的SQL语句串rs.open sql,conn,1,1 '打开记录集读取数据库代码:结合前面介绍过的do while ...loop语句来循环读取多条记录内容<table width="100%" border="0" cellspacing="0" cellpadding="0"><%do while not rs.eof'rs.eof意思是最后一条记录,rs.bof的意思是第一条记录,所以这句话的意思是:当不是最后一条记录时,输出下面的代码%><tr><td height="24"><%=rs("companyname")%></td><td><%=rs("tel")%></td><td><%=rs("address")%></td><td><a href="<%=rs("website")%>" target="_blank"><%=rs("website")%></a></td></tr><%rs.movenext '移到下一条记录loop%></table>所有代码放在一起就是index.asp的所有代码。
asp连接access数据库的几种方法
%>
'查询
<%
set conn=server.createobject("adodb.connection")
conn.open "driver={Microsoft Access Driver (*.mdb)};dbq="& server.mappath("guestbook.mdb")'Driver的后面有空格
conn.open
set rs=server.createobject("adodb.recordset")
rs.open "book",conn,1,3
rs.addnew '执行添加命令
rs("name")="北国"
rs("tel")=19837400
rs("message")="北国风光,千里冰封,万里雪飘,望长城内外"
%>
ቤተ መጻሕፍቲ ባይዱ
3).command命令执行SQL语句(这种方法比较好操作,也但于理解)
'添加
<%
set conn=server.createobject("adodb.connection")
conn.open "driver={Microsoft Access Driver(*.mdb)};dbq="& server.mappath("guestbook.mdb")
conn.open
set rs=server.createobject("adodb.recordset")
asp中各种数据库连接代码
asp中各种数据库连接代码asp中各种数据库连接代码access数据库连接用dsn连接并且没有用户名和密码:<% set conn=server.createobject("adodb.connection")conn.open"yourdsnname" %>用dsn连接并且有用户名和密码:<%set conn=server.createobject("adodb.connection")conn.open"yourdsnname","username","password"%>用实际的数据库绝对路径连接:<%set conn=server.createobject("adodb.connection")strconn="driver=;"strconn=strconn&"dbq=e:\yanhang\database.mdb"conn.open strconn%>用实际的数据库相对路径连接:<%set conn=server.createobject("adodb.connection")strconn="driver=;"strconn=strconn&"dbq="&server.mappath("/database/yan hang.mdb")conn.open strconn%>一"Provider=Microsoft.Jet.OLEDB.4.0;Data Source="& Server.MapPath("/bhpbook.mdb")1、要使用测试服务器上的驱动程序,DW里才能显示正确连接2、必须在数据库路径前加”/”二"Driver={Microsoft Access Driver (*.mdb)};DBQ=路径\bhpbook.mdb"1、路径可以是绝对或相对路径2、要使用(本)应用服务器上的驱动程序三"Driver={Microsoft Access Driver (*.mdb)};DBQ="& Server.MapPath("/bhpbook.mdb")1、要使用测试服务器上的驱动程序,DW里才能显示正确连接2、必须在数据库路径前加”/”ms sql server数据库连接用dsn连接:<%set conn=server.createobject("adodb.connection")conn.open"dsn=mydsn;uid=user;pwd=password;database= databasename"%>不用dsn连接:<%set conn=server.createobject("adodb.connection")dsntemp="driver=;server=servername;uid=user;pwd=pass word;database=databasename" conn.open dsntemp %>foxpro数据库连接<%set conn=server.createobject("adodb.connection")connstr="driver=Microsoft visual foxpro driver;uid=userid;sourcetype=dbc;sourcedb=c:\yanhang\database.dbc" conn.open connstr%>oracle数据库连接:<%set conn=server.createobject("adodb.connection")conn.cursorlocation=aduseclientdsntemp="provider=msdaora.1;password=xxxxx;user id=yanhang;data source=xxx.world" conn.open dsntemp %>。
ASP连接Access数据库的几种方法
ASP连接Access数据库的⼏种⽅法1. 相对与⽐较⽼的环境,建议使⽤第⼆个set dbconnection=Server.CREATEOBJECT("ADODB.CONNECTION")DBPath = Server.MapPath("customer.mdb")dbconnection.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPathSQL="select * from auth where id='" & user_id &"'"SET uplist=dbconnection.EXECUTE(SQL)2.win2003以上的机器,建议⽤此⽅法,效率更⾼set dbconnection=Server.CreateObject("ADODB.Connection")DBPath = Server.MapPath("customer.mdb")dbconnection.Open "provider=microsoft.jet.oledb.4.0;data source="&dbpathSQL="select * from auth where id='" & user_id &"'"SET uplist=dbconnection.EXECUTE(SQL)3.DBPath = Server.MapPath("customer.mdb")set session("rs")=Server.CreateObject("ADODB.Recordset")' rs=Server.CreateObject("ADODB.Recordset")connstr="provider=microsoft.jet.oledb.4.0;data source="&dbpathSQL="select * from auth where id='" & user_id &"'"session("rs").Open sql,connstr,1,34. 建odbc源xxxset conn=server.createobject("Adodb.connection")conn.open "DSN=xxx;UID=;PWD=;Database=customer5、附上⼀个经常⽤的sqlserver与access通⽤的连接数据库代码<%Const DataBaseType=1If DataBaseType=0 thenDBPath="/jb51/news.asp"SqlNowString = "Now()"ystr=truenstr=falsesuiji="rnd(id)"Else'如果是SQL数据库,请认真修改好以下数据库选项DataServer = "wwwjb51net" '数据库服务器IPDataUser = "jb51net" '访问数据库⽤户名DataBaseName = "jb51net" '数据库名称DataBasePsw = "密码" '访问数据库密码SqlNowString = "getdate()"ystr=1nstr=0suiji="newid()"End ifOn Error Resume NextIf DataBaseType = 1 ThenConnStr="driver={SQL Server};server="&dataserver&";UID="&datauser&";PWD="&databasepsw&";Database="&databasenameElseConnStr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(DBPath)End IfSet conn = Server.CreateObject("ADODB.Connection")conn.open ConnStrIf Err Then Err.Clear:Set conn = Nothing:Response.Write "数据库连接出错,请检查Conn.asp⽂件中的数据库参数设置。
asp调用数据库代码
1.ASP与Access数据库连接:<%@language=VBscript%><%dimconn,mdbfilemdbfile=server.mappath("数据库名称.mdb")setconn=server.createobject("adodb.connection")conn.open"driver={microsoftaccessdriver(*.mdb)};uid=admin;pwd=数据库密码;dbq="&mdbfile%>2.ASP与SQL数据库连接:<%@language=VBscript%><%dimconnsetconn=server.createobject("ADODB.connection")con.open"PROVIDER=SQLOLEDB;DATASOURCE=SQL服务器名称或IP地址;UID=sa;PWD=数据库密码;DATABASE=数据库名称%>建立记录集对象:setrs=server.createobject("adodb.recordset")rs.openSQL语句,conn,3,23.SQL常用命令使用方法:(1)数据记录筛选:sql="select*from数据表where字段名=字段值orderby字段名[desc]"sql="select*from数据表where字段名like'%字段值%'orderby字段名[desc]"sql="selecttop10*from数据表where字段名orderby字段名[desc]"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…)values(值1,值2,值3…)"sql="insertinto目标数据表select*from源数据表"(把源数据表的记录添加到目标数据表)(5)数据记录统计函数:AVG(字段名)得出一个表格栏平均值COUNT(*¦字段名)对数据行数的统计或对某一栏有值的数据行数统计MAX(字段名)取得一个表格栏最大的值MIN(字段名)取得一个表格栏最小的值SUM(字段名)把数据栏的值相加引用以上函数的方法:sql="selectsum(字段名)as别名from数据表where条件表达式"setrs=conn.excute(sql)用rs("别名")获取统的计值,其它函数运用同上。
- 1、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。
ASP连接Access或SQLServer数据库的终极代码
作者:佚名来源:本站整理发布时间:2010-01-11 10:26:29
搞了这么久的ASP,希望本篇能帮助一些初学者。
<%
On Error Resume Next
Dim Data_base
Data_base = 0 '1为MSSQLServer2000 其它为Access
Set Conn=Server.CreateObject("Adodb.Connection")
IF Data_base=1 Then
'-------------------------------------------------------------------------------------
Dim dbconn,dbip,dbdns,dbname,dbuid,dbpwd
dbconn = 1 '链接方式1为OLEDB链接2为驱动链接3为DNS链接dbip = "(local)" '数据库所在的IP地址,如果是本地数据库则为:"(local)" dbdns = "数据源DNS名称" '数据库DNS名
dbname = "MSOW" '数据库名称
dbuid = "sa" '数据库用户名
dbpwd = "********" '数据库密码
'------------------------------------------------------------------------------------- Select CASE dbconn
Case 1
Conn.Open "Provider=SQLOLEDB;User ;Password="&dbpwd&";Initial
Catalog="&dbname&";Data Source="&dbip&";"
Case 2
Conn.open "DRIVER={SQL
Server};SERVER="&dbip&";UID="&dbuid&";PWD="&dbpwd&";DATABASE="&dbname&"" Case 3
Conn.open
"DSN="&dbdns&";UID="&dbuid&";PWD="&dbpwd&";DATABASE="&dbname&""
End Select
Else
'-------------------------------------------------------------------------------------
Dim DB_Name,DB_Pwd
DB_Name = "#MSOW#Data.mdb" '数据库名字
DB_Pwd = "" '数据库密码,如无密码可不填写,代码自动判断选择语句。
'-------------------------------------------------------------------------------------
IF DB_Pwd="" Then
Conn.Open "Provider = Microsoft.Jet.OLEDB.4.0;Data Source = "&Server.MapPath(DB_Name) Else
Conn.Open "Provider = Microsoft.Jet.OLEDB.4.0;Data Source =
"&Server.MapPath(DB_Name)&";Jet OLEDB:Database Password="&DB_Pwd&";"
End IF
End IF
IF Err Then
Err.Clear
Conn.Close
Set Conn = Nothing
Response.Write "<Center><font color=#FF6600><strong>数据库连接出错,请检查连接设置...</strong></font></Center>"
Response.End
End IF
'只读数据
Function GetRSForRead(StrSQL)
Set RS = Server.CreateObject("Adodb.RecordSet")
RS.Source = StrSQL
RS.Open RS.Source,Conn,1,1
Set GetRSForRead = RS
End Function
'只读调用Set RS = GetRSForRead("Select * From 数据表")
'可写数据
Function GetRSForWrite(StrSQL)
Set RS = Server.CreateObject("Adodb.RecordSet")
RS.Source = StrSQL
RS.Open RS.Source,Conn,3,3
Set GetRSForWrite = RS
End Function
'可写调用Set RS = GetRSForWrite("Select * From 数据表") %>。