#out.mo

来自「WAPmo手机网站管理平台是一款创建与管理维护WAP网站的的软件产品」· MO 代码 · 共 16 行

Option Explicit

TBBS.AddLang "common|head|foot|error|out"
TBBS.SetNodes "env"

TBBS.AddNav "", TBBS.Lang("out")
TBBS.Page("name") = TBBS.GetNav()
TBBS.DelOnline

TBBS.Vars("skin") = "default"
TBBS.Redirect "index.asp"

MyKernel.Memory.Abandon

TBBS.AddHint "out_ok", Array(TBBS.Env("bbs_name"))