示例二、自己写的页面也可以套用科汛的标签及页面模板化

如果自己写的代码希望能调用科汛的标签，则需要调用的文件有conn.asp、KS_Cls/Kesion.CommonCls.asp及KS_Cls/Kesion.Label.CommonCls.asp三个文件。

其中的KS_Cls/Kesion.Label.CommonCls.asp发挥标签解释的作用，调用该文件后可以解释{$，{LB,{SQL,{JS等开头的标签,看以下示例：

这里我们可以套用科汛的文件代码，如复制一份map.asp我们将其改成test2.asp，代码如下：

<!--#include file="Conn.asp"-->

<!--#include file="KS_Cls/Kesion.CommonCls.asp"-->

<!--#include file="KS_Cls/Kesion.Label.CommonCls.asp"-->

<%

Dim KSCls

Set KSCls = New Test

KSCls.Kesion()

Set KSCls = Nothing

Class Test

        Private KS, KSR,Maps

              Private Sub Class_Initialize()

               If (Not Response.IsClientConnected)Then

                     Response.Clear

                     Response.End

               End If

                Set KS=New PublicCls

                Set KSR = New Refresh

              End Sub

        Private Sub Class_Terminate()

               Call CloseConn()

               Set KS=Nothing

              End Sub

              Public Sub Kesion()

                         Dim FileContent

                         Dim MapTemplatePath:MapTemplatePath=KS.Setting(3) & KS.Setting(90) & "test.html"  '读取模板地址，模板放到在template目录下，文件名自取，但需要和这里的文件名一致！

                               FileContent = KSR.LoadTemplate(MapTemplatePath)   

                               FileContent=Replace(FileContent,"{$自己的标签}", "这里写上自己的函数代码")

                               FileContent=KSR.KSLabelReplaceAll(FileContent)  ‘调用科汛的全站标签替换函数

                               response.write FileContent  ‘最后输出内容

              End Sub        

End Class

%>

这是官方二次开发的一个示例文档，我试过，把

  FileContent=Replace(FileContent,"{$自己的标签}", "这里写上自己的函数代码")

写成自己编写的没有参数的标签，应该是没有问题的，而且，在普通模板如首页模板中，用没有参数的标签，我也尝试成功

但如果自己写的标签中有参数，那怎么办，用replace替换时，把整个标签替换了，这样达不到在标签中传递参数的目的，科汛自己的那些标签都能传递参数，不知道这个怎么实现？

有知道的能清楚说一下吗

FileContent=Replace(FileContent,"{$自己的标签}", "这里写上自己的函数代码")

这句话科讯官方说的有问题。二次开发我可以教你，但非无偿

额。。。。。。。。。。。。。。。。。。。。。