Path Relatif / Absolue dans "opentextfile" - VB/VBA/VBS - Programmation
Marsh Posté le 30-12-2004 à 16:17:57
C'est possible de faire ça  avec tous les outils CreateDirectory, FolderExists etc etc..
 avec tous les outils CreateDirectory, FolderExists etc etc..
Marsh Posté le 30-12-2004 à 16:19:18
Bonjour, 
 
Il ya ça : 
Dim WshObj 
Set WshObj = Wscript.CreateObject("WScript.Shell" ) 
' Ouvrir avec 
'WshObj.Run "RunDll32.exe Shell32.dll,OpenAs_RunDLL", 1, True 
 
ou ça : 
'// Create the Object 
'cd = new ActiveXObject("MSComDlg.CommonDialog" ) 
set cd = CreateObject("MSComDlg.CommonDialog" ) 
 
'// Set file filter 
cd.Filter = "All Files(*.*)|*.*|JScript Files(*.js)|*.js" 
cd.FilterIndex = 2 
 
'// Must set MaxFileSize. Otherwise you will get an error 
cd.MaxFileSize = 128 
 
'// Show it to user 
cd.ShowOpen() 
 
'// Retrieve file + path 
file = cd.FileName 
 
'// If the user does enter file exit 
if file = "" then 
   WScript.Echo("You must enter a file name" ) 
   WScript.Quit(0) 
else 
   WScript.Echo("The user selected:\n" + file ) 
end if 
Marsh Posté le 30-12-2004 à 16:31:17
erf erf  
 
merci pour les reponses... mais.. avec mon niveau je dois dire que je ne comprend pas grand chose  
 
 
et surtout je ne vois pas comment utiliser le code  il me met des erreurs a la compile ou alors le prog plante
 il me met des erreurs a la compile ou alors le prog plante
Marsh Posté le 30-12-2004 à 16:36:27
en fait je dois mal utiliser ton code... 
 
j'ai creer un bouton est collé ton code dans la partie associé au bouton.. pour qu'il charge l'objet..  
 
 
sinon j'ai un probleme pour declarer WScript 
j'ai rajouté  
Dim WScript 
mais sans succes
Marsh Posté le 31-12-2004 à 08:01:51
Re, 
Tu dois ajouter la référence à VbScript 
Dans VB6, Menu Projet, Références, et tu coches "Microsoft Scripting Runtime"
Marsh Posté le 30-12-2004 à 16:06:30
bonjour,
j'aimerais pvr utiliser un path relatif a mon programem plutot que de donner le che complet
pour le moment jutilise ca
mais j'aimerais donc pouvoir mettre le programme dans F:\test1\blabla\ avec mon fichier attak.txt dedans , sans avoir a recompiler pour changer le path en dur!
Le must serait de mettre un mini browser pour que l'utilisateur montre ou est le fichier (sans tapper le chemin) mais je sais pas si c'est possible en VB ca
aplusche!
folk