Originally Posted By: Allen
Are you just looking for an input box? This little nugget was just recently posted:

 Code:
Function InputBox($sPrompt,Optional $sTitle,$sDefaultValue)
    Dim $sc
    $sc = CreateObject("ScriptControl")
    $sc.language = "VBScript"
    $inputbox = $sc.Eval('Inputbox("' + $sPrompt + '","' + $sTitle + '","' + $sDefaultValue + '")')
EndFunction

NICE! \:D