03/04/07 14:37
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 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
03/04/07 16:23
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 OLEDBatabase 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"???
Set cnPrinc = New ADODB.Connection
cnPrinc.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & strPercorso & "\Db.mdb;Jet OLEDBatabase 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"???
aaa
03/04/07 17:59
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 OLEDBatabase 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"???
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 OLEDBatabase 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"???
il DB che intendi aprire, é protetto da Password?
04/04/07 10:21
dartraf
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??
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??
aaa