www.gusucode.com > ASP+ACCESS在线人才招聘网(源代码+论文) > ASP+ACCESS在线人才招聘网(源代码+论文)\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 %>