作业?
<script language="vbscript">
dim fname
fname=InputBox("Enter your name:")
result =msgbox(fname+"欢迎您参观本网站!",vbAbortRetryIgnore)
msgbox result
if result=3 then
msgbox "you clicked Abort"
elseif result=4 then
msgbox "you clicked Retry"
elseif result=5 then
msgbox "you clicked Ignore"
end if
</script>