N
NT
hello
we change our domain and so ihave 200 mails account to modify
users use outlook express (xp computer) or winmail (vista computer)
i made a script for my users who check the mail adress in the AD and modify
their adress locally
it works great for outlook express, but it doesn't for winmail, and i didn't
found a solution for
here is, the code if someone can give me a solution to do the same for
winmail client, thanks
code:
' part 1
On Error Resume Next
Set objSysInfo = CreateObject("ADSystemInfo")
strUser = objSysInfo.UserName
Set objUser = GetObject("LDAP://" & strUser)
email = objUser.mail
set WshShell = WScript.CreateObject("WScript.Shell")
valeurlue = WshShell.regRead ("HKCU\Software\Microsoft\Internet Account
Manager\Default Mail Account")
clea ="HKCU\Software\Microsoft\Internet Account Manager\Accounts\"
clepop=clea&valeurlue&"\POP3 User Name"
WshShell.RegWrite clepop,email,"REG_SZ"
clesmtpa=clea&valeurlue&"\SMTP Email Address"
WshShell.RegWrite clesmtpa,email,"REG_SZ"
Wscript.echo "ok"
end of the code
we change our domain and so ihave 200 mails account to modify
users use outlook express (xp computer) or winmail (vista computer)
i made a script for my users who check the mail adress in the AD and modify
their adress locally
it works great for outlook express, but it doesn't for winmail, and i didn't
found a solution for
here is, the code if someone can give me a solution to do the same for
winmail client, thanks
code:
' part 1
On Error Resume Next
Set objSysInfo = CreateObject("ADSystemInfo")
strUser = objSysInfo.UserName
Set objUser = GetObject("LDAP://" & strUser)
email = objUser.mail
set WshShell = WScript.CreateObject("WScript.Shell")
valeurlue = WshShell.regRead ("HKCU\Software\Microsoft\Internet Account
Manager\Default Mail Account")
clea ="HKCU\Software\Microsoft\Internet Account Manager\Accounts\"
clepop=clea&valeurlue&"\POP3 User Name"
WshShell.RegWrite clepop,email,"REG_SZ"
clesmtpa=clea&valeurlue&"\SMTP Email Address"
WshShell.RegWrite clesmtpa,email,"REG_SZ"
Wscript.echo "ok"
end of the code