Code for VBScript
'------------------------------------
Sub GenerateGUID
Do
Dim gGUID
gGUID = CreateObject("Scriptlet.TypeLib").GUID
Dim Code
Code = InputBox ("Generated Code: Enter 'exit' to exit","GUID Generator","" &gGUID)
If Code = "exit" Then
Exit sub
End if
Loop
End Sub
Call GenerateGUID
'------------------------------------
Download
Make a text file
Paste the code in
File then Save As
Change Text files/documents to All files
add a .vbs and the end like hello.vbs
run the file