conn.asp

来自「功能强大的日记本实现管理写日记和真实的日记本一样带锁不会让别人看到你的隐私」· ASP 代码 · 共 16 行

<%
error_ip = Request.ServerVariables("REMOTE_ADDR")
if error_ip = "202.103.229.174" then
  Response.Write("本站不欢迎你的到来。")
  Response.End()
end if
'数据库链接字符串
Set conn = Server.CreateObject("ADODB.Connection")
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("../../asp/###！￥%diary.asp")
conn.open connstr

Function CloseDataConn
  conn.close
  set conn = Nothing
end Function
%>