ASP链接数据库的几种方法

% Dim dbtype \'dbType = "MSSQL" \'链接MSSQL数据库 \'dbType = "MYSQL" \'链接MYSQL数据库 dbType = "ACCESS" \'链接ACCESS数据库 Dim strConn

<%
  Dim dbtype
  \'dbType = "MSSQL" \'链接MSSQL数据库
  \'dbType = "MYSQL" \'链接MYSQL数据库
  dbType = "ACCESS" \'链接ACCESS数据库

  Dim strConn
  \'## DSN
  \'strConn = "DSN=MY_DSN_NAME"

  \'## MS Access 2000 using virtual path
  \'strConn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath  ("/ssgbook/ssgbook..mdb")

  \'## MS Access 2000
  \'strConn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=e:\site\asp\ssgbook\ssgbook.mdb"

  \'## MS Access 2000
    strConn = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("ssgbook..mdb")

  \'## 链接 MS SQL Server 2000 & 7
  \'strConn = "driver={SQLServer};server=SERVER_NAME（local）;uid=UID;pwd=PWD;database=数据库名 "

  \'## 链接MySQL数据库
  \'strConn = "driver=MySQL;server=SERVER_NAME;uid=UID;pwd=PWD;database=DB_NAME"

Dim db
Set db = Server.CreateObject("ADODB.Connection")
db.Open = strConn     
%>