Discussion :

[bigfoot75]

Bonjour,

Je voudrais savoir si il y a moyen de se connecter a un poste distant sans utiliser de variable, mais uniquement le compte courant ?

Je suis administrateur de tous les postes et je ne voudrais pas que mon user/mdp n'apparaisse dans mon VBS ( et je ne souhaite pas le taper a chaque lancement du vbs )

En fait ma question et double/triple ...

Je cherche a verifier sur un poste distant la presence d'une cle de registre ( HKLM ...... ) ainsi que la presence d'un exe dans un repertoire ( \\poste\c$\.... ) en m'appuyant sur un fichier ( excel par exemple )

Mon VBS prend le nom de machine dans la cellule A2, fait les 2 tests et ecrit le resultat OK ou pas ....

la cle de registre ainsi que l'endroit de l'exe est une donnée bien definie et fixe


Par avance merci de votre aide

[Flamby38]

Si les dossiers sont partagés sur les postes tu n'as aucun besoin de mot de passe, il suffit d'executer ton script sur le compte d'admin pour avoir accès aux fichiers. Pour la base de registre je ne suis pas sur, quel outil utilises tu pour la lire?

Sinon une autre possibilité c'est de faire un script que tu déploies par gpo, qui s'executera sur chaque poste, et qui va écrire un log dans un répertoire partagé.

[bigfoot75]

J'ai testé cette methode - nickel elle fonctionne tres bien.

Contexte : je suis dans un univers professionel, je suis administrateur de tous les postes ( mon profil fait parti d'un groupe admin )


voici le code ( je vous passe les DIM ..... )

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
 
Const HKEY_LOCAL_MACHINE = &H80000002
 
strComputer = "nom de machine"
 
' Clef de registre à vérifier
Set oReg=GetObject( _
"winmgmts:{impersonationLevel=impersonate}!\\" &_
strComputer & "\root\default:StdRegProv")
strKeyPath = "SYSTEM\CurrentControlSet\Services\TapiSrv"
strValueName = "Start"
oReg.GetDWORDValue HKEY_LOCAL_MACHINE,strKeyPath,strValueName,dwValue
 
 
f.Write dwValue