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 :

Probleme entre VBS et BGInfo


Sujet :

VBScript

  1. #1
    Membre averti
    Profil pro
    Inscrit en
    Mars 2008
    Messages
    55
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Mars 2008
    Messages : 55
    Par défaut Probleme entre VBS et BGInfo
    Bonjour à tous ,

    J'espere que vous avez passé un bon weekend?!

    Voila , mon probleme est le suivant : j'utilise le soft BgInfo ( il permet d'afficher des informations sur le systeme du PC ) et j'ai empreinté un script ( que j'ai testé , il affiche bien ce que je lui demande ) qui permet d'afficher le free space des DD en % . Seulement , lorsque que je veux mettre mon script , il m'indique une erreur au niveau de cette ligne :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
     
    Wscript.Echo objDisk.DeviceID, FormatPercent(pctFreeSpace)
    Le message d'erreur est le suivant : erreur d'execution ligne 10 ; position 4

    Je ne comprend pas pourquoi....pouvez vous m'aider ??

    merci!

  2. #2
    Expert confirmé
    Avatar de ced600
    Homme Profil pro
    Développeur .NET
    Inscrit en
    Août 2006
    Messages
    3 364
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 44
    Localisation : France

    Informations professionnelles :
    Activité : Développeur .NET

    Informations forums :
    Inscription : Août 2006
    Messages : 3 364
    Par défaut
    avec si peu de code non.

  3. #3
    Membre averti
    Profil pro
    Inscrit en
    Mars 2008
    Messages
    55
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Mars 2008
    Messages : 55
    Par défaut
    Citation Envoyé par ced600 Voir le message
    avec si peu de code non.

    Je suis désolé , ...
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    strComputer = "."
    Set objWMIService = GetObject("winmgmts:" _
        & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
    Set colDisks = objWMIService.ExecQuery _
        ("Select * from Win32_LogicalDisk Where DriveType = 3")
    For Each objDisk in colDisks
        intFreeSpace = objDisk.FreeSpace
        intTotalSpace = objDisk.Size
        pctFreeSpace = intFreeSpace / intTotalSpace
        Wscript.Echo objDisk.DeviceID, FormatPercent(pctFreeSpace)
    Next

  4. #4
    Expert confirmé
    Avatar de ced600
    Homme Profil pro
    Développeur .NET
    Inscrit en
    Août 2006
    Messages
    3 364
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 44
    Localisation : France

    Informations professionnelles :
    Activité : Développeur .NET

    Informations forums :
    Inscription : Août 2006
    Messages : 3 364
    Par défaut
    Ton code marche chez moi.

    Comment lances tu le vbs ?

    A la place de Wscript.Echo, essaye une msgbox.

  5. #5
    Membre averti
    Profil pro
    Inscrit en
    Mars 2008
    Messages
    55
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Mars 2008
    Messages : 55
    Par défaut
    En faite lorsque je l'ouvre , il marche... mais c quand je veux d'éxécuter dans BgInfo que ça ne marche pas! BgInfo semble ne pas apprécier le "wscript.echo" présent sur une ligne du script!

  6. #6
    Expert confirmé
    Avatar de ced600
    Homme Profil pro
    Développeur .NET
    Inscrit en
    Août 2006
    Messages
    3 364
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 44
    Localisation : France

    Informations professionnelles :
    Activité : Développeur .NET

    Informations forums :
    Inscription : Août 2006
    Messages : 3 364
    Par défaut
    Qu'est ce que bginfo ?

  7. #7
    Membre averti
    Profil pro
    Inscrit en
    Mars 2008
    Messages
    55
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Mars 2008
    Messages : 55
    Par défaut
    Ben je l'ai mit au dessus , c'est un soft qui permet de savoir les informations principales sur le systeme.

  8. #8
    Membre chevronné
    Inscrit en
    Août 2007
    Messages
    302
    Détails du profil
    Informations personnelles :
    Âge : 58

    Informations forums :
    Inscription : Août 2007
    Messages : 302
    Par défaut
    Citation Envoyé par ced600 Voir le message
    Qu'est ce que bginfo ?
    Salut,

    BgInfo c'est un utilitaire vraiment utile ! , agréé Crosoft.

    http://technet.microsoft.com/en-us/s.../bb897557.aspx

    Ca permet d'afficher tout un tas d'info sur ton bureau destinées essentiellement pour la hotline. Tu as par exemple le nom de ta machine, ton domaine, ton OS, dernier reboot...

    Pour en revenir à la demande de Topino, peux-tu essayer de Wscript.Echo par Echo seulement, tu as un exemple ici :

    http://www.bartonline.be/2008/02/10/...ls+BgInfo.aspx



    A++

  9. #9
    Membre chevronné
    Inscrit en
    Août 2007
    Messages
    302
    Détails du profil
    Informations personnelles :
    Âge : 58

    Informations forums :
    Inscription : Août 2007
    Messages : 302
    Par défaut
    et remplace ca :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
     
        Wscript.Echo objDisk.DeviceID, FormatPercent(pctFreeSpace)

    par

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
     
        Echo objDisk.DeviceID & " " & FormatPercent(pctFreeSpace)
    A++

  10. #10
    Membre averti
    Profil pro
    Inscrit en
    Mars 2008
    Messages
    55
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Mars 2008
    Messages : 55
    Par défaut
    Echo objDisk.DeviceID & " " & FormatPercent(pctFreeSpace)




    Franchement merci beaucoup.D'ailleurs sans abusait de ton temps serait il possible de checker l'état du raid et l'intégrité des DD , de la même façon ?

    Encore merci

  11. #11
    Expert confirmé
    Avatar de ced600
    Homme Profil pro
    Développeur .NET
    Inscrit en
    Août 2006
    Messages
    3 364
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 44
    Localisation : France

    Informations professionnelles :
    Activité : Développeur .NET

    Informations forums :
    Inscription : Août 2006
    Messages : 3 364
    Par défaut
    Oui regarde sur msdn l'aide sur les objets WMI et notemment l'objet Win32_LogicalDisk.

    Utilises aussi WMICodeGenerator (dans les contributions). Tu sélectionnes l'objet WMI, les propriétés ou méthodes, et cela te génère le code en VBS, VB, et C#.
    En plus tu as une description des classes Win32 et CIM en français (dernier onglet).

  12. #12
    Membre chevronné
    Inscrit en
    Août 2007
    Messages
    302
    Détails du profil
    Informations personnelles :
    Âge : 58

    Informations forums :
    Inscription : Août 2007
    Messages : 302
    Par défaut
    Salut Topino,

    je ne réponds pas aux MP techniques, je considère que le forum est là pour ca.

    Comme CED600, je te conseille d'aller voir dans le WMI dans LogicalDisk mais aussi SCSIController, dans ces 2 classes, tu as les propriétés Status et StatusInfo.

    A++

  13. #13
    Membre averti
    Profil pro
    Inscrit en
    Mars 2008
    Messages
    55
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Mars 2008
    Messages : 55
    Par défaut
    Bonjour ,

    Escusez moi de vous répondre que maintenant.... Je tiens à vous remercier tous les deux pour votres aides.Je vais regarder ça tout de suite.

    Cdlt Topino

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. Probleme entre VBA et VBS
    Par orliko dans le forum VBScript
    Réponses: 6
    Dernier message: 07/11/2012, 15h00
  2. Probleme entre VBS et XML
    Par Menontona dans le forum VBScript
    Réponses: 4
    Dernier message: 18/06/2009, 12h57
  3. [PostgreSQL] [PostgreSQL] Probleme entre PHP & PostgreSQL
    Par flo78 dans le forum PHP & Base de données
    Réponses: 7
    Dernier message: 13/01/2006, 10h51
  4. Réponses: 8
    Dernier message: 30/12/2005, 13h47
  5. [MFC] enorme probleme entre statics et includes
    Par giova_fr dans le forum MFC
    Réponses: 4
    Dernier message: 09/12/2005, 14h15

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