程序中多处想使用自已编写的标签，虽然后台中也有添加自定义的标签功能，但那功能部觉得不尽已意，所以就要用到修改程序源代码的方法了。

以一个例子来说明添加的过程：
如：我想在IE浏览器的状态栏上显示“『我的网站』欢迎您，来自[IP]的客人！”这样的文字。网站的名称可以用系统标签，而这里的IP地址要显示的是用户的IP地址，如果客人没有登陆是游客的话就无法使用系统标签Cl.User_Info(19)。我不知系统中是否有这个标签，所以就自己添加一个{%ShowGuestIP%}的标签。下面请看我是如何实现的：

1、修改“主模块Main_Style”中“Cl.mainhtml(1)”的内容，在</head>前加入一句：
<BASE onmouseover="window.status='『{%webname%}』欢迎您，来自{%ShowGuestIP%}的客人！';return true">
2、在Cl_Funtion_Public.Asp文件中加入一段函数代码，请注意，不要添加在别的过程中，加在程序的最后或最前面（红色部分为后添加的），如我加在程序的最后，如下：
      ... ...
      End Function
      Function ShowGuestIP()
              ShowGuestIP=request.servervariables("remote_addr")
      End Function
      %>
3、修改Cl_GetLabel.Asp文件（红色部分为后添加的）：
      ... ...
      Case "stylename"
              GetLabelContent = Replace(Cl.lanstr(5),"{%stylename%}",Cl.StyleName)
       Case "showguestip"
              GetLabelContent = ShowGuestIP()
       Case Else
       Exit Function
       End Select
       End Function
       %>
至此添加自己的标签完成，看一下窗口的状态栏，有了自己所想要的文字了。你想添加，照此方法试一试。