asp连接数据库

连接sql数据库

<%
function OpenConn(userid,pass,servername)
      connstring="Provider=SQLOLEDB.1;Password=" & pass & ";Persist Security Info=True;User ID=" &  userid &";Data Source=" & servername
      set conn=server.createobject("ADODB.Connection")
      conn.open connstring
      set OpenConn=conn
end function
%>  

连接oracle数据库

<%
function OpenConn(userid,pass,servername)
connstring="Provider=MSDAORA.1;Password=" & pass &";User ID=" & userid & ";Persist Security Info=True"
set conn=server.createobject("ADODB.Connection")
conn.open connstring
set OpenConn=conn
end function
%>

连接access数据库

connstring="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & server.mappath("test.mdb") &";Persist Security Info=False"

Dsn连接

connstring="Provider=MSDASQL.1;Persist Security Info=False;Data Source=dsn"