Computer_IT/VisualBasic 2006.12.09 20:46
    OLEDB 로 연결 (암호)
   With ConnDB
       .CursorLocation = adUseClient
       .ConnectionTimeout = 0
       .CommandTimeout = 0
       .Provider = "Microsoft.Jet.OLEDB.4.0"
       .Properties("Jet OLEDB:Database Password") = "password"  '암호
       .Open App.Path & "\sample.mdb" '디비경로
   End With


ConnStr = "Provider=Microsoft.Jet.OLEDB.4.0;Persist Security Info=True;Jet OLEDB:Database Password=password;Data Source=" & App.Path & "sample.mdb"


posted by 고급코드 고급코드