Dim j As HttpJob
j.Initialize("localping", Me)
Dim Data As Map
Data.Initialize
Data.Put("usr", HashUserName)
Data.Put("val", RequestAsString)
LogColor("addressgateway= [" & addressgateway & "]", Colors.Blue)
j.PostMultipart(addressgateway, Data, Null)