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 :

InputBox masquer pour password


Sujet :

VBScript

  1. #1
    Nouveau membre du Club
    Profil pro
    Inscrit en
    Juin 2010
    Messages
    5
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Juin 2010
    Messages : 5
    Par défaut InputBox masquer pour password
    Bonjour,

    Vous l'avait sûrement comprit d’après le titre, mon but et de masquer un mdp à la saisie de l'utilisateur.

    Je sais que ce sujet est plutôt compliqué... :p

    Contexte :
    Le point d'entré est un script vbs, qui demande un mdp à l'user. Je veut que ce mdp n'apparaisse pas. A l'heure actuelle j'utilise une inputBox (qui ne marche po )

    Comme tout les posts que je trouve sont anciens je me permet de vous demander les solutions existantes... Je doit le déployer sur plusieurs terminaux en xp Sp3

    J'ai vu : post de omen999 mais il n'est plus à jour ...

    Je voudrait éviter de passer par un script IE à cause des politique de sécurité appliquée dans mon entreprise.

    Quelles sont les moyens/techniques qui me permettent de faire cela ?

    Merci d'avance

  2. #2
    Rédacteur
    Avatar de omen999
    Profil pro
    Inscrit en
    Février 2006
    Messages
    1 302
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Février 2006
    Messages : 1 302
    Par défaut
    bonjour,
    ici (le script d'YMP)
    nomen omen, nemo non omen - Consultez la FAQ VBScript et les cours et tutoriels VBScript
    le plus terrible lorsqu'une voiture renverse un piéton, c'est que ce sont les freins qui hurlent. (ramón)
    pas de questions techniques par mp

  3. #3
    Nouveau membre du Club
    Profil pro
    Inscrit en
    Juin 2010
    Messages
    5
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Juin 2010
    Messages : 5
    Par défaut
    Nikel, merci bien, je regarde ça demain

    -----------------------

    C'est exactement ce que je voulait, je me permet de re-poster le code

    Code de VSVLAD sur forum.script-coding.info
    Dim Wrap, pAddr
    Dim CaptionText, InputData

    Const NV_INPUTBOX = &H5000&
    Const EM_SETPASSWORDCHAR = &HCC

    Set Wrap = CreateObject("DynamicWrapperX")
    Set pRef = GetRef("TimerProc")

    Wrap.Register "user32.dll", "FindWindowA", "i=ls", "r=l"
    Wrap.Register "user32.dll", "FindWindowExA", "i=llsl", "r=l"
    Wrap.Register "user32.dll", "SetTimer", "i=llll", "r=l"
    Wrap.Register "user32.dll", "KillTimer", "i=ll", "r=l"
    Wrap.Register "user32.dll", "SendMessageA", "i=llll", "r=l"

    pAddr = Wrap.RegisterCallback(pRef, "i=llll", "r=l")

    Function InputBoxEx(strPromt, strCaption)
    CaptionText = strCaption
    Call Wrap.SetTimer (0, 0, 10, pAddr)
    InputData = InputBox(strPromt, strCaption)
    InputBoxEx = InputData
    End Function

    Sub TimerProc(hWnd, uMsg, idEvent, dwTime)
    Dim myHwnd
    myHwnd = Wrap.FindWindowExA(Wrap.FindWindowA(0, CaptionText), 0, "Edit", 0)
    Call Wrap.SendMessageA(myHwnd, EM_SETPASSWORDCHAR, 42, 0)
    Call Wrap.KillTimer (0, idEvent)
    End Sub

    AA = InputBoxEx ("Введите ваш пароль =)", "Ввод данных")
    MsgBox AA
    Je passe en resolut, merci bien

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

Discussions similaires

  1. [XL-2007] Mettre * pour password
    Par Lufia dans le forum Macros et VBA Excel
    Réponses: 2
    Dernier message: 01/12/2009, 21h30
  2. conseil pour password
    Par looping dans le forum Administration
    Réponses: 7
    Dernier message: 10/02/2009, 23h33
  3. Réponses: 2
    Dernier message: 27/12/2008, 20h07
  4. Réponses: 2
    Dernier message: 18/03/2008, 14h23
  5. Boite de dialogue pour Password
    Par hammag dans le forum AWT/Swing
    Réponses: 3
    Dernier message: 17/05/2006, 13h40

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