asp串連資料庫

ASP常用資料庫連接方法和技巧

<%
   sqlStr="Driver={SQL SERVER};Server=.;uid=sa;Password=123456;DataBase=MJDB"
    set sqlCon = Server.CreateObject("ADODB.Connection")
   set myRs=server.createobject("adodb.recordset")
   mySql="select * from macinfo"
   sqlCon.Open sqlStr
   myRs.open mySql,sqlCon,1,3
   do while not myRs.eof
   Response.write myRs("Remark")&"<br/>"
   myRs.movenext
   loop
   myRs.close
   sqlCon.close   

%>
//第一種寫法：
MM_conn_STRING =
"Driver={SQL SERVER};Server=.;UID=sa;Password=;DataBase=KK;"
Set conn = Server.Createobject("ADODB.Connection")
conn.open MM_conn_STRING
SET RS=SERVER.CreateObject("ADOBD.recordset")
SQL="SELECT * FROM TABLE ORDER BY ID DESC"
RS.open SQL,CONN,3,3 

//第二種寫法：（DSN串連）

MM_conn_STRING="DSN=BBS;UID=SA;PWD=12345"
Set conn = Server.Createobject("ADODB.Connection")
conn.open MM_conn_STRING
SET RS=SERVER.CreateObject("ADOBD.recordset")
SQL="SELECT * FROM TABLE ORDER BY ID DESC"
RS.open SQL,CONN,3,3  // 3,3是修改、刪除、增加開關！

//第三種寫法：

MM_conn_STRING_own = "Driver={SQL Server};server=(local);uid=sa;pwd=11111;database=infs;"
Set conn = Server.Createobject("ADODB.Connection")
conn.open MM_conn_STRING_own

//第四種 - 這種方法用在ACCESS中
strconn = "DRIVER=Microsoft Access Driver (*.mdb);DBQ=" _
& Server.MapPath("asp.mdb")
set conn = server.createobject("adodb.connection")
conn.open strconn