Visual basic sur access
Stéphanie
-
reger_men -
reger_men -
Bonjour,
J'ai un problème au niveau d'une base de donnée que je suis entrain de créer sur Access. Ma base répertorie des images, et pour ajouter ces images, j'aimerai créer un bouton "parcourir" pour les rechercher dans tous les disques durs de l'ordinateur.
J'ai déjà l'application VB pour ce bouton, le problème c'est que je ne sais pas comment faire pour intéger cette application à mon formulaire Access.
Quelqu'un peut m'aider?
J'ai un problème au niveau d'une base de donnée que je suis entrain de créer sur Access. Ma base répertorie des images, et pour ajouter ces images, j'aimerai créer un bouton "parcourir" pour les rechercher dans tous les disques durs de l'ordinateur.
J'ai déjà l'application VB pour ce bouton, le problème c'est que je ne sais pas comment faire pour intéger cette application à mon formulaire Access.
Quelqu'un peut m'aider?
A voir également:
- Visual basic sur access
- Visual basic - Télécharger - Langages
- Visual basic editor - Télécharger - Langages
- Visual petanque - Télécharger - Sport
- Microsoft 365 basic - Accueil - Microsoft Office
- Visual c++ 2019 - Guide
5 réponses
Dans VB, Projet/References, ajouter Microsoft Scripting Runtime comme une nouvelle reference. Declare une nouvelle instance FileSystemObject (ex: dim fs as new FileSystemObject), ce nouvel objet te permettra d'acceder/manipuler tous tes disques/drives/files.
salut et merci de m'aider a resoudre mon probleme
je suis en train de créer une application de gestion commercial et dans l'execution de mes formulaires il ya des erreurs que je n'arrive pas a resoudre
1. Erreur d'execution 3704: cette operatio n'est pas autorisée si l'objet est ouvert ou si l'ibjet est fermé
2. Erreur d'execution 3265:Impossible de trouver l'objet dans la collection correspondante au nom ou a a reference ordinale demandée
3. Erreur d'execution 91 : variable objet ou variable bloc with non definie
4. Erreur d'execution -2147217843(80040e4d) echec de l'authentification
5. Erreur d'execution -2147217904(80040e10) aucune valeur donnée pour un ou plusieurs des parametres requis
je suis en train de créer une application de gestion commercial et dans l'execution de mes formulaires il ya des erreurs que je n'arrive pas a resoudre
1. Erreur d'execution 3704: cette operatio n'est pas autorisée si l'objet est ouvert ou si l'ibjet est fermé
2. Erreur d'execution 3265:Impossible de trouver l'objet dans la collection correspondante au nom ou a a reference ordinale demandée
3. Erreur d'execution 91 : variable objet ou variable bloc with non definie
4. Erreur d'execution -2147217843(80040e4d) echec de l'authentification
5. Erreur d'execution -2147217904(80040e10) aucune valeur donnée pour un ou plusieurs des parametres requis
Salut Stéphanie,
Pour ouvrir une boite de dialogue, tu dois:
1. Ajouter un contrôle de type "CommonDialog" (OLE Class). Supposons que ce contrôle s'appel Cmdialog.
2. Tu crées un boutons et tu demandes l'exécution du code suivant lors de l'event "On Click" (en supposant que tu veux un filtre sur les fichiers de type .JPG):
CmDialog.Filter = "Access Database(*.jpg) |*.jpg"
CmDialog.ShowOpen
If CommonDialog1.FileName <> "" Then
strNewPath = CmDialog.FileName (ici tu récupères l'adresse du fichier sélectionné)
Else
Exit Sub
End If
Voili, Voilou
Remaque: le contrôle de type "commondialog" n'est visible qu'en mode design.
Rien n'est plus dangereux qu'une idée quand on a
qu'une idée :-)
Pour ouvrir une boite de dialogue, tu dois:
1. Ajouter un contrôle de type "CommonDialog" (OLE Class). Supposons que ce contrôle s'appel Cmdialog.
2. Tu crées un boutons et tu demandes l'exécution du code suivant lors de l'event "On Click" (en supposant que tu veux un filtre sur les fichiers de type .JPG):
CmDialog.Filter = "Access Database(*.jpg) |*.jpg"
CmDialog.ShowOpen
If CommonDialog1.FileName <> "" Then
strNewPath = CmDialog.FileName (ici tu récupères l'adresse du fichier sélectionné)
Else
Exit Sub
End If
Voili, Voilou
Remaque: le contrôle de type "commondialog" n'est visible qu'en mode design.
Rien n'est plus dangereux qu'une idée quand on a
qu'une idée :-)
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
J'ai déjà créé l'application VB pour chercher dans les disques durs mes images, le tout maintenant c'est de l'inclure dans le code VBA et pour l'instant je n'ai pas réussi car VBA n'a pas l'air de reconnaitre justement l'objet FileSystemObject.
Je te remercie quand même :-)
Stephanie