rss
Rechercher : dans
Par : Pertinence Date Nom d'utilisateur
Statut : Non résolu

Modification valeur %USERPROFILE% VBS

  Posté par deeb, le dimanche 14 octobre 2007 à 00:54:47
Bonjour,

Je cherche le moyen de modifier la valeur %USERPROFILE% depuis mon script VBS.

Merci d'avance.

Set wshnetwork = WScript.CreateObject("WScript.Network" )
user = wshnetwork.username

domain = wshnetwork.userdomain
computer = wshnetwork.computername

SRV = "SRVAPP"
Srvname = Left(computer, 6)

If Srvname = SRV Then
TEMP="\\srvpdc\profiles\" & user
End If

Set WshShellObj = WScript.CreateObject("WScript.Shell")
Set WshProcessEnv = WshShellObj.Environment("Process")
WScript.Echo WshProcessEnv("USERPROFILE")
WScript.Echo WshProcessEnv("USERNAME")
MsgBox Srvname
Configuration: Windows XP
Internet Explorer 7.0
Répondre à deeb  Signaler ce message aux modérateurs
Logiciels pertinents trouvés dans les téléchargements
Télécharger iTunes 7.7iTunes - iTunes est un lecteur multimédia gratuit proposé par Apple, permettant d'organiser sa musique, de synchroniser son lecteur...Catégorie: Podcasting/Streaming
Licence: Freeware/gratuit
Télécharger Inno Setup 5.2.3Inno Setup - Inno Setup est un installeur entièrement gratuit. Il crée des exécutables permettant d'installer les logiciels que vous avez...Catégorie: Développement
Licence: Freeware/gratuit
Télécharger VB Editor 2.0VB Editor - Décompileur de fichiers exécutables compilés avec Visual Basic 5 ou 6 Catégorie: Visual Basic
Licence: Freeware/gratuit
Télécharger Notepad++ 5.0.2Notepad++ - Notepad++ est un editeur de code source qui supporte plusieurs langages. Il s'agit d'un logiciel libre performant et...Catégorie: Développement
Licence: Open Source
Plus de logiciels gratuits sur « Modification valeur %USERPROFILE% VBS »