asp 数据库连接代码与数据库关闭代码

这是一款比较完整的asp教程 数据库教程连接代码与数据库关闭代码哦，是多几年前写的喽，现在拿来出给各位朋友看看哈。

 dim conn,rs;//这里如果是调用外部文件就必须定义这里
这里是数据库创建联连方法

    sub opendb()
        set rs=server.CreateObject("adodb.recordset")
        set conn=server.CreateObject("adodb.connection")
        conn.connectionstring="provider=microsoft.jet.oledb.4.0; data source="&server.mappath("datasource/hhinfo.mdb")
        conn.open
    end sub

//这里是asp数据关闭方法
    sub closedb()
        if isobject(rs) then
            if not(rs is nothing) then
                rs.close
                set rs=nothing
            end if
        end if
        if isobject(conn) then
            if not(conn is nothing) then
                conn.close
                set conn=nothing
            end if
        end if
    end sub

本站原创转载注明:www.111cn.net