Fonction If Vbs

Fermé

zfaze - 3 févr. 2012 à 08:47
Utilisateur anonyme - 3 févr. 2012 à 15:40

Bonjour,

J'aimerais utiliser vbs pour faire la tâcher suivante : J'ai un dossier qui s'appelle " Essai " dans C: .. J'aimerais le supprimer, avec l'affichage d'une fenêtre qui dit voulez-vous supprimer ce fichier ? Le fichier se supprime seulement si la personne clique sur " OUI "

Je pense pas que ce soit compliqué mais je ne sais pas du tout comment m'y prendre, merci d'avance ! :)

A voir également:

Fonction If Vbs
Fonction si et - Guide
Vbs windows - Accueil - Optimisation
Fonction moyenne excel - Guide
Fonction miroir - Guide
Fonction somme excel - Guide

1 réponse

Réponse 1 / 1

Utilisateur anonyme
Modifié par Lupin.PC4 le 3/02/2012 à 15:41

Bonjour,

Exemple type :

'------------------------------------------- 
' 
' Script VBS 
' 
    Dim Reponse 
    Dim objFSO, objFolder 

    Set objFSO = CreateObject("Scripting.FileSystemObject") 
    Set objFolder = objFSO.GetFolder("C:\Essai") 

    Reponse = MsgBox("Question ?", vbYesNo, "Demande de confirmation") 

    If (Reponse = vbYes) Then 
        MsgBox "Oui" 
        objFolder.Delete 
    Else 
        If (Reponse = vbNo) Then 
            MsgBox "Non" 
        End If 
    End If 

    Set objFolder = Nothing 
    Set objFSO = Nothing 

WScript.Quit(0)

Cdt

Lupin

Discussions similaires

La fonction FILTRE n'est plus reconnue

Bonsoir à tous,

je vis une déconvenue des plus troublantes : hier soir je finalisais avec succès une formule incluant la fonction FILTRE, tout fonctionnait, super. Aujourd'hui je la rouvre, et la fonction FILTRE n'est plus du tout reconnue. A la place, il y a ça : _xlfn._xlws.FILTER. Ce qui veut dire qu'elle n'est pas prise en charge ; pourtant hier elle l'était...

Mon produit est bien à jour, il s'agit d'Office 2016. Et en effet, sur la version en ligne d'Excel, la formule est proposée. Moi je n'ai plus que la fonction FILTRE.XML qui l'est...

Le lien du fichier :
https://cjoint.com/c/MBhuxJvSDZH

Pour info, il s'agit d'une formule ...

Remplir une cellule (texte) en fonction d'une autre (texte).

Bonjour à tous,

Je vais encore vous embêter aujourd'hui avec mon registre/rapport.

Ma question est simple (enfin je crois).
J'ai une liste de client :
- Autocars truc
- Bidule Autocars
- ... etc

J'ai une adresse pour chaque client (sous forme de liste) :
- Pont de Ernest
- Chemin Départemental 6
- ... etc

J'ai un code poste pour chaque client (sous forme de liste) :
- 99548
- ... etc

Ma question est : Si en D18 je récupère l'information du nom de mon client, je veux en D19 son adresse, en E20 son code postal et en M20 sa ville en fonction des listes d'ad...

Fonction if exist et else

Bonjour

Dès que le le lance, il fait tout le contraire de ce que je veux, si le renverse la comment en mode : Si le batch demandé n'existe pas envoi moi a AA il le fait, j'avoue ne pas comprendre comme la commande marche bien, mais n'arrive pas a trouver le fichier demandé, pourtant c'est tout bon...si vous voulez tester mettez vous sur clés et crée a la racine ce fichier, puis ce fichier dans E:\Core\BIOS et voyez, merci de vôtre aide d'avance.

Alors voici le code simple :
@echo off
cd E:\
cd
if exist [Installer.bat] (
goto :AA
)else (
goto :AB
)
exit
:AB
echo Aurevoir
pause ...

Comment savoir comment on nous a ajouté sur Snap

J’aimerai savoir si quelqu’un sait comment cela ce fait que j’ai des ajout sur snap mais qu’il n’y a pas marqué comment on m’a ajouté (ajout rapide, mention etc) il y a juste marqué le nom de la personne et à la place de comment la personne m’a ajouter son identifiant snap. Et je ne pense pas que ce soit un beugue parce que je reçois dés ajout ou là il y a écrit comment on m’a ajouté. Et quand je demande au personne ou ils ont eut mon snap ils me répondent ajout rapide je répond que c’est bizzare puisque ça ne me l’a pas mit et là personne change de sujet ( ce n’est pas la première). Et deuxième question aussi concernant les ajouts, un jour j’ai reçu un ajout sur snap via mention sachant que...