📄 #ip.mo
字号:
Option Explicit
TBBS.Vars("template") = "admin.ip"
TBBS.AddNav "", TBBS.Lang("general_manage")
TBBS.AddNav "", TBBS.Lang("ip_manage")
Call main()
Private Sub doGet()
TBBS.Vars("state") = 0
End Sub
Private Sub doPost()
TBBS.Vars("state") = 1
Dim arr, ptr
arr = Split("ip_rule|ip_rule1|ip_rule2", "|")
For Each ptr In arr
TBBS.Vars(ptr) = Trim(MyIO.Form(ptr))
Next
For Each ptr In arr
TBBS.Env(ptr) = TBBS.Vars(ptr)
Next
TBBS.AddHint "set_ok", Array()
TBBS.Vars("state") = 2
TBBS.SetNodes "env"
TBBS.Vars("state") = 2
End Sub
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -