% dim conn,mdbfile mdbfile=server.mappath("數據庫名稱.mdb") set conn=server.createobject("adodb.connection") conn.open "driver={microsoft access driver (*.mdb)};uid=admin;pwd=數據庫密碼;dbq="mdbfile %>
最常用的asp與access連接的字符串函數
復制代碼 代碼如下:
Call OpenConn Sub OpenConn() On Error Resume Next If DataBaseType = 1 Then ConnStr="Provider = Sqloledb; User ID = " datauser "; Password = " databasepsw "; Initial Catalog = " databasename "; Data Source = " dataserver ";" Else ConnStr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" 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 CollcetConnStr ="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" Server.MapPath(CollectDBPath) End Sub
2. ASP與SQL數據庫連接：
% dim conn set 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,2
3. 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 源數據表" (把源數據表的記錄添加到目標數據表)
