conn.asp
上传用户:comthink
上传日期:2021-05-06
资源大小:1280k
文件大小:0k
源码类别:

WEB源码(ASP,PHP,...)

开发平台:

HTML/CSS

  1. <%@LANGUAGE="VBSCRIPT"%>
  2. <%
  3. option explicit
  4. dim startime,endtime,conn,connstr,db
  5. startime=timer()
  6. '更改数据库名字
  7. db="data/txl5.mdb"
  8. Set conn = Server.CreateObject("ADODB.Connection")
  9. connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(db)
  10. '如果你的服务器采用较老版本Access驱动,请用下面连接方法
  11. 'connstr="driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath(db)
  12. conn.Open connstr
  13. function CloseDatabase
  14. Conn.close
  15. Set conn = Nothing
  16. End Function
  17. %>