cs_sousouinf
Messages postés2Date d'inscriptionsamedi 20 décembre 2008StatutMembreDernière intervention12 février 2010
-
22 mars 2009 à 12:14
cs_sousouinf
Messages postés2Date d'inscriptionsamedi 20 décembre 2008StatutMembreDernière intervention12 février 2010
-
22 mars 2009 à 16:59
bonjour tous le monde,
j'ai créer une base de donnée access dans laquel le type de mes attributs est "lien hypertexte" vers un fichier word ,excel ou power point, je veux afficher le contenu de ce lienhypertexte à partir de VB
cs_Jack
Messages postés14006Date d'inscriptionsamedi 29 décembre 2001StatutModérateurDernière intervention28 août 201579 22 mars 2009 à 15:54
Salut
Pour un vrai lien Internet, il te suffit de poser sur une forme l'objet WebBrowser que tu trouveras parmi les composants additionnels ou les composants OLE, et de lui fournir ton lien dans Navigate.
Comme là ces liens pointent vers des chemins de fichiers locaux et "ouvrables" avec un progiciel, il te suffit de fournir le chemin à l'API nommée ShellExecute qui s'occupera de retrouver le progiciel qui va avec l'extension du fichier.
Dans la partie déclaration de ta forme ou de ton module :
Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" ( _
ByVal hwnd As Long, _
ByVal lpOperation As String, _
ByVal lpFile As String, _
ByVal lpParameters As String, _
ByVal lpDirectory As String, _
ByVal nShowCmd As Long) As Long
Const SW_SHOWNORMAL = 1
Quand tu veux t'en servir :
ShellExecute ByVal 0, _
vbNullString, _
LeCheminComplet, _
vbNullString, _
LeCheminSansFichier, _
SW_SHOWNORMAL
où les variables représentent :
LeCheminComplet : exemple "C:\mon chemin\vers le\fichier\Le nom du fichier.DOC"
LeCheminSansFichier : exemple "C:\mon chemin\vers le\fichier"
Vala
Jack, MVP VB NB : Je ne répondrai pas aux messages privés
<hr />Le savoir est la seule matière qui s'accroit quand on la partage (Socrate)