conn aspconn.asp 解释下什么意思

conn.asp 解释下什么意思

If SysSiteIsClose = "1" Then 如果变量的值等于1 If InStr(Lcase(Request.ServerVariables("URL")),Lcase(SysSiteAdminPath))=0 Then lcase是把字符串转为小写，instr是判断字符串a内是否包含字符串b Response.Write(SysSiteCloseNote) 输出变量内容 Response.End() 断点 End If End If Dim Conn,ConnStr,Rs ConnStr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(dbdns & SysSiteDbPath) 链接数据库 Call OpenConn() 调用函数 Set Rs = Server.CreateObject("Adodb.RecordSet") 建立对象 Private Sub CloseConn() 声明私有过程 Conn.Close 关闭连接 Set Conn = Nothing 清理对象 End Sub 结束过程 Private Sub OpenConn() 声明私有过程 Set Conn = Server.CreateObject("ADODB.Connection") 建立对象 Conn.Open ConnStr 建立与数据库的链接 End Sub 结束过程 %>