Hi Richard H

You are my favorite

Solved it with your help. Here is my code that can do all that I want.

 Code:
 
; Looping trough my Excel sheet to get username and others values

$username = "srvmik"

; Then the code to get FQDN
$userhome = TranslateName (3, "", 3, "@LDomain\$username", 1)
$userinfo = GetObject("LDAP://" + $userhome[0])

; Then set the parameters I want, either reset the value or 
; set a value from my excel sheet
$userinfo.TerminalServicesProfilePath = "\\server\share\srvmik"
$userinfo.SetInfo


; TranslateName function authored by Howard A. Bullock
Function TranslateName ($InitType, $BindName, $LookupNameType, $LookupName, $ReturnNameType)
Dim $InitType, $BindName, $LookupNameType, $LookupName, $ReturnNameType
Dim $NameTranslate, $ReturnName, $Error, $ErrorText
$Error = 0
$ErrorText = ""
$ReturnName = ""
$NameTranslate = CREATEOBJECT ("NameTranslate")
$Error = @error
$ErrorText = @serror
if $Error = 0
 $NameTranslate.Init ($InitType, $BindName)
 $Error = @error
 $ErrorText = @serror
 if $Error = 0
  $NameTranslate.Set ($LookupNameType, $LookupName)
  $Error = @error
  $ErrorText = @serror
  if $Error = 0
   $ReturnName = $NameTranslate.Get($ReturnNameType)
   $Error = @error
   $ErrorText = @serror
  endif
 endif
endif
$TranslateName = $ReturnName, $Error, $ErrorText
Endfunction