Visual Basic 6 - password in access

Forum - Visual Basic 6 - password in access

dartraf (Normal User)
Pro

Messaggi: 71
Iscritto: 15/12/2005

Postato alle 17:09
Sabato, 31/03/2007

Ho creato un programma che si collega ad un db access con password....
nel db c'è un report che richiamo da vb con l'oggetto access.application per stampare...
ma al momento della chiamata mi chiede la password...
qualcuno sa dirmi come faccio ad eliminare la richiesta di pass???
nn posso passarla come parametro all'oggetto application????
Help me!!!!!

edit by netarrow: sistemato il titolo

Ultima modifica effettuata da netarrow il 06/04/2007 alle 21:21

()
Newbie

Messaggi:
Iscritto:

Postato alle 16:37
Martedì, 03/04/2007

Testo quotato

Postato originariamente da dartraf:

Ho creato un programma che si collega ad un db access con password....
nel db c'è un report che richiamo da vb con l'oggetto access.application per stampare...
ma al momento della chiamata mi chiede la password...
qualcuno sa dirmi come faccio ad eliminare la richiesta di pass???
nn posso passarla come parametro all'oggetto application????
Help me!!!!!

Ho appena letto...

posta il Codice e cercheremo di darti una mano

dartraf (Normal User)
Pro

Messaggi: 71
Iscritto: 15/12/2005

Postato alle 18:23
Martedì, 03/04/2007

Incomincio con l'aprire il db :
Set cnPrinc = New ADODB.Connection
cnPrinc.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & strPercorso & "\Db.mdb;Jet OLEDB

atabase Password=" & strPassword

poi provo a richiamare il report con la sub:

Public Sub PrintReport(ByVal DBPath As String, ByVal ReportName As String, Optional OpenMode As Integer)
    Dim appAccess As Object
    Set appAccess = CreateObject("Access.Application")
    Call appAccess.OpenCurrentDatabase(DBPath)
    appAccess.DoCmd.OpenReport ReportName, OpenMode
    Set appAccess = Nothing
End Sub

con la chiamata

Call PrintReport(strPercorso & "\Db.mdb", "REPORT", acViewNormal)

In questo modo utilizzo l'oggetto access.application che mi chiede la password del db per poter eseguire il report!!!

Come faccio ad eliminare la richiestadi pass???
Si puo passare per parametro che so all'oggetto "access.application"???

()
Newbie

Messaggi:
Iscritto:

Postato alle 19:59
Martedì, 03/04/2007

Testo quotato

Postato originariamente da dartraf:

Incomincio con l'aprire il db :
Set cnPrinc = New ADODB.Connection
cnPrinc.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & strPercorso & "\Db.mdb;Jet OLEDB

il DB che intendi aprire, é protetto da Password? :-?

dartraf (Normal User)
Pro

Messaggi: 71
Iscritto: 15/12/2005

Postato alle 12:21
Mercoledì, 04/04/2007

Si è protetto da password???
Ed è la stessa che mi chiede quando richiamo il report da vb!!!!
Conosci un metodo per passarla come parametro o eliminare la richiesta all'utente??