注册 登录
编程论坛 ASP技术论坛

请问asp如何打开连接一个带有密码的mdb数据库?

sunliantong 发布于 2012-11-19 23:11, 769 次点击
''''''帮忙修改成打开带密码的数据库的写法,假设密码是:abc123  谢谢老师帮忙!

     Set conn = CreateObject("ADODB.Connection")      '链接
     conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("kuu1.mdb")'设置数据库相对路径
     Set rs = CreateObject("adodb.recordset")
     rs.open "select * from 表名 where zmcm='" & trim(md5(zmcm)) & "'",conn,1,3'打开数据库搜索要查询的md5(zmcm)
     if  rs.eof then'如果无记录侧添加
         rs.addnew'新增加
         rs("zmcm") = trim(md5(zmcm))
         rs("day") = request("ti")
         rs.update
     else '已经存在
        Response.Write "已经存在,请重新住侧!"
    end if
    rs.close'关闭数据库
    conn.close '这几句是用来关闭数据库
 set rs=nothing
    set conn=nothing'释放对像
6 回复
#2
cnfarer2012-11-20 07:46
在连接字符串加就行了
#3
sunliantong2012-11-20 15:29
回复 2楼 cnfarer
谢谢!我知道在连接那一行写,就是不知道具体怎么写,请版主帮忙修改下写出来,我好参照这个可用例子分析他的格式,谢谢您了!
#4
阳大爷2012-11-20 16:49
和我接触的不一样啊。。。
#5
cnfarer2012-11-20 17:36
Jet OLEDB:Database Password=...;
亦或
User Id=admin; Password=...;
#6
sunliantong2012-11-20 22:59
回复 5楼 cnfarer
     Set conn = CreateObject("ADODB.Connection")      '链接
     '' conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("kuu1.mdb")'设置数据库相对路径
     conn.open "driver={microsoft access driver&nb sp;(*.mdb)};uid=admin;pwd=abc123;dbq=kuu1.mdb"  '改成这样正确吗?
      Set rs = CreateObject("adodb.recordset")
     rs.open "select * from 表名 where zmcm='" & trim(md5(zmcm)) & "'",conn,1,3'打开数据库搜索要查询的md5(zmcm)
      if  rs.eof then'如果无记录侧添加
          rs.addnew'新增加
          rs("zmcm") = trim(md5(zmcm))
          rs("day") = request("ti")
          rs.update
      else '已经存在
         Response.Write "已经存在,请重新住侧!"
     end if
     rs.close'关闭数据库
     conn.close '这几句是用来关闭数据库
set rs=nothing
     set conn=nothing'释放对像
#7
cnfarer2012-11-21 11:05
测试下不就行了
1