加入收藏 | 设为首页 | 会员中心 | 我要投稿 | RSS
当前位置: 首页  文集文档  实用存档

ACCESS数据库加密读取

时间:2005-09-03 00:00:00  来源:TIANZI.ORG  作者:天子  阅读:1534次
ACCESS数据库加密读取

<%
    
    db="db.mdb"
    pass_word="这里是密码"
    Set conn = Server.CreateObject("ADODB.Connection")
    connstr="Provider=Microsoft.Jet.OLEDB.4.0;Jet OLEDB:Database Password="&pass_word&";Data Source=" & Server.MapPath(""&db&"")
    conn.Open connstr

' Call DBConnEnd()
Sub DBConnEnd()
    On Error Resume Next
    If IsObject(objCmd) Then
        objCmd.Close
        Set objCmd = Nothing
    End if
    If IsObject(objConn) Then
        objConn.Close
        Set objConn = Nothing
    End if
End Sub

%>
来顶一下
返回首页
返回首页

发表评论 【查看全部条评论】
用户名:
密码:
验证码:
匿名:
推荐资讯
找了个帝国CMS程序和百度云服务器BCC
找了个帝国CMS程序和
帝国CMS管理员登陆页面修改美化
帝国CMS管理员登陆页
留言本从access数据库直接转入帝国MYSQL
留言本从access数据
MacBookPro安装win10双系统
MacBookPro安装win1
相关文章
    无相关信息
栏目更新
栏目热门