Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- #SingleInstance, Force
- Input_List:= "Admin|bwsr|crs|deed|dnr|dhs|doc|dvs|exec"
- Output_List:= "address-family ipv4 vrf vpn-admin autonomous-system 100{enter}*address-family ipv4 vrf vpn-bwsr autonomous-system 1300 {enter}*address-family ipv4 vrf vpn-crs autonomous-system 400 {enter}*address-family ipv4 vrf vpn-deed-remote autonomous-system 700{enter}*address-family ipv4 vrf vpn-dnr autonomous-system 500{enter}*address-family ipv4 vrf vpn-rtc autonomous-system 900{enter}*address-family ipv4 vrf vpn-doc autonomous-system 600{enter}*address-family ipv4 vrf vpn-dvs autonomous-system 1000{enter}*address-family ipv4 vrf vpn-mnit-exec autonomous-system 1200{enter}"
- ::891e::
- WingetTitle,Active_Window,A
- Gui, Color, Black
- Gui, Add, DropDownList, x10 ym w180 r10 AltSubmit vInput gSubmit_Input ,% Input_List
- Gui, Add, Edit,cWhite x10 w480 r1 ReadOnly vOutput,
- Gui, Add, Button, x200 w100 h30 gStuff,Do Something
- Gui, Show, w500 ,For Brad #2
- return
- Submit_Input:
- Gui,Submit,Nohide
- Loop, Parse, Output_List, *
- {
- if(A_Index=Input)
- Output:= A_LoopField
- }
- GuiControl,,Output,%Output%
- return
- Stuff:
- Gui,Destroy
- WinActivate,Active_Window
- SendInput, conf t {enter}
- SendInput, router eigrp 1 {enter}
- SendInput, %Output%
- SendInput, default-metric 100000 1000 254 1 1500 {enter}
- SendInput, redistribute static metric 100000 1000 254 1 1500 {enter}
- SendInput, redistribute connected {enter}
- SendInput, exit-address-family {enter}
- return
- esc::ExitApp
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement