J'ai une petite application à réaliser et compte tenu de mes connaissances,
je ne sais pas si depuis VB6 on peut attaquer un Etat Access et l'imprimer.
Je préférerai faire ce programme tout en VB6 en m'appuyant sur Access et non
uniquement sous Access à cause de cet Etat.
La finalité est de créer un Etat Access pour imprimer des badges de
visiteurs et VB6
n'est pas le meilleur outil pour faire cela.
D'avance merci
gerr: Select Case Err.Number Case 0 Case 2501 Resume Next Case Else MsgBox "Erreur non gérée " & vbCrLf & Err.Number & " " & Err.Description End Select
End Sub
Dany
"RENAUD Eric" a écrit dans le message de news: %
Bonjour,
J'ai une petite application à réaliser et compte tenu de mes connaissances, je ne sais pas si depuis VB6 on peut attaquer un Etat Access et l'imprimer. Je préférerai faire ce programme tout en VB6 en m'appuyant sur Access et non uniquement sous Access à cause de cet Etat. La finalité est de créer un Etat Access pour imprimer des badges de visiteurs et VB6 n'est pas le meilleur outil pour faire cela. D'avance merci
Bonjour,
Public Sub ImprimerEtatAccess(NomEtat As String)
Dim AppAccess As Access.Application
Dim NomBase As String
Dim NomEtat As String
On Error GoTo gerr
'Position de la base de donnée
Set AppAccess = New Access.Application
'Ouverture de la base par Microsoft Access.
AppAccess.OpenCurrentDatabase NomBase
gerr:
Select Case Err.Number
Case 0
Case 2501
Resume Next
Case Else
MsgBox "Erreur non gérée " & vbCrLf & Err.Number & " " &
Err.Description
End Select
End Sub
Dany
"RENAUD Eric" <erenaud@wanadoo.fr> a écrit dans le message de news:
%230mOH0RbHHA.4012@TK2MSFTNGP03.phx.gbl...
Bonjour,
J'ai une petite application à réaliser et compte tenu de mes
connaissances,
je ne sais pas si depuis VB6 on peut attaquer un Etat Access et
l'imprimer.
Je préférerai faire ce programme tout en VB6 en m'appuyant sur Access et
non
uniquement sous Access à cause de cet Etat.
La finalité est de créer un Etat Access pour imprimer des badges de
visiteurs et VB6
n'est pas le meilleur outil pour faire cela.
D'avance merci
gerr: Select Case Err.Number Case 0 Case 2501 Resume Next Case Else MsgBox "Erreur non gérée " & vbCrLf & Err.Number & " " & Err.Description End Select
End Sub
Dany
"RENAUD Eric" a écrit dans le message de news: %
Bonjour,
J'ai une petite application à réaliser et compte tenu de mes connaissances, je ne sais pas si depuis VB6 on peut attaquer un Etat Access et l'imprimer. Je préférerai faire ce programme tout en VB6 en m'appuyant sur Access et non uniquement sous Access à cause de cet Etat. La finalité est de créer un Etat Access pour imprimer des badges de visiteurs et VB6 n'est pas le meilleur outil pour faire cela. D'avance merci
RENAUD Eric
Merci pour l'aide. Petie question : Ca correspond à quoi GvarIdDemande ? Est-ce mis pour la variable clause WHERE de l'OpenReport ?
Daniel AUBRY a écrit :
Bonjour,
Public Sub ImprimerEtatAccess(NomEtat As String) Dim AppAccess As Access.Application Dim NomBase As String Dim NomEtat As String On Error GoTo gerr
'Position de la base de donnée Set AppAccess = New Access.Application
'Ouverture de la base par Microsoft Access. AppAccess.OpenCurrentDatabase NomBase
gerr: Select Case Err.Number Case 0 Case 2501 Resume Next Case Else MsgBox "Erreur non gérée " & vbCrLf & Err.Number & " " & Err.Description End Select
End Sub
Dany
"RENAUD Eric" a écrit dans le message de news: %
Bonjour,
J'ai une petite application à réaliser et compte tenu de mes connaissances, je ne sais pas si depuis VB6 on peut attaquer un Etat Access et l'imprimer. Je préférerai faire ce programme tout en VB6 en m'appuyant sur Access et non uniquement sous Access à cause de cet Etat. La finalité est de créer un Etat Access pour imprimer des badges de visiteurs et VB6 n'est pas le meilleur outil pour faire cela. D'avance merci
Merci pour l'aide.
Petie question :
Ca correspond à quoi GvarIdDemande ?
Est-ce mis pour la variable clause WHERE de l'OpenReport ?
Daniel AUBRY a écrit :
Bonjour,
Public Sub ImprimerEtatAccess(NomEtat As String)
Dim AppAccess As Access.Application
Dim NomBase As String
Dim NomEtat As String
On Error GoTo gerr
'Position de la base de donnée
Set AppAccess = New Access.Application
'Ouverture de la base par Microsoft Access.
AppAccess.OpenCurrentDatabase NomBase
gerr:
Select Case Err.Number
Case 0
Case 2501
Resume Next
Case Else
MsgBox "Erreur non gérée " & vbCrLf & Err.Number & " " &
Err.Description
End Select
End Sub
Dany
"RENAUD Eric" <erenaud@wanadoo.fr> a écrit dans le message de news:
%230mOH0RbHHA.4012@TK2MSFTNGP03.phx.gbl...
Bonjour,
J'ai une petite application à réaliser et compte tenu de mes
connaissances,
je ne sais pas si depuis VB6 on peut attaquer un Etat Access et
l'imprimer.
Je préférerai faire ce programme tout en VB6 en m'appuyant sur Access et
non
uniquement sous Access à cause de cet Etat.
La finalité est de créer un Etat Access pour imprimer des badges de
visiteurs et VB6
n'est pas le meilleur outil pour faire cela.
D'avance merci
gerr: Select Case Err.Number Case 0 Case 2501 Resume Next Case Else MsgBox "Erreur non gérée " & vbCrLf & Err.Number & " " & Err.Description End Select
End Sub
Dany
"RENAUD Eric" a écrit dans le message de news: %
Bonjour,
J'ai une petite application à réaliser et compte tenu de mes connaissances, je ne sais pas si depuis VB6 on peut attaquer un Etat Access et l'imprimer. Je préférerai faire ce programme tout en VB6 en m'appuyant sur Access et non uniquement sous Access à cause de cet Etat. La finalité est de créer un Etat Access pour imprimer des badges de visiteurs et VB6 n'est pas le meilleur outil pour faire cela. D'avance merci