cs_charleshenri
Messages postés32Date d'inscriptionlundi 16 août 2004StatutMembreDernière intervention12 février 2006
-
31 août 2004 à 17:52
Scalpweb
Messages postés1467Date d'inscriptionsamedi 13 mars 2004StatutMembreDernière intervention 5 mai 2010
-
31 août 2004 à 19:22
voila j'ai un prog est je dois lui faire lire un fichier est ce fichier je voudrais quil le trouve dans le disque dur comme si on faisait une recherche . pouvait vous m'aidait et me donne le code svp sa serrais hyper sympas merci d'avance.
cs_ITALIA
Messages postés2169Date d'inscriptionvendredi 20 avril 2001StatutMembreDernière intervention30 juin 20099 31 août 2004 à 18:39
Utilises un control Common Dialog...
Projet.....Composants..Coches : Microsoft Common Dialog Control 6.0
RTF1 est un Composant RichTextBox
Places en 1 sur ta feuille
et mets ce code
Private Sub Command1_Click()
On Error GoTo Cancel
CommonDialog.FileName = ""
CommonDialog.Filter = "Fichier WORD (*.Doc)|*.Doc"
CommonDialog.Flags = cdlOFNLongNames Or cdlOFNFileMustExist Or cdlOFNHideReadOnly Or cdlOFNPathMustExist ' Options de la Boîte de Dialogue
CommonDialog.ShowOpen
If CommonDialog.FileName <> "" Then RTF1.Filename= CommonDialog.FileName