Hey Brad, thanks for the response here!

Can the messagebox function take input?? I assumed it was just to post a message which is why I went with inputbox. The vbs script makes an http post to query if someone has enrolled into a selfservice portal (ManageEngine's ADSelfServicePlus). The post is made to the selfservice application directly and it returns true or false. Below is the vbs code. I've copied this section from a script provided by ManageEngine as their script did some other tasks I didn't need. I could probably simplify the script a bit as it is querying for the domain name but that is the same for everyone so I could specifically state that in the http post

 Code:
On Error Resume Next
	Set objNetwork = CreateObject("WScript.Network")
	
	url = "https://localhost:443" + "/CheckEnrollment.cc"
	postData = "user=" + objNetwork.UserName + "&domainFlatName=domain" + "&domainDNSName=domain.local" + "&manualScript=true"
	
	Set oHTTP = CreateObject("MSXML2.ServerXMLHTTP")	
       	oHTTP.open "POST", url,false 
      	oHTTP.setOption 2, 13056
        oHTTP.setRequestHeader "Content-Type", "application/x-www-form-urlencoded"
        oHTTP.setRequestHeader "Content-Length", Len(postData)
        oHTTP.send postData  
	response = oHTTP.responseText
	result = 0
	   	If InStr(response, "Non-Enrolled User") Then
			result = 12
			ElseIf InStr(response, "Enrolled User") Then	
			result = 47
		End If
	wscript.quit result
	


Edited by Mart (2016-03-30 04:48 PM)
Edit Reason: Added code tags.