conn.asp
上传用户:sking1122
上传日期:2020-09-24
资源大小:1005k
文件大小:1k
源码类别:

手机WAP编程

开发平台:

ASP/ASPX

  1. <%
  2. '***************ASPSecurity 连接数据库*******************
  3. ' Copyright 2006
  4. ' Create:2006-1-14
  5. ' Update:2006-1-15
  6. '********************************************************
  7.     'on error resume next
  8. Set Conn= Server.CreateObject("ADODB.Connection")
  9. Conn.ConnectionString="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(DataFile)
  10. Conn.Open
  11.    If Err Then
  12.     err.Clear
  13.     Set Conn = Nothing
  14.     Response.Write("<meta http-equiv=""Content-Type"" content=""text/html; charset=gb2312"" /><div style='font-size:12px;font-weight:bold;border:1px solid #006;padding:6px;background:#fcc'>数据库连接出错,请检查连接字串!</div>")
  15.     Response.End
  16.    end if
  17. %>