ASP个人聊天系统 If MenuSwf="" Then MenuSwf="About" select case lcase(MenuSwf) case "about" TopMenu="a" case "news" TopMenu="b" case "project" TopMenu="c" case "clients" TopMenu="e" case "contact" TopMenu="f" case "mainbinner" TopMenu="g" case "person" TopMenu="h"