Vista - How to add 0 in the field telephone Number

Hi all,

I have to change about 3000 user account information (telephone number)
adding the 0 at the start of the number...

I need help to do it in automatic way...

can someone help me???

please...

=?Utf-8?B?U2VyZ2lvIFNicmVubmE=?= wrote on 27 aug 2009 in
microsoft.public.scripting.vbscript:
for i = 1 to about 3000
telnumberString(i) = "0" & telnumberString(i)
next

--
Evertjan.
The Netherlands.
(Please change the x'es to dots in my emailaddress)

Sergio Sbrenna wrote:
Hi Sergio,

I suppose you mean changing Active Directory users.
If so, you can simply adapt this script from Microsoft:
http://www.microsoft.com/technet/scr...nda/dec06/hey1
211.mspx

Theoretically is enough to replace the lines:

strTelephone = objUser.telephoneNumber
objUser.Description = strTelephone

with the line:

objUser.telephoneNumber = "0" & objUser.telephoneNumber

and should work (obviously you also need to change
fabrikam.com with your AD domain).

Massimo.

--

"MassimoP" <nospam@xxxxxx> wrote in message
news:uYbmfdvJKHA.1488@xxxxxxGood solution. I might just add code so the "0" is only appended if the
telephoneNumber attribute is not blank. For example:
========
Do Until objRecordSet.EOF
strUserPath = objRecordSet.Fields("AdsPath").Value
Set objUser = GetObject(strUserPath)
strTelephone = objUser.telephoneNumber
If (strTelephone <> "") Then
objUser.Description = "0" & strTelephone
objUser.SetInfo
End If
objRecordSet.MoveNext
Loop
--------
And, to get picky, you could modify the query to only return users where
telephoneNumber is not missing.

--
Richard Mueller
MVP Directory Services
Hilltop Lab - http://www.rlmueller.net
--