对话框

VBScript 函数(P142)

<Script Language="VBScript">

Dim Name

Name=InputBox("请填写您的名字:","对话框标题")

If Name <> "" Then

Msgbox Name&",您好!"

End If

</script>