Pour cela on utilise FileOpenDialog.
Code : Tout sélectionner
$Var = FileOpenDialog ("","c:","All (*.*)",1)
si on retourne la valeur $var = on obtiendra comme sortie le lien du fichier.
si on retourne la fonction lire($var) = on obtiendra son contenu.
Code : Tout sélectionner
ConsoleWrite ( "#Source =" & $Var & @CRLF & "!Contenu du fichier" & @CRLF & lire( $Var ) )
Code : Tout sélectionner
msgbox ( 0 , "" , "#Source =" & $Var & @CRLF & "!Contenu du fichier" & @CRLF & lire( $Var ) )
Code : Tout sélectionner
func Lire ( $Fichier )
Return FileRead ( $Fichier , FileGetSize ( $Fichier ) )
EndFunc
ce petit code peut servir de base.