Checkbox i inputbox samt afslutte ved annuller

Jeg har følgende script (printer.vbs):

printer = InputBox("Indtast navnet på den printer du vil tilføje:", "Indtast printernavn", "VSPRT")

Dim net

Set net = CreateObject("WScript.Network")

net.AddwindowsPrinterConnection "\\vsprt01\" & printer

net.SetDefaultPrinter "\\vsprt01\" & printer

- Den ene ting jeg ønsker at tilføje, er en checkbox inde i inputboxen som gør det muligt at vælge om printeren skal benyttes som standardprinter eller ej. Den skal altså springe over net.SetDefaultPrinter hvis den ikke er tjekkt.

- Den anden ting jeg ønsker at tilføje, er at når der trykkes annuller, skal hele scriptet afsluttes. Nu siger den bare, selvfølgelig, forkert printernavn, da man jo ikke indtaster noget.

På forhånd tak!