gusucode.com > ASP+ACCESS在线人才招聘网(源代码+论文) > ASP+ACCESS在线人才招聘网(源代码+论文)\source_\inc\conn.asp

    <%
DBPath="data/data1103jclhxe.asp"
set conn=server.createobject("adodb.connection")

'conn.ConnectionTimeout=120 '(second)
DBPath = Server.MapPath(DBPath)

' Access数据库连接方式
conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath

function RepStr(str)
 str=Replace(Replace(Replace(str,"'",""),";",""),"-","")
 RepStr=str
end function
%>