Exemple gestion vb6 access

Soyez le premier à donner votre avis sur cette source.

Vue 32 298 fois - Téléchargée 9 186 fois


Description

c'est le premier code que je dépose
ce code permet au débutants de pouvoir connecter une base de donnée access à une application vb6.
imprimer des pages.
controle flex grid.
gere la transparence.
mettre en place un skin.

LA BASE DE DONNEE EST DISPONIBLE. SON MOT DE PASSE EST admin

Conclusion :


vos commentaire et suggestions sont les bienvenu ansi que des améliorations sur cette source.

Codes Sources

A voir également

Ajouter un commentaire

Commentaires

jrivet
Messages postés
7401
Date d'inscription
mercredi 23 avril 2003
Statut
Membre
Dernière intervention
6 avril 2012
45 -
Salut,
Lorsque je télécharge une source pour voir un peu , j'aime bien qu'il y ai tout. Ici déjà rien qu'en ouvrant il manque:
- DataEnvironment1.Dsr
- DataReport1.Dsr
- DataReport2.Dsr
- Module1.Bas

Puis on ne peux même pas executer puis que pas de Base (même si tu avais prévenu)
Pourquoi ne pas avoir attendu pour mettre tout en même temps...
De plus on ne peu même pas ouvrir les feuilles sans générer des fichiers Log parce qu'il manque les icone ou les OLEObject (les skins) correspondant...
Bref lorsque tu déposes une source tu pourrais t'assurer qu'elle soit le plus portable possible...

Donc en fait la seule chose que l'on puisse faire c'est regarder le code:

Select Case Index
Case 0
S(0).BackColor = vbWhite
Case 1
Case 2
Case 3
Case 4: Calcul_solde
Case 5
Case 6: Calcul_solde
Case 7
Case 8: Calcul_solde
Case 9
Case 10: Calcul_solde
Case 11
End Select

Peu etre simplifié en

Select Case Index
Case 0: S(0).BackColor = vbWhite
Case 4, 6, 8, 10: Calcul_solde
End Select

Bref. je n'irais pas plus loin. mais il serait mieux d'apporter avant toute choses les modification nécessaire pour tester un peu le code.
@+
Julien
hourrane
Messages postés
29
Date d'inscription
dimanche 8 juin 2003
Statut
Membre
Dernière intervention
2 février 2009
-
veuillez revoir le contenu de ton fichier zip
hip9
Messages postés
9
Date d'inscription
lundi 24 mai 2004
Statut
Membre
Dernière intervention
24 avril 2008
-
oui bon je voulais le mettre le plus tot sur le site mais rien de grave je metterais tout le code ce soir
merci jrivet pour le code .
bon en tout cas je voulais travaillé avec le data report pour imprimer les feuilles mé c'est mieux de travailler avec la bibliothèque Ms Access object library.
RaphaDragon
Messages postés
15
Date d'inscription
lundi 19 mai 2003
Statut
Membre
Dernière intervention
19 août 2019
-
Bonjour,
pour ce qui est du prog je ne peut pas le lancer il bloque au niveau du lancement de la form la premiere au niveau lancement du skin1
Skin1.LoadSkin App.Path & "\WINAQUA.SKN" => objet requis
domage cela a l air simpa si tu vois ce que c est je suis preneur
merci
RaphaDragon
Messages postés
15
Date d'inscription
lundi 19 mai 2003
Statut
Membre
Dernière intervention
19 août 2019
-
Ok vu il manquait sur les feuilles le composant skin et apres ok c est bon merci j aime bcp je connaissais pas bcp skin et transparence classe 9/10

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.