connhd.asp

一个比较完整的企业erp系统

<%
''Option Explicit
dim connstr
dim conn
'如果你的服务器采用较老版本Access驱动，请用下面连接方法
'connstr="driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("../Db/Semmv.mdb")

connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("../Db/SemmvHD.mdb")
set conn=server.createobject("ADODB.CONNECTION")
conn.open connstr
%>