当前位置：文档之家 › 【网页设计-网页制作-最新经典技术文档】ASP常用数据库连接及操作的

【网页设计-网页制作-最新经典技术文档】ASP常用数据库连接及操作的

  • 格式：doc
  • 大小：36.00 KB
  • 文档页数：7

1.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="&mdbfile%>2. 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) 数据记录统计函数：AVG(字段名) 得出一个表格栏平均值COUNT(*|字段名) 对数据行数的统计或对某一栏有值的数据行数统计MAX(字段名) 取得一个表格栏最大的值MIN(字段名) 取得一个表格栏最小的值SUM(字段名) 把数据栏的值相加引用以上函数的方法：sql="select sum(字段名) as 别名 from 数据表 where 条件表达式"set rs=conn.excute(sql)用 rs("别名") 获取统的计值，其它函数运用同上。

(5) 数据表的建立和删除：CREATE TABLE 数据表名称(字段1 类型1(长度),字段2 类型2(长度) …… )例：CREATE TABLE tab01(name varchar(50),datetime default now())DROP TABLE 数据表名称 (永久性删除一个数据表)(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 更新数据表记录判断所填数据是数字型if not isNumeric(request("字段名称")) thenresponse.write "不是数字"elseresponse.write "数字"end if经常使用到有关数据库的操作。

包括连接代码、SQL命令等等，又不曾刻意去记忆它们（我本人是不愿意去记这东东），所以常常在用到的时候又去查书本，翻来翻去。

一些比较少用的数据库还不一定能顺利找到，所以现在把它们全归纳到这里，提供大家参考。

一、数据库的连接方法：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;o ption=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'"<二>。

合集下载

ASP第6章连接数据库

ASP第6章连接数据库

rs.absolutepage=N 将记录指针移到第N页 的第一行
可编辑ppt
9
rs.pagesize=N 设置每页为N条记录 rs.pagecount 根据 pagesize 的设置返回总页
数
rs.recordcount 返回记录总数 rs.bof 返回记录指针是否超出数据表首端，
true表示是，false为否 rs.eof 返回记录指针是否超出数据表末端，
On Error Resume Next语句和On Error Goto 0语 句指明了当出现"运行时错误"时的处理方式。 当加上On Error Resume Next语句后，如果后面 的程序出现"运行时错误"时，会继续运行，不中断。 当加上On Error Goto 0语句后，如果后面的程序 出现"运行时错误"时，会显示"出错信息"并停止程序 的执行。
利用ADO可以开发网络数据库应用程序，而 且具有以下特色： ① ADO是微软（Microsoft）提供给网络数据 库应用程序开发者最有效的开发方案。
可编辑ppt
13
② ADO不仅可以跨越多种不同的数据库系统 ，还可以跨越多种不同的程序语言开发环境 。
第五章 连接数据库
1 使用ODBC数据源管理器连接数据库 2 使用程序文件连接数据库
可编辑ppt
1
1 使用ODBC数据源管理器连接数据库
ODBC（Open Database Connectivity，开放式 数据库互联）是微软推出的一种工业标准，一种 开放的独立于厂商的API应用程序接口，可以跨 平台访问各种个人计算机、小型机以及主机系统 。
Err对象保存了“错误信息”
可编辑ppt
ASP数据库操作大全及常用

ASP数据库操作大全及常用

ASP数据库操作大全大 | 中 | 小[2006/03/19 12:52 | 分类: Asp 相关 | by NetFetch ]ASP数据库操作类：包括Asp建立数据库文件，Asp压缩数据库文件，Asp查找数据库文件以及一些有用的asp编程的例子<%'#######以下是一个类文件，下面的注解是调用类的方法################################################'# 注意：如果系统不支持建立Scripting.FileSystemObject对象，那么数据库压缩功能将无法使用'# Access 数据库类'# CreateDbFile 建立一个Access 数据库文件'# CompactDatabase 压缩一个Access 数据库文件'# 建立对象方法:'# Set a = New DatabaseTools'############################################################################### ##########Class DatabaseToolsPublic function CreateDBfile(byVal dbFileName,byVal DbVer,byVal SavePath)'建立数据库文件'If DbVer is 0 Then Create Access97 dbFile'If DbVer is 1 Then Create Access2000 dbFileOn error resume NextIf Right(SavePath,1)<>"" or Right(SavePath,1)<>"/" Then SavePath = Trim(SavePath) & ""If Left(dbFileName,1)="" or Left(dbFileName,1)="/" Then dbFileName = Trim(Mid(dbFileName,2,Len(dbFileName)))If DbExists(SavePath & dbFileName) ThenResponse.Write ("对不起，该数据库已经存在!")CreateDBfile = FalseElseDim CaSet Ca = Server.CreateObject("ADOX.Catalog")If Err.number<>0 ThenResponse.Write ("无法建立，请检查错误信息" & Err.number & "" & Err.Description)Err.ClearExit functionEnd IfIf DbVer=0 Thencall Ca.Create("Provider=Microsoft.Jet.OLEDB.3.51;Data Source=" & SavePath & dbFileName)Elsecall Ca.Create("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & SavePath & dbFileName)End IfSet Ca = NothingCreateDBfile = TrueEnd IfEnd functionPublic function CompactDatabase(byVal dbFileName,byVal DbVer,byVal SavePath)'压缩数据库文件'0 为access 97'1 为access 2000On Error resume nextIf Right(SavePath,1)<>"" or Right(SavePath,1)<>"/" Then SavePath = Trim(SavePath) & ""If Left(dbFileName,1)="" or Left(dbFileName,1)="/" Then dbFileName = Trim(Mid(dbFileName,2,Len(dbFileName)))If DbExists(SavePath & dbFileName) ThenResponse.Write ("对不起，该数据库已经存在!")CompactDatabase = FalseElseDim CdSet Cd =Server.CreateObject("JRO.JetEngine")If Err.number<>0 ThenResponse.Write ("无法压缩，请检查错误信息" & Err.number & "" & Err.Description)Err.ClearExit functionEnd IfIf DbVer=0 Thencall pactDatabase("Provider=Microsoft.Jet.OLEDB.3.51;Data Source=" & SavePath & dbFileName,"Provider=Microsoft.Jet.OLEDB.3.51;DataSource=" & SavePath & dbFileName & ".bak.mdb;Jet OLEDB;Encrypt Database=True") Elsecall pactDatabase("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & SavePath & dbFileName,"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & SavePath & dbFileName & ".bak.mdb;Jet OLEDB;Encrypt Database=True")End If'删除旧的数据库文件call DeleteFile(SavePath & dbFileName)'将压缩后的数据库文件还原call RenameFile(SavePath & dbFileName & ".bak.mdb",SavePath & dbFileName)Set Cd = FalseCompactDatabase = TrueEnd Ifend functionPublic function DbExists(byVal dbPath)'查找数据库文件是否存在On Error resume NextDim cSet c = Server.CreateObject("ADODB.Connection")c.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & dbPathIf Err.number<>0 ThenErr.ClearDbExists = falseelseDbExists = TrueEnd Ifset c = nothingEnd functionPublic function AppPath()'取当前真实路径AppPath = Server.MapPath("./")End functionPublic function AppName()'取当前程序名称AppName = Mid(Request.ServerVariables("SCRIPT_NAME"),(InStrRev(Request.ServerVariables("SC RIPT_NAME") ,"/",-1,1))+1,Len(Request.ServerVariables("SCRIPT_NAME")))End FunctionPublic function DeleteFile(filespec)'删除一个文件Dim fsoSet fso = CreateObject("Scripting.FileSystemObject")If Err.number<>0 ThenResponse.Write("删除文件发生错误!请查看错误信息" & Err.number & "" & Err.Description)Err.ClearDeleteFile = FalseEnd Ifcall fso.DeleteFile(filespec)Set fso = NothingDeleteFile = TrueEnd functionPublic function RenameFile(filespec1,filespec2)'修改一个文件Dim fsoSet fso = CreateObject("Scripting.FileSystemObject")If Err.number<>0 ThenResponse.Write("修改文件名时发生错误!请查看错误信息" & Err.number & "" & Err.Description)Err.ClearRenameFile = FalseEnd Ifcall fso.CopyFile(filespec1,filespec2,True)call fso.DeleteFile(filespec1)Set fso = NothingRenameFile = TrueEnd functionEnd Class%>现在已可以压缩有密码的数据库，代码如下，但是压缩之后的数据库密码就没有了！如何解决？<%Const JET_3X = 4Function CompactDB(dbPath, boolIs97)Dim fso, Engine, strDBPathstrDBPath = left(dbPath,instrrev(DBPath,""))Set fso = CreateObject("Scripting.FileSystemObject")If fso.FileExists(dbPath) ThenSet Engine = CreateObject("JRO.JetEngine")If boolIs97 = "True" ThenpactDatabase "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & dbpath, _ "Provider=Microsoft.Jet.OLEDB.4.0;Jet OLEDB:Database Password='XXXXXXXX';Data Source=" & strDBPath & "temp.mdb;" _& "Jet OLEDB:Engine Type=" & JET_3XElsepactDatabase "Provider=Microsoft.Jet.OLEDB.4.0;Jet OLEDB:Database Password='XXXXXXXX';Data Source=" & dbpath, _"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & strDBPath & "temp.mdb"End Iffso.CopyFile strDBPath & "temp.mdb",dbpathfso.DeleteFile(strDBPath & "temp.mdb")Set fso = nothingSet Engine = nothingCompactDB = "你的数据库, " & dbpath & ", 已经压缩成功!" & vbCrLfElseCompactDB = "数据库名称或路径不正确. 请重试!" & vbCrLfEnd IfEnd Function%>asp编程有用的例子（一）1.如何用Asp判断你的网站的虚拟物理路径答：使用Mappath方法< p align="center" >< font size="4" face="Arial" >< b >The Physical path to this virtual website is:< /b >< /font >< font color="#FF0000" size="6" face="Arial" >< %= Server.MapPath("")% >< /font >< /p >2.我如何知道使用者所用的浏览器？答：使用the Request object方法strBrowser=Request.ServerVariables("HTTP_USER_AGENT")If Instr(strBrowser,"MSIE") < > 0 ThenResponse.redirect("ForMSIEOnly.htm")ElseResponse.redirect("ForAll.htm")End If3.如何计算每天的平均反复访问人数答：解决方法< % startdate=DateDiff("d",Now,"01/01/1990")if strdate< 0 then startdate=startdate*-1avgvpd=Int((usercnt)/startdate) % >显示结果< % response.write(avgvpd) % >that is it.this page have been viewed since November 10,19984.如何显示随机图象< % dim p,ppic,dpicppic=12randomizep=Int((ppic*rnd)+1)dpic="graphix/randompics/"&p&".gif"% >显示< img src="< %=dpic% >" >5.如何回到先前的页面答：< a href="< %=request.serverVariables("Http_REFERER")% >" >preivous page< /a > 或用图片如：< img src="arrowback.gif" alt="< %=request.serverVariables("HTTP_REFERER")% >" >6.如何确定对方的IP地址答：< %=Request.serverVariables("REMOTE_ADDR)% >7.如何链结到一副图片上答：< % @Languages=vbs cript % >< % response.expires=0strimagename="graphix/errors/erroriamge.gif"response.redirect(strimagename)% >8.强迫输入密码对话框答：把这句话放载页面的开头< % response.status="401 not Authorized"response.end% >9.如何传递变量从一页到另一页答：用 HIDDEN 类型来传递变量< % form method="post" action="mynextpage.asp" >< % for each item in request.form % >< input namee="< %=item% >" type="HIDDEN"value="< %=server.HTMLEncode(Request.form(item)) % >" >< % next % >< /form >10.为何我在 asp 程序内使用 msgbox，程序出错说没有权限答：由于 asp 是服务器运行的，如果可以在服务器显示一个对话框，那么你只好等有人按了确定之后，你的程序才能继续执行，而一般服务器不会有人守着，所以微软不得不禁止这个函数，并胡乱告诉你 (:) 呵呵) 没有权限。

asp.net连接数据库操作

asp.net连接数据库操作

连接数据库操作连接mysql数据库时要添加引⽤在浏览⾥找MySql.Data.dll这个⽂件这个⽂件需要下载⾸先新建项⽬ 项⽬在web.config⽂件中添加代码1.准备*/*name 是调⽤别名相当于控件id /<add name ="wjy"*/connectionString 我这个⾥写的是调⽤本地数据库调⽤服务器的需要在这个字段中写ip post字段中是端⼝数据库端⼝ user id 是数据库⽤户名 password 是数据库登录密码/ **/ database 字段是数据库名称/ ****/Persist Security Info属性的意思是表⽰是否保存安全信息，其实可以简单的理解为"ADO在数据库连接成功后是否保存密码信息"，True表⽰保存，False表⽰不保存*/connectionString="server=localhost;port = 8081;user id = root; password = root; persistsecurityinfo = True;database = st"/providerName 字段存储的是所⽤的是哪个数据库这⾥是调⽤mysql/providerName="MySql.Data.MySqlClient"/>代码2.调⽤数据库新建⼀个web窗体在cs⽂件中写如下代码/⽅法2//本段是连接web.config中的代码/string constr1 = ConfigurationManager.ConnectionStrings["wjy"].ToString();/创建数据库连接/MySqlConnection conne = new MySqlConnection(constr1);/打开数据库/conne.Open();/数据库语句/string sql = "select * from student";/创建⼀个适配器并传⼊数据库语句与连接/MySqlDataAdapter da = new MySqlDataAdapter(sql,conne);/数据//从数据库中获取到的数据/DataTable dt = new DataTable();da.Fill(dt);/把从数据库获取的数据放⼊控件中并显⽰/GridView1.DataSource = dt;GridView1.DataBind();/关闭数据库/conne.Close();连接有三种⽅法第⼀种实例化Connection对象法1. command对象实例化 command对象cmd.ExecuteReader()实例化DataReader 对象GridView1数据绑定释放资源/Connection⽅法1//static string constr = ConfigurationManager.ConnectionStrings["wjy"].ToString();//实例化MySqlConnection对象/MySqlConnection conn = new MySqlConnection(constr);conn.Open();string selstr = "select * from student";MySqlCommand cmd = new MySqlCommand(selstr,conn);/*实例化MySqlDataReader对象 cmd.ExecuteReader()*//*数据*/MySqlDataReader dr = cmd.ExecuteReader();/*gtridview 数据绑定释放资源*/Response.Write(dr);conn.Close();第⼆种实例化DataAdapter实例化DataTable对象da.Fill(dt);/⽅法2/string constr1 = ConfigurationManager.ConnectionStrings["wjy"].ToString(); MySqlConnection conne = new MySqlConnection(constr1);conne.Open();string sql = "select * from st";MySqlDataAdapter da = new MySqlDataAdapter(sql,conne);/数据/DataTable dt = new DataTable();da.Fill(dt);conn.Close();第三种DataAdapter+Connection/⽅法3/string constr2 = ConfigurationManager.ConnectionStrings["wjy"].ToString(); MySqlConnection conn2 = new MySqlConnection(constr2);conne.Open();string sql2 = "select * from st";MySqlDataAdapter da2 = new MySqlDataAdapter();da2.SelectCommand = new MySqlCommand(sql2,conn2);DataSet ds = new DataSet();da2.Fill(ds);第四种/MysqlHelper my = new MysqlHelper();string str = "SELECT * FROM user";MySqlDataReader s = my.read(str);Response.Write(s);/。

ASP连接数据库方法

ASP连接数据库方法

ASP连接数据库方法1. ADO (ActiveX Data Objects)ADO (ActiveX Data Objects) 是Microsoft提供的一种应用程序接口 (API)，允许通过网络使用数据库，特别是Structured Query Language (SQL)，来处理数据。

开发者可以使用ActiveX Data Objects (ADO) 来实现数据库的连接、查询、更新和操作数据。

ADO由Microsoft开发，它是一种非常灵活的方法，可以使用ODBC，OLE DB或者ActiveX Data Objects（ADO）连接数据库。

2.OLEDBOLE DB (Object Linking and Embedding Database) 是一种技术，它能够跨越软件和硬件的众多门槛，使得用户能够访问大量复杂的数据源。

它是一种Microsoft技术，用于描述数据类型和存储提供程序，以及从不同提供程序中提取数据的应用程序接口（API）。

它可以用于将多种类型数据转换为统一的格式，然后提取有用的数据。

它的主要特点是支持面向对象的方法，可以快速查询大型数据库并返回结果。

3. ODBC (Open Database Connectivity)ODBC (Open Database Connectivity) 是一种通用接口，可以让用户从各种不同的数据库中查询数据，而不必学习特定数据库的语法。

它是一种应用程序接口，用于连接到不同的数据库系统，从而实现数据的访问。

它可以将数据从各种不同的数据库引擎（如SQL Server，Oracle，DB2，Access等）转换成统一的格式，然后再连接到相应的数据库，以便实现查询和更新数据的操作。

该技术可以支持所有常见的主流数据库。