Dim values As Map
values.Initialize
values.Put("messagetype","y")
values.Put("messageid","18969")
values.Put("replyid","117114")
values.Put("messagesubject","Styrservopump Chevrolet")
values.Put("messagetext","...")
values.Put("thefile","")
values.Put("fname","20130709_140829")
values.Put("link","")
values.Put("film","")
values.Put("ip","11.111.111.111")
values.Put("ReplyParent","117114")
values.Put("intUsrID","2033")
values.Put("txtUsrName","btbb76")
values.Put("submit"," Skicka inlägg ")
Dim adress As String
adress = "http://www.example.nu/validate.asp"
SendMultipartJob ("job5",adress,values)