Bonjour,
Je cherche depuis quelques temps un moyen de tester l'existence d'un répertoire avec Super Macro mais sans succès. Quelqu'un saurait il me dire ce que j'ai raté (il me semble avoir tout essayer).
Sinon existe t il un script compatible VBS que je pourrais éventuellement insérer dans ma macro?
Par avance merci
Existance d'un répertoire
Re: Existance d'un répertoire
(Source) Un truc comme ça ?
'--------------------------------------------------------------------------
' Vérify if the folder exists.
'
' Parameters :
'-------------
' strFolderPath : Path of the folder.
'
' Retour :
'---------
' true if the folder exists, false else.
'
' See also :
'-------------
' Voir ReadFile,WriteFile,FileAttribs,WriteFileAttribs,DeleteFile,CopyFile,MoveFile
'--------------------------------------------------------------------------
Function FolderExists(strFolderPath)
Dim fileObject
Set fileObject = CreateObject("Scripting.FileSystemObject")
On Error Resume Next ' Si erreur, continuer
FolderExists = fileObject.FolderExists(strFolderPath)
If Err.number <> 0 Then
FolderExists = False
Call Err.Clear()
End If
On Error Goto 0
Set fileObject = Nothing
End Function
'--------------------------------------------------------------------------
' Vérify if the folder exists.
'
' Parameters :
'-------------
' strFolderPath : Path of the folder.
'
' Retour :
'---------
' true if the folder exists, false else.
'
' See also :
'-------------
' Voir ReadFile,WriteFile,FileAttribs,WriteFileAttribs,DeleteFile,CopyFile,MoveFile
'--------------------------------------------------------------------------
Function FolderExists(strFolderPath)
Dim fileObject
Set fileObject = CreateObject("Scripting.FileSystemObject")
On Error Resume Next ' Si erreur, continuer
FolderExists = fileObject.FolderExists(strFolderPath)
If Err.number <> 0 Then
FolderExists = False
Call Err.Clear()
End If
On Error Goto 0
Set fileObject = Nothing
End Function
J'ai découvert SM en 99, rapidement Adam m'a promu admin.
Posez vos questions aussi clairement que possible, sans fautes qui piquent les yeux et relisez vous.
Vérifiez sur mon DISCORD si je suis en ligne.
Posez vos questions aussi clairement que possible, sans fautes qui piquent les yeux et relisez vous.
Vérifiez sur mon DISCORD si je suis en ligne.
-
- Messages : 17
- Enregistré le : 07 mai 2018, 01:03
Re: Existance d'un répertoire
la fonction répertoire ne suffit pas ?
Variable <Var1>;;Alpha;
Fonction <Var1>;Fichier;répertoire?;"C:\Program Files (x86)";
<Var1> oui
Variable <Var1>;;Alpha;
Fonction <Var1>;Fichier;répertoire?;"C:\Program Files (x86)";
<Var1> oui
Re: Existance d'un répertoire
Aucune idée, j'ai juste trouver ce bout de code (à priori en VBS).
Je cherche à comprendre cette fonction ...
Pour le moment, ton code répond toujours "Oui".
J'arrive à avoir une réponse différente si le répertoire à un fichier spécifique, ou non. La réponse est inversée, mais elle change.
Variable <Var1>;0;Alpha;
Fonction <Var1>;Fichier;répertoire?;C:\BRU\test.txt;
Message Message;<Var1>;
Si le fichier est présent j'ai un "Non", si il est absent, j'ai "Oui"
Je cherche à comprendre cette fonction ...
Pour le moment, ton code répond toujours "Oui".
J'arrive à avoir une réponse différente si le répertoire à un fichier spécifique, ou non. La réponse est inversée, mais elle change.
Variable <Var1>;0;Alpha;
Fonction <Var1>;Fichier;répertoire?;C:\BRU\test.txt;
Message Message;<Var1>;
Si le fichier est présent j'ai un "Non", si il est absent, j'ai "Oui"
J'ai découvert SM en 99, rapidement Adam m'a promu admin.
Posez vos questions aussi clairement que possible, sans fautes qui piquent les yeux et relisez vous.
Vérifiez sur mon DISCORD si je suis en ligne.
Posez vos questions aussi clairement que possible, sans fautes qui piquent les yeux et relisez vous.
Vérifiez sur mon DISCORD si je suis en ligne.
-
- Messages : 17
- Enregistré le : 07 mai 2018, 01:03
Re: Existance d'un répertoire
c'est dans la rubrique fichier donc une fonction liée aux fichiers, essayer de comprendre la description
Description générale : Retourne le mot "oui" ou "non" suivant que lors de la saisie du paramètre 4 (Nom complet du fichier)ne serait finalement pas un nom de fichier valide mais plutôt un nom de répertoire.
Description générale : Retourne le mot "oui" ou "non" suivant que lors de la saisie du paramètre 4 (Nom complet du fichier)ne serait finalement pas un nom de fichier valide mais plutôt un nom de répertoire.
Re: Existance d'un répertoire
J'zrrive à le faire pour un fichier, pas pour un répertoire. Part de mon bout de code pour chercher. Je n'ai pas trouvé.
J'ai découvert SM en 99, rapidement Adam m'a promu admin.
Posez vos questions aussi clairement que possible, sans fautes qui piquent les yeux et relisez vous.
Vérifiez sur mon DISCORD si je suis en ligne.
Posez vos questions aussi clairement que possible, sans fautes qui piquent les yeux et relisez vous.
Vérifiez sur mon DISCORD si je suis en ligne.
Re: Existance d'un répertoire
Merci pour vos réponse.
Je voulais savoir si je pouvais m'en sortir seulement avec SM mais visiblement pas.
Il va falloir chercher du code plus du coté de VBS mais je n'ai jamais réussi à l'incorporer correctement dans SM.
Même le tout petit script dans le faq 4.1 de SM je n'arrive pas à l'utiliser (erreur syntaxe de code [1002]).
Je vais voir du coté HLML peut être ...
En tout les cas merci pour votre temps.
Némésis
Je voulais savoir si je pouvais m'en sortir seulement avec SM mais visiblement pas.
Il va falloir chercher du code plus du coté de VBS mais je n'ai jamais réussi à l'incorporer correctement dans SM.
Même le tout petit script dans le faq 4.1 de SM je n'arrive pas à l'utiliser (erreur syntaxe de code [1002]).
Je vais voir du coté HLML peut être ...
En tout les cas merci pour votre temps.
Némésis
Re: Existance d'un répertoire
Voici ma solution privilégiée...un petit fichier bat lol que je nomme "RepExist.bat":
IF exist "rep" echo "OUI">RepExist.bat
IF NOT exist "rep" echo "NON">RepExist.bat
Je fais des calculs évoluer pour écrire dans le .bat
en ligne1 : IF exist "+<Mon adresse>+" ...
en ligne2 : IF NOT exist "+<Mon adresse>+"....
Le fait de mettre > ou >> indique comment écrire dans le bat, à la place (>) de tout ou à la suite de tout(>>).
Bref, j'ai choisi > comme ça il n'y a que la réponse qui reste dans mon fichier .bat
Il faut penser à temporiser pour lui laisser le temps d'écrire "OUI" ou "NON".
Ce n'est pas la première foi que je recours à un petit fichier bat complémentaire pour me sortir d'une impasse. (Renommer des répertoires par exemple).
PS :j'aime pas les accents(ni le vocabulaire, ni ma grammaire etc...lol),désolé pour les fautes.
IF exist "rep" echo "OUI">RepExist.bat
IF NOT exist "rep" echo "NON">RepExist.bat
Je fais des calculs évoluer pour écrire dans le .bat
en ligne1 : IF exist "+<Mon adresse>+" ...
en ligne2 : IF NOT exist "+<Mon adresse>+"....
Le fait de mettre > ou >> indique comment écrire dans le bat, à la place (>) de tout ou à la suite de tout(>>).
Bref, j'ai choisi > comme ça il n'y a que la réponse qui reste dans mon fichier .bat
Il faut penser à temporiser pour lui laisser le temps d'écrire "OUI" ou "NON".
Ce n'est pas la première foi que je recours à un petit fichier bat complémentaire pour me sortir d'une impasse. (Renommer des répertoires par exemple).
PS :j'aime pas les accents(ni le vocabulaire, ni ma grammaire etc...lol),désolé pour les fautes.