VBS – Random IT Utensils

VBS script to send an HTTP request

afish — Sat, 10 Mar 2018 09:00:49 +0000

Another post with little script:

Set o = CreateObject("MSXML2.XMLHTTP")
o.open "GET", "https://page.com", False
o.setRequestHeader "Header", "Header value"

' Ignore certs (I bet you want to know how to do it)
' 2 stands for SXH_OPTION_IGNORE_SERVER_SSL_CERT_ERROR_FLAGS
' 13056 means ignore all server side cert error
o.setOption 2, 13056
o.send

' Read response
WScript.Echo po.responseBody

And for JSON serialization you might use this page

VBS script to check if workstation is locked

afish — Sat, 03 Mar 2018 09:00:46 +0000

Well, here it is:

Function IsWorkstationLocked( computer )
    Dim wmi : Set wmi = GetObject("winmgmts://" & computer & "/root/cimv2")
    Dim logonScreenCount : logonScreenCount = wmi.ExecQuery ("SELECT * FROM Win32_Process WHERE Name = 'LogonUI.exe'").Count

    IsWorkstationLocked = (logonScreenCount > 0)
End Function

Dim o

If IsWorkstationLocked(computer) Then
	'Do something
Else
	'Do something else
End If

Running VBS script in IIS

afish — Sat, 24 Feb 2018 09:00:42 +0000

Sometimes you might want to deploy an incoming webhook for very simple use and do something when it’s called. On Windows you don’t need to have a full blown ASP.NET pipeline or even PHP server installed, you can go with simple VBS script. In this post I describe how to configure IIS to expose such a script and be able to accept incoming connections.

IIS

Install IIS and CGI module
Go to IIS and choose the site for VBS scripts
Open Handler Mappings and choose Add Script Map…
Set Request Path to *.vbs
For Executable use the “C:\Windows\System32\cscript.exe” //NOLOGO %s %s
Name it anything you would like

That’s it. Do not forget to add a binding.

Script

Now a simple script responding to a request.

WScript.Echo "Content-Type: text/html"
WScript.Echo "Access-Control-Allow-Origin: *"
WScript.Echo

WScript.Echo "Yep, I'm here!"

You actually need to start output in the first two lines of your script or else will ignore it. Apart from that you can do basically anything you like.