conn1.asp

一个学校的医务管理

<%'建立连接
	dim conn
	dim dbpath
   	set conn=server.createobject("adodb.connection")
	db="../data/data.mdb"
	DBPath = Server.MapPath(db)
	conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath

'DbPath = Server.mapPath("data/data.mdb")
'Set conn=Server.CreateObject("ADODB.Connection")
'connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & DbPath 
'connstr="Driver={microsoft access driver (*.mdb)};DBQ=" & DbPath
'connstr="dsn=member;"
'connstr="provider=sqloledb;data source=SDFZ;uid=SDFZ\Administrator;pwd=;database=zyk"
'connstr="Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=zyk;Data Source=SDFZ"
'conn.open connstr
%>