我想引导用户到每个案例的适当下载链接。我可以在vbs消息框中嵌入可点击的链接吗?或者,有没有更干净的方法来解决这个问题?
select case FSO.GetFileVersion(strCorLib)
Case "2.0.50727.42"
strNETVersion = strNETVersion & " SP0 (not so good!)"
Case "2.0.50727.1433"
strNETVersion = strNETVersion & " SP1 (this will work)"
Case "2.0.50727.3053"
strNETVersion = strNETVersion & " SP2 (this is good)"
end select
strNetVersion = strNETVersion & ", " & FSO.GetFile(strCorLib).DateLastModified
else
strNETVersion = ".NET 2.0 not installed"
end if
sayit strNetVersion 发布于 2009-06-17 02:42:51
使用标准的msgbox是不可能的。你就得自己滚……
有关更多信息,请查看this link ...
发布于 2009-06-28 12:14:36
当我编写VBScript代码时,我会使用类似这样的东西。我想这是一种更干净的方式。
iRes = objShell.Popup("Something not found." & vbNewLIne & _
"Without that the world wont be saved." & vbNewLIne & _
"Download it now?",, "Required software is missing", 4+48) ' 4=MB_YESNO, 48=MB_ICONEXCLAMATION
if iRes = 6 then ' 6=IDYES
objShell.Run("http://www.microsoft/com/...")
end if发布于 2009-06-17 02:49:55
还要检查ShowModalDialog。它完全允许你想要的东西,但就像John的链接一样,它只是一个IE解决方案。
https://stackoverflow.com/questions/1004822
复制相似问题