• 企业400电话
  • 微网小程序
  • AI电话机器人
  • 电商代运营
  • 全 部 栏 目

    企业400电话 网络优化推广 AI电话机器人 呼叫中心 网站建设 商标✡知产 微网小程序 电商运营 彩铃•短信 增值拓展业务
    用vbscript实现在消息框中显示一个超链接
    问:
    嗨,Scripting Guy!可以在消息框中包含指向某个 Web 页面的超链接吗?
    -- CB
    答:
    嗨,CB。听起来您好像想要向用户显示一个消息框,并且希望在消息框中包含一个超链接,以便用户可以点击这个链接,从而获得更多信息。例如,假设某个用户试图访问一些资源,但被拒绝了。这种情况下,您可以弹出一个消息框,告诉用户访问被拒绝,然后向他们提供一个链接,这个链接指向的页面会告诉用户访问所需的权限。一般说来,这种办法会比简单地说“访问被拒绝”好得多。
    那么,是否可以用脚本编写语言实现这个目的呢?好吧,据我们所知,目前还不能。消息框中含有超链接当然会很酷,但使用脚本编写语言则仅限于简单的消息框。
    不过,先等等,别忙着离开!您并没有问我们:“是否存在某种变通办法可以实现相同目的,但不必在消息框中嵌入超链接?”如果您这么问,我们就会告诉您:“总会有变通办法的。”您所寻求的就是从消息框中实现对 Web 页面的一键式访问。一个方法就是在消息框中嵌入超链接,但不幸的是,我们上面说过,使用 VBScript 无法实现上述目的。因此,我们试着使用其他办法看看:为什么不弹出一个消息框,询问用户:“您是否想要申请访问此资源?”呢?如果用户点击否,那么脚本就会中止。如果用户点击是,脚本就会自动将用户带到合适的 Web 页面。一个消息框,一键式访问网站。它和使用超链接并不十分相同,但结果却是一样的。
    如您所见,这只需要以下几行代码就可以实现:
    复制代码 代码如下:

    Set objShell = CreateObject("Wscript.Shell") 
    intMessage = Msgbox("Would you like to apply for access to this resource?", _ 
        vbYesNo, "Access Denied") 
    If intMessage = vbYes Then 
        objShell.Run("http://www.microsoft.com") 
    Else 
        Wscript.Quit 
    End If 
    我们首先创建一个 WSH Shell 对象实例;我们需要创建这个实例,以便弹出 Web 浏览器和链接到网站。然后,我们显示消息框(标题为访问被拒绝),并询问用户:“您是否想要申请访问此资源?”这个消息框具有一个是按钮和一个否按钮,这就是 VBScript 常量 vbYesNo 的用途。
    注意:有些人可能在想:“等等,我想您应该在 VBScript 中明确定义这些常量。”在大多数情况下,这是正确的。如果我们处理的是 FileSystemObject(打个比方),那么我们就需要使用类似如下代码定义常量:
    Const ForReading = 1
    但是,VBScript 有一些内部常量。vbYesNo 恰好就是其中之一。它用于在消息框中显示“是”按钮或“否”按钮。vbCrLf 则是另一个内部常量,它的作用是在字符串末尾添加回车换行。这些内部常量——它们是 VBScript 语言的一部分——不必定义;在您输入 vbYesNo 时,VBScript 会知道您的意思。
    我们刚才说到哪了?哦,对了,我们弹出一个消息框,并向用户提供是按钮和否按钮。如果用户点击是,我们就将他们带到指定的网站。那么,如何知道用户点击的是否为是呢?很简单:当我们创建消息框时,我们就将用户响应存储在变量 intMessage 中。因此,若要判断用户点了哪个按钮,我们只要检查 intMessage 的值就可以了。如果这个值等于 vbYesNo(另一个内部常量,等于 6),那么用户点击的便为是,于是我们就使用 Shell 对象的 Run 方法打开网站 http://www.microsoft.com。(注意,我们需要做的就是指定 URL;然后操作系统就会使用默认浏览器导航到该站点。)
    那如果用户点击的为否呢?这种情况下,我们就会退出 (Wscript.Quit)。
    恰如我们所说的,这个方法和我们想象中的不完全一样,但它可以实现这个目的。
    顺便说一下,如果您想了解有关 VBScript 的 Msgbox 函数以及配置这个函数的不同方式的更多信息,请访问MSDN 上的 “VBScript 语言参考”。
    那如果您需要制作精美一点的消息框呢?这种情况下,您可以自己动手制作一个 HTML 页面,然后使用这个页面模拟真实的 Windows 消息框。不过这个问题我们将在其他时间讨论。
    您可能感兴趣的文章:
    • WPF自动隐藏的消息框的实例代码
    • C#实现客户端弹出消息框封装类实例
    • 基于.Net实现前端对话框和消息框
    • ASP.NET中弹出消息框的几种常见方法
    • .net 弹出消息框后导致页面样式变乱解决方法
    • JQuery的Alert消息框插件使用介绍
    • c++中的消息框messagebox()详细介绍及使用方法
    • 基于jQuery的message插件实现右下角弹出消息框
    • Extjs4 消息框去掉关闭按钮(类似Ext.Msg.alert)
    • WPF弹出带蒙板的消息框
    上一篇:用vbscript实现修改屏幕保护的等待时间长度
    下一篇:用vbscript实现将脚本的输出复制到剪贴板
  • 相关文章
  • 

    © 2016-2020 巨人网络通讯 版权所有

    《增值电信业务经营许可证》 苏ICP备15040257号-8

    用vbscript实现在消息框中显示一个超链接 用,vbscript,实,现在,消息,