Dim job1 As HttpJob
job1.Initialize("MyJob", Me)
job1.GetRequest.SetHeader(LoginURL , WeavedUser & "/" & WeavedPass)
job1.GetRequest.SetHeader("Content-Type","*/*")
job1.GetRequest.SetHeader("Accept","applicatíon/json")
job1.GetRequest.SetHeader("apikey",WeavedKey)
job1.GetRequest.SetContentEncoding("gzip, deflate")
job1.GetRequest.SetContentEncoding("text/plain")
job1.GetRequest.SetContentType("text/plain")