mdb.asp

来自「sfsfds设定方式分上述事实是事实是事实是事实是事实上」· ASP 代码 · 共 16 行

<!--#include file="conn.asp"-->
<!--#include file="function.asp"-->
<%
	Dim ConnStr
		ConnStr = "Provider = Microsoft.Jet.OLEDB.4.0;Data Source = " & Server.MapPath(MyDbPath & db)
		on error resume next
		Set conn = Server.CreateObject("ADODB.Connection")
	conn.open ConnStr
	If Err Then
		err.Clear
		Set Conn = Nothing
		Response.Write "数据库连接出错，请检查连接字串。"
		Response.End
	End If
%>