Question

会编vbscript脚本语言的兄弟们----求助

有一个例子想请各位高手完善一下。
dim strname
strname+inputbox("请输入你的大名：")
wscript,echo strname & ": 你好！"

保存为vbs文件后，随便输一个人的名字会显示***你好。
若我想它只有输人的是我确定的名字时才显示你好，若不是就显示：”你不是她，你是个浑蛋“
且连续输入几次都不正确就自动退出窗口，或者每输错一次就显示不同的内容。

请各位高手完善一下。

非常谢谢！

Answer 1

dim strname
dim i=0
strname+inputbox("请输入你的大名：")
if strname="xxx" then
wscript,echo strname & ": 你好！"
else
wscript,echo strname & ": 你不是她，你是个浑蛋！"
i=i+1
end if
if i=3 then window.close()

Answer 2

请将以下内容保存为abc.vbs即可完成上面的功能，并具有较强的可移植性。

''''''''''''''''''''''''''''''''''''''''''''''''''
'Created by stardyftp on 2006-0-11
''''''''''''''''''''''''''''''''''''''''''''''''''

''''''''''''''''''''''''''''''''''''''''''''''''''
'Function: Define Global Const.
''''''''''''''''''''''''''''''''''''''''''''''''''
Const constrName = "Bob"
Const conCheckTimes = 3

Function InputName()
InputName = InputBox("请输入你的大名：")
End Function

Sub CheckName(strName)
If strName = constrName Then
WScript.Echo strName & ": 你好！"
Else
WScript.Echo strName & ": 你不是她，你是个浑蛋！"
End If
End Sub

Sub Main()
Set WshShell = WScript.CreateObject("WScript.Shell")
For i = 1 To conCheckTimes
CheckName(InputName)
Next
WScript.Quit
End Sub

Main