asp连接多个access数据库加密码

<%@ Language=VBScript %>
<%
    Dim conn1, conn2, rs1, rs2, sql1, sql2

    ' 第一个数据库的连接字符串
    conn1 = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\path\to\database1.mdb;Jet OLEDB:Database Password=yourPassword1;"
    
    ' 第二个数据库的连接字符串
    conn2 = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\path\to\database2.mdb;Jet OLEDB:Database Password=yourPassword2;"
    
    ' 创建ADO连接对象
    Set conn1 = Server.CreateObject("ADODB.Connection")
    Set conn2 = Server.CreateObject("ADODB.Connection")
    
    ' 打开数据库连接
    conn1.Open conn1
    conn2.Open conn2
    
    ' 执行查询
    sql1 = "SELECT * FROM Table1"
    sql2 = "SELECT * FROM Table2"
    
    Set rs1 = conn1.Execute(sql1)
    Set rs2 = conn2.Execute(sql2)
    
    ' 处理结果集...
    
    ' 关闭连接和记录集
    rs1.Close
    rs2.Close
    conn1.Close
    conn2.Close
    
    Set rs1 = Nothing
    Set rs2 = Nothing
    Set conn1 = Nothing
    Set conn2 = Nothing
%>