hhasee 发表于 2009-6-19 16:11:47

如何响应弹也对话框中的“是”和“否”,附原码

本帖最后由 hhasee 于 2009-6-25 10:24 编辑

代码的目的是提取MAC地址的后两位是不是EE,若是EE则会弹出带有MAC地址的对话框,但如何能让我点击“是”时执行FUCTION1(),点击否时执行fuction2(),请教高手如何解决?谢谢!原码如下:

$sky=mac()

Func mac()
$wbemFlagReturnImmediately = 0x10
$wbemFlagForwardOnly = 0x20
$colItems = ""
$strComputer = "localhost"
$Output=""
$objWMIService = ObjGet("winmgmts:\\" & $strComputer & "\root\CIMV2")
$colItems = $objWMIService.ExecQuery("SELECT * FROM Win32_NetworkAdapterConfiguration WHERE IPEnabled != 0", "WQL", _
                                          $wbemFlagReturnImmediately + $wbemFlagForwardOnly)
If IsObj($colItems) then
   For $objItem In $colItems
      $Output1 = $Output & "" & $objItem.MACAddress & @CRLF
   Next
Return $Output1
Else
Endif
EndFunc

$rmac=StringReplace($sky,":","")
$fid=StringMid ( $rmac, 11,2 )
if $fid = "EE" then MsgBox(4,"","请再次核实你的MAC地址:   "&$rmac)

ddx13 发表于 2009-6-19 16:37:13

MsgBox ( 标志, "标题", "文本" [, 超时时间 [, 句柄]] )




参数

标志 指示消息框(或者说对话框)的类型及可能的按钮组合.请查看下面的相关部分.
标题 消息框的标题文字.
文本 消息框的文本内容(提示信息).
超时时间 [可选参数] 以秒为单位.指定时间过后消息框将自动关闭.
句柄 [可选参数] 显示这个对话框的父窗口句柄.



返回值

成功: 返回按下按钮的 ID.
失败: 返回 -1,说明消息框被用户忽略(超时).



按下的按钮(具体显示的名字取决于操作系统的语言版本) 返回值
OK(确定)1
CANCEL(取消)2
ABORT(终止)3
RETRY(重试)4
IGNORE(忽略)5
YES(是)6
NO(否)7
TRY AGAIN **(重试) 10
CONTINUE **(继续) 11


f $fid = "EE" then
      $ss=MsgBox(4,"","请再次核实你的MAC地址:   "&$rmac)
      if $ss=6 then .....执行什么
      if $ss=7then....执行什么
endif

hhasee 发表于 2009-6-19 17:24:10

太谢谢!!!!

menfan1 发表于 2009-6-19 20:39:32

学习一下。。
页: [1]
查看完整版本: 如何响应弹也对话框中的“是”和“否”,附原码