Ouvrir en vbs

pivot85150 Messages postés 336 Statut Membre -  
 Utilisateur anonyme -
Bonjour,
voila j'ai élaborer un code pour mettre un mot de passe sur un dossier mais le pb c'est que je ne sais pas comment ouvrir un dossier en langage vbs
voici mon code :

password=inputbox("donne le mot de passe","hello" )
if password="coucou" then
msgbox "C'est le bon mot de passe"
start "images.doc"
else
msgbox "mauvais mot de passe"
End if

le gras c'est ou j'ai un pb
pourriez vous m'aidez s'il vous plait c'est assez urgent merci.
Configuration: Windows Vista Internet Explorer 7.0

1 réponse

  1. Utilisateur anonyme
     
    Re =) 

    password=inputbox("donne le mot de passe","hello" ) 
if password="coucou" then 
msgbox "C'est le bon mot de passe" 
set open_file=CreateObject("WScript.Shell")
open_file.run ("images.doc")
else 
msgbox "mauvais mot de passe" 
End if
    0