Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Gilles LAURENT [MVP]
"Frédéric Breassier - News" a écrit dans le message de news: | Bonjour,
Bonjour,
| Avez-vous un script pour supprimer tous les comptes enregistrés dans | Outlook express ?
Ci-dessous le script VBScript "RemoveOutlookAccounts.vbs" permettant de supprimer tous les comptes de courrier et comptes de news définis dans Outlook Express pour le profil de l'utilisateur courant :
' initialisation des objets Set oRe = New RegExp: oRe.Pattern = "d{8}" Set oReg = GetObject ("winmgmts:/root/default:stdregprov")
' suppression des comptes oReg.EnumKey HKCU, SUBKEY, arrKeys For Each strKey In arrKeys If oRe.Test (strKey) Then oReg.DeleteKey HKCU, SUBKEY & "" & strKey End If Next --- Coupez ici : RemoveOutlookAccounts.vbs ---
-- Gilles LAURENT MVP Windows Server - Admin Frameworks http://glsft.free.fr
"Frédéric Breassier - News" <frederic.breassier@groupe-mb.com.nospam> a
écrit dans le message de
news:OB1i5yf9HHA.748@TK2MSFTNGP04.phx.gbl
| Bonjour,
Bonjour,
| Avez-vous un script pour supprimer tous les comptes enregistrés dans
| Outlook express ?
Ci-dessous le script VBScript "RemoveOutlookAccounts.vbs" permettant de
supprimer tous les comptes de courrier et comptes de news définis dans
Outlook Express pour le profil de l'utilisateur courant :
' initialisation des objets
Set oRe = New RegExp: oRe.Pattern = "d{8}"
Set oReg = GetObject ("winmgmts:/root/default:stdregprov")
' suppression des comptes
oReg.EnumKey HKCU, SUBKEY, arrKeys
For Each strKey In arrKeys
If oRe.Test (strKey) Then
oReg.DeleteKey HKCU, SUBKEY & "" & strKey
End If
Next
--- Coupez ici : RemoveOutlookAccounts.vbs ---
--
Gilles LAURENT
MVP Windows Server - Admin Frameworks
http://glsft.free.fr
"Frédéric Breassier - News" a écrit dans le message de news: | Bonjour,
Bonjour,
| Avez-vous un script pour supprimer tous les comptes enregistrés dans | Outlook express ?
Ci-dessous le script VBScript "RemoveOutlookAccounts.vbs" permettant de supprimer tous les comptes de courrier et comptes de news définis dans Outlook Express pour le profil de l'utilisateur courant :
' initialisation des objets Set oRe = New RegExp: oRe.Pattern = "d{8}" Set oReg = GetObject ("winmgmts:/root/default:stdregprov")
' suppression des comptes oReg.EnumKey HKCU, SUBKEY, arrKeys For Each strKey In arrKeys If oRe.Test (strKey) Then oReg.DeleteKey HKCU, SUBKEY & "" & strKey End If Next --- Coupez ici : RemoveOutlookAccounts.vbs ---
-- Gilles LAURENT MVP Windows Server - Admin Frameworks http://glsft.free.fr
Frédéric Breassier - News
merci beaucoup
"Gilles LAURENT [MVP]" a écrit dans le message de news: %
"Frédéric Breassier - News" a écrit dans le message de news: | Bonjour,
Bonjour,
| Avez-vous un script pour supprimer tous les comptes enregistrés dans | Outlook express ?
Ci-dessous le script VBScript "RemoveOutlookAccounts.vbs" permettant de supprimer tous les comptes de courrier et comptes de news définis dans Outlook Express pour le profil de l'utilisateur courant :
' initialisation des objets Set oRe = New RegExp: oRe.Pattern = "d{8}" Set oReg = GetObject ("winmgmts:/root/default:stdregprov")
' suppression des comptes oReg.EnumKey HKCU, SUBKEY, arrKeys For Each strKey In arrKeys If oRe.Test (strKey) Then oReg.DeleteKey HKCU, SUBKEY & "" & strKey End If Next --- Coupez ici : RemoveOutlookAccounts.vbs ---
-- Gilles LAURENT MVP Windows Server - Admin Frameworks http://glsft.free.fr
merci beaucoup
"Gilles LAURENT [MVP]" <glsft@free.fr> a écrit dans le message de news:
%23qEANdg9HHA.5160@TK2MSFTNGP05.phx.gbl...
"Frédéric Breassier - News" <frederic.breassier@groupe-mb.com.nospam> a
écrit dans le message de
news:OB1i5yf9HHA.748@TK2MSFTNGP04.phx.gbl
| Bonjour,
Bonjour,
| Avez-vous un script pour supprimer tous les comptes enregistrés dans
| Outlook express ?
Ci-dessous le script VBScript "RemoveOutlookAccounts.vbs" permettant de
supprimer tous les comptes de courrier et comptes de news définis dans
Outlook Express pour le profil de l'utilisateur courant :
' initialisation des objets
Set oRe = New RegExp: oRe.Pattern = "d{8}"
Set oReg = GetObject ("winmgmts:/root/default:stdregprov")
' suppression des comptes
oReg.EnumKey HKCU, SUBKEY, arrKeys
For Each strKey In arrKeys
If oRe.Test (strKey) Then
oReg.DeleteKey HKCU, SUBKEY & "" & strKey
End If
Next
--- Coupez ici : RemoveOutlookAccounts.vbs ---
--
Gilles LAURENT
MVP Windows Server - Admin Frameworks
http://glsft.free.fr
"Gilles LAURENT [MVP]" a écrit dans le message de news: %
"Frédéric Breassier - News" a écrit dans le message de news: | Bonjour,
Bonjour,
| Avez-vous un script pour supprimer tous les comptes enregistrés dans | Outlook express ?
Ci-dessous le script VBScript "RemoveOutlookAccounts.vbs" permettant de supprimer tous les comptes de courrier et comptes de news définis dans Outlook Express pour le profil de l'utilisateur courant :
' initialisation des objets Set oRe = New RegExp: oRe.Pattern = "d{8}" Set oReg = GetObject ("winmgmts:/root/default:stdregprov")
' suppression des comptes oReg.EnumKey HKCU, SUBKEY, arrKeys For Each strKey In arrKeys If oRe.Test (strKey) Then oReg.DeleteKey HKCU, SUBKEY & "" & strKey End If Next --- Coupez ici : RemoveOutlookAccounts.vbs ---
-- Gilles LAURENT MVP Windows Server - Admin Frameworks http://glsft.free.fr