LANCER LA GENERATION D'UN ETAT ACCESS DEPUIS VB

Commentaire de jym le 21/03/2005 16:42:12

bjr,

j'ai l'impression qu'il faille MS ACCESS 2002 au mieux. en effet il me réclame acces composants 10.0 et je n'ai QUE 8.0.

y a t'il un moyen d'udpate sur ce composant ou est il dédié à la version?

en forçant le 8.0 j'ai une erreur d'execution (nbr d'arguments ou propriété incorrecte!!) donc cette commande n'est pas dans cette dll.

dommage, ça m'aurait bien servi!!!
je vai svoir si je peux trouver à le faire marcher autrement.

bon code

JYM

Commentaire de surfzoid le 27/03/2005 14:39:59

Je tiens aussi a préciser qu il faut légerement adapter mon code en fonction de ton fichier mdb et que dans un premier temps tu soit en mesure de generer un etat depuis access par exemple l 'état "résultat" et que ensuite tu exporte le code de cette état ce qui te rajoute une macro dans la section module et c est en fait ce code que j execute dans VB6

Commentaire de surfzoid le 12/06/2006 21:34:59

Ben il vaut mieu a la limite passer par ODBC pour la connexion "Cliente", en clair cela n'a rien a voir avec la cmd de generation cette derniere vien aprés la connection, donc si tu est en vs 2003 ou 2005 fait une connection avec l'interface graphique, puis dans code ca donne :
  - connection
  - cmd generation d'etat
  - deconection ....

Commentaire de surfzoid le 15/06/2006 20:16:48

Non j'ai bien dit ODBC qui permet de pas t'embeter avec les param de connexion et surtout le Mot de passe qui lorsque tu utilise ADO doit etre stocker dans ton prog et j'aime pas trop :
par exemple avec ADO (je crois fo verifier les reference VB6)

DRIVER={MySQL ODBC 3.51 Driver};SERVER=serveur.test;DATABASE=ADI;UID=nomuser.test;PWD=pass.test;port=3306;OPTION=3

en supposant que avec le gestionnaire ODBC tu est crée un DSN system ou user appeler "MonDSN"

DSN=MonDSN;PORT=0;SERVER=192.0.0.1;DATABASE=mabase.test;UID=nom user.test;OPTION=525414;DESCRIPTION=MonDSN

ceci s utilise en vs2003 avec un connecteur ODBC ou OLE et si le connecteur s'appel par exemple OdbcConnection1 dans le code il faut definir la connection comme suit :
Me.OdbcConnection1.ConnectionString = une des deux chaines précedante

Commentaire de surfzoid le 28/06/2006 10:33:22

A noter que les notes(lol) pour cette source sont toujours les bienvenues (etoiles en haut)

Je viens de trouver une seconde methode qui consiste non pas a utiliser le nom du rapport stocké dans access mais le nom d'une macro, cequi donne :
Pour la methode par nom de rapport :
Private Sub Command2_Click()
On Error Resume Next
KillProcessus "MSACCESS.EXE"
KillProcessus "SNAPVIEW.EXE"

If Dir(snap) <> "" Then Kill snap

        'en tapant dans le syteme d'etat access
        OpenCurrentDatabase (cheminbd & basededonnee & ".mdb")
        'DoCmd.OutputTo acReport, etat, "SnapshotFormat(*.snp)", snap, True, "", 0
        DoCmd.OutputTo acReport, etat, acFormatSNP, snap, -1
        CloseCurrentDatabase
End Sub

Pour la methode par nom de macro :
Private Sub Command2_Click()
On Error Resume Next
KillProcessus "MSACCESS.EXE"
KillProcessus "SNAPVIEW.EXE"

If Dir(snap) <> "" Then Kill snap
        'en tapant dans le syteme de macro access
        access.OpenCurrentDatabase (cheminbd & basededonnee & ".mdb")
        access.DoCmd.RunMacro (etat)
        CloseCurrentDatabase
End Sub

Commentaire de alexbigfoug le 16/03/2011 14:02:00

Le zip contient un virus!