找回密码
 加入
搜索
查看: 1250|回复: 2

为什么函数不能嵌套调用那

[复制链接]
发表于 2009-1-30 08:23:01 | 显示全部楼层 |阅读模式
#AutoIt3Wrapper_Icon=Tc.ico   
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
$f=GUICtrlCreateButton("中兴28系列按钮",200,250,60,30)
GUISetState(@SW_SHOW)
while 1
        $msg=GUIGetMsg()
   Select
        case $msg=$gui_event_close
                ExitLoop
        case  $msg=$f
                zx28xl()
                EndSelect
        WEnd
Func zx28xl()
HotKeySet("{F1}","zx28")
HotKeySet("{F2}","zx28j")
GUICreate("中兴交换机vlan自动那个配置",450,450)
GUICtrlCreateLabel("请激活交换机登陆窗口后按F1做单交换机vlan:",130,5,280,20)
$a=GUICtrlCreateInput("",130,30,280,20)
GUICtrlCreateLabel("请输入pvid开始vlan:",5,30,120,20)
$b=GUICtrlCreateInput("",130,60,280,20)
GUICtrlCreateLabel("请输入端口数:",5,60,90,20)
GUICtrlCreateLabel("请激活交换机登陆窗口后按F2做级联vlan:",130,120,280,20)
$c=GUICtrlCreateInput("",130,150,280,20)
GUICtrlCreateLabel("请输入级联开始vlan:",5,150,120,20)
$d=GUICtrlCreateInput("",130,180,280,20)
GUICtrlCreateLabel("请输入级联截止vlan:",5,180,120,20)
$e=GUICtrlCreateInput("1-",130,210,280,20)
GUICtrlCreateLabel("请输入级联端口",5,210,120,20)
$g=GUICtrlCreateButton("退出",200,250,60,30)
GUISetState(@SW_SHOW)
                Func zx28j()
        for $i=GUICtrlRead($c) to GUICtrlRead($d) step 1
                send("create vlan " & $i & " name v" & $i & "{enter}")
                send("set vlan " & $i & " enable" & "{enter}")
                send("set vlan " & $i & " add port " & GUICtrlRead($e) & " tag" & "{enter}")
                next
EndFunc
Func zx28()
        $j=GUICtrlRead($a)
        for $i=1 to GUICtrlRead($b) Step 1
                send("create vlan " & $j & " name v" & $j & "{enter}")
                send("set vlan " & $j & " add port 1 tag" & "{enter}")
                send("set vlan " & $j & " add port " & $i & " untag" & "{enter}")
                send("set port " & $i & " pvid " & $j & "{enter}")
                send("set vlan " & $j & " enable" & "{enter}")
                $j = $j+1
                next
        EndFunc
while 1
        $ms=GUIGetMsg()
   Select
        case $ms=$gui_event_close
                ExitLoop
        case  $ms=$g
                GUISetState(@SW_HIDE)
                        zx28xl()
                EndSelect
        WEnd
EndFunc

[ 本帖最后由 bin0131 于 2009-1-30 21:06 编辑 ]
发表于 2009-1-30 10:37:43 | 显示全部楼层
常识性错误了 楼主多看看帮助吧 函数要单独放
发表于 2009-1-30 17:13:32 | 显示全部楼层
一个很好的习惯  写完一段 按一下ctrl + t
您需要登录后才可以回帖 登录 | 加入

本版积分规则

QQ|手机版|小黑屋|AUTOIT CN ( 鲁ICP备19019924号-1 )谷歌 百度

GMT+8, 2024-5-18 20:55 , Processed in 0.073504 second(s), 20 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表