IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

VBScript Discussion :

Création d'un script VBS avec VBS


Sujet :

VBScript

  1. #1
    Membre à l'essai
    Homme Profil pro
    Administrateur systèmes et réseaux
    Inscrit en
    novembre 2020
    Messages
    13
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Yvelines (Île de France)

    Informations professionnelles :
    Activité : Administrateur systèmes et réseaux

    Informations forums :
    Inscription : novembre 2020
    Messages : 13
    Points : 11
    Points
    11
    Par défaut Création d'un script VBS avec VBS
    Bonjour,
    Je voudrais savoir s'il est possible de créer un script VBS avec toutes les lignes de codes et dans un dossier précis avec un script VBS ?

    Je suis novice donc merci d'avance pour votre aide.

  2. #2
    Modérateur
    Avatar de ProgElecT
    Homme Profil pro
    Retraité
    Inscrit en
    décembre 2004
    Messages
    5 556
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 65
    Localisation : France, Haute Savoie (Rhône Alpes)

    Informations professionnelles :
    Activité : Retraité
    Secteur : Communication - Médias

    Informations forums :
    Inscription : décembre 2004
    Messages : 5 556
    Points : 13 781
    Points
    13 781
    Par défaut
    Salut

    Je ne suis pas sûr d'avoir compris ... mais, tu veux faire un programme en VbScript qui en créerait un autre, si oui, pas de problème, il suffit de créer un fichier qui écrit des commandes et de le sauvegarder avec le type .vbs, tous ceci en VbScript.

    Intéresses toi à l'objet FileSystemObject qui permet de créer un fichier et de le sauvegarder.
    Soyez sympa, pensez -y
    Balises[CODE]...[/CODE]
    Balises[CODE=NomDuLangage]...[/CODE] quand vous mettez du code d'un autre langage que celui du forum ou vous postez.
    Balises[C]...[/C] code intégré dans une phrase.
    Balises[C=NomDuLangage]...[/C] code intégré dans une phrase quand vous mettez du code d'un autre langage que celui du forum ou vous postez.
    Le bouton en fin de discussion, quand vous avez obtenu l'aide attendue.
    ......... et pourquoi pas, pour remercier, un pour celui/ceux qui vous ont dépannés.
    👉 → → Ma page perso sur DVP ← ← 👈

  3. #3
    Membre à l'essai
    Homme Profil pro
    Administrateur systèmes et réseaux
    Inscrit en
    novembre 2020
    Messages
    13
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Yvelines (Île de France)

    Informations professionnelles :
    Activité : Administrateur systèmes et réseaux

    Informations forums :
    Inscription : novembre 2020
    Messages : 13
    Points : 11
    Points
    11
    Par défaut
    J'ai suivi la méthode du fichier texte. Est ce correct ?

  4. #4
    Modérateur
    Avatar de ProgElecT
    Homme Profil pro
    Retraité
    Inscrit en
    décembre 2004
    Messages
    5 556
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 65
    Localisation : France, Haute Savoie (Rhône Alpes)

    Informations professionnelles :
    Activité : Retraité
    Secteur : Communication - Médias

    Informations forums :
    Inscription : décembre 2004
    Messages : 5 556
    Points : 13 781
    Points
    13 781
    Par défaut
    Oui

    Peux-tu nous faire voir le code ?
    Le fichier créé, que devient-il car il est inerte tant qu'il reste tout seul dans le dossier ou tu l'as sauvegardé.
    Soyez sympa, pensez -y
    Balises[CODE]...[/CODE]
    Balises[CODE=NomDuLangage]...[/CODE] quand vous mettez du code d'un autre langage que celui du forum ou vous postez.
    Balises[C]...[/C] code intégré dans une phrase.
    Balises[C=NomDuLangage]...[/C] code intégré dans une phrase quand vous mettez du code d'un autre langage que celui du forum ou vous postez.
    Le bouton en fin de discussion, quand vous avez obtenu l'aide attendue.
    ......... et pourquoi pas, pour remercier, un pour celui/ceux qui vous ont dépannés.
    👉 → → Ma page perso sur DVP ← ← 👈

  5. #5
    Membre à l'essai
    Homme Profil pro
    Administrateur systèmes et réseaux
    Inscrit en
    novembre 2020
    Messages
    13
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Yvelines (Île de France)

    Informations professionnelles :
    Activité : Administrateur systèmes et réseaux

    Informations forums :
    Inscription : novembre 2020
    Messages : 13
    Points : 11
    Points
    11
    Par défaut
    Voila le code que j'ai actuellement. Il permet uniquement de créer le fichier VBScript vide.

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
    19
    20
    21
    22
    23
    24
    25
    26
    27
    28
    29
    30
    31
    32
    33
    34
    35
    36
    37
    38
    39
    40
    Dim fso, NewFichier
    ''objet_fso, server
     
    '*** Préparation de l'environnement
    Set fso = WScript.CreateObject("Scripting.FileSystemObject")
    'Set objet_fso = Server.CreateObject("Scripting.FileSystemObject")
     
    'FichierVBS = "C:\ProgramData\TestEcritureScript.vbs"
     
    '*** Execute les droits administrateurs pour créer le vbscript
     
    If Not WScript.Arguments.Named.Exists("elevate") Then
         CreateObject("Shell.Application").ShellExecute WScript.FullName _
           , """" & WScript.ScriptFullName & """ /elevate", "", "runas", 1
         WScript.Quit
    End If
     
    FichierVBS = "C:\Windows\System32\GroupPolicy\User\Scripts\Logon\ScriptTest.vbs"
     
    '*** Création du fichier texte "C:\Windows\System32\...\Logon\Script.vbs"
    Set NewFichier = fso.CreateTextFile(FichierVBS,TRUE)
    'Set NewFichier = objet_fso.CreateTextFile(FichierVBS,TRUE)
     
    '*** Ajout de données dans la variable "data1".
    data1 = " Test de ..............."
     
    '*** Ecriture des données de la variable "data1" dans le fichier texte.
    NewFichier.WriteLine(data1)
     
    '*** Ajout de données dans la variable "data2".
    data2 = "Test de data2..."
     
    'data2 = "Ici les données data2 qui vont être écrite dans le fichier"
    NewFichier.WriteLine(data2)
     
    '*** Destruction des objets
    Set fso = Nothing
    'Set objet_fso = Nothing
     
    'WScript.Quit

  6. #6
    Membre à l'essai
    Homme Profil pro
    Administrateur systèmes et réseaux
    Inscrit en
    novembre 2020
    Messages
    13
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Yvelines (Île de France)

    Informations professionnelles :
    Activité : Administrateur systèmes et réseaux

    Informations forums :
    Inscription : novembre 2020
    Messages : 13
    Points : 11
    Points
    11
    Par défaut
    Le script va permettre de créer dans le dossier LOGON un script final .vbs qui doit contenir différente manipulation à faire faire à Windows pour au final monter des lecteurs.
    Il va se lancer à chaque démarrage de Windows.


    Le script va être envoyé à des personnes qui ne connaissent rien à l'informatique donc tout doit se passer avec un simple double clic.

Discussions similaires

  1. Création d'un script Shell avec 4 paramètres en entrée
    Par Lerchechem dans le forum Shell et commandes GNU
    Réponses: 5
    Dernier message: 17/09/2013, 11h32
  2. Erreur script VBS avec les "dossiers virtuels" Vista
    Par Aquafresh dans le forum Windows Vista
    Réponses: 2
    Dernier message: 04/10/2007, 18h08
  3. Script vbs ne pas ouvrir avec le Bloc-notes
    Par Noxilus dans le forum VBScript
    Réponses: 1
    Dernier message: 13/04/2007, 09h06
  4. Executer script VBS avec requette http
    Par kevain_09 dans le forum VBScript
    Réponses: 1
    Dernier message: 30/09/2006, 21h33
  5. Imprimer un fichier texte avec un script vbs
    Par Persons dans le forum Windows
    Réponses: 3
    Dernier message: 23/12/2004, 16h47

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo