DominoArea.org [Archive]

J'explique :Je voudrais faire un bouton d'action qui me permettrait LORS DE LA CREATION D'UN MEMO de selectionner un fichier dans un explorateur Windows, puis de mettre un lien hyper texte DANS LE CORPS DU MESSAGE sur ce fichier (par exemple si je sélectionne C:\Mes Document\mon fichier.xls, je veux un lien hypertexte qui va lancer ce fichier Excel)Voici le début de mon script qui me permet de récupérer un fichier sur l'explorateur im w As New NotesUIWorkspaceDim file As Variantfile = w.OpenFileDialog(True, "Sélectionnez le fichier ...", "", "P:")Dim fil as StringForall filelist In file fil = fil & filelist & Chr(10)End ForallCall w.EditDocument( True )Messagebox "Fichier sélectionné : " & filMes problèmes :1) Comment faire pour ne permettre la sélection que d'un seul fichier ?2) Comment faire pour ajouter dans le corps du message (Body) un lien hypertext vers fil (nom de ma variable qui contient le chemin d'accès et le nom du fichier sélectionné)Merci les amis

Pour ce qui est d'empécher la multiselection, il faut que tu mettes false comme premier paramètre.

Pour le choix d'un seul fichier, ça roule !Pour rappel, le but est de faire un agent qui va se lancer à la main par le menu Action, cet agent devra vérifier que nous sommes entrain de rédiger un mémo et que nous sommes dans la partie "Body" du mémo, il devra ensuite permettre de sélectionner un fichier sur le réseau et créer un lien hypertexte vers ce fichier à l'emplacement où était placé le curseur dans "Body"Maintenant, voici le début de mon script : Dim w As New NotesUIWorkspace Dim doc As NotesUIDocument Set doc = w.CurrentDocument Dim file As Variant file = w.OpenFileDialog(False, "Sélectionnez le fichier ...", "", "P:")Je sélectionne donc un fichier et son chemin complet se retrouve dans la variable "file" qui est de type variantAjouter un lien hypertexte dans le contenu de Body avec un texte genre "lien ici", ce texte doit être un hyper texte qui va lancer le document quand on cliquera dessus.Comment faire pour ajouter un lien hyper texte à "Body" à l'emplacement où on se trouve lorsque l'on va lancer cet agent ?Merci