但这些可用字段有可能不能完全满足所有用户的需求,比如一些用户想调用文章的作者,来源等,那就实现不了了
没关系,如果有这个需求又不想用sql标签,只需要简单一步,就可以实现随意调用你想到的字段
 
V6开始的标签解释引擎已全面升级,扩展性极简单.科汛的系统函数标签解释文件主要在kesion.label.functioncls.asp这个文件中,那么请你用DW打开ks_cls/kesion.label.functioncls.asp
'加载模型通用查询字段
  Public Sub LoadField(ByVal ModelID,ByVal PrintType,ByVal  PicStyle,ByVal ShowPicFlag,ByRef FieldStr,ByRef TableName,ByRef Param)
      If ModelID="0" Then
    TableName = "[KS_ItemInfo]"
    FieldStr  =  "I.ChannelID,I.InfoID as  ID,I.Title,I.Tid,I.Intro,I.PhotoUrl,I.AddDate,I.Inputer,I.Popular,I.Fname,I.Hits"
    If PrintType=2 or (instr(LabelStyle,"{@photourl}")>0 and PrintType>2) Then  Param = Param & " And I.PhotoUrl<>''"
  Else
    TableName=KS.C_S(ModelID,2)
    Select Case KS.C_S(ModelID,6)
    Case 1 
      FieldStr  =  "I.ID,I.Title,I.Tid,I.Inputer,I.Fname,I.AddDate,I.Popular,I.Hits"
      FieldStr=FieldStr & ",I.TitleType,I.TitleFontColor,I.TitleFontType"
      If PrintType>=2 Then  FieldStr=FieldStr & ",I.PhotoUrl,I.Intro" : If  PrintType=2 or (instr(LabelStyle,"{@photourl}")>0 and PrintType>2) Then  Param = Param & " And I.PicNews=1"
      If PrintType>=3 Then  FieldStr=FieldStr & ",I.ReadPoint"
    Case 2 
      FieldStr  =  "I.ID,I.Title,I.Tid,I.Inputer,I.Fname,I.AddDate,I.Popular,I.Hits"
      If  PrintType>=2 Then FieldStr=FieldStr & ",I.PhotoUrl,I.PictureContent As  Intro"
      If PrintType>=3 Then FieldStr=FieldStr &  ",I.ReadPoint"
    Case 3 
      FieldStr  =  "I.ID,I.Title,I.Tid,I.Inputer,I.Fname,I.AddDate,I.Popular,I.Hits"
      If  PrintType>=2 Then FieldStr=FieldStr & ",I.PhotoUrl,I.DownContent As  Intro,I.DownSize,I.Rank"
      If PrintType>=3 Then FieldStr=FieldStr  & ",I.ReadPoint"
    Case 4 
      FieldStr  =  "I.ID,I.Title,I.Tid,I.Inputer,I.Fname,I.AddDate,I.Popular,I.Hits"
      If  PrintType>=2 Then FieldStr=FieldStr & ",I.PhotoUrl,I.FlashContent As  Intro,I.Author,I.Rank"
      If PrintType>=3 Then FieldStr=FieldStr &  ",I.ReadPoint"
    Case 5 
      FieldStr  =  "I.ID,I.Title,I.Tid,I.Inputer,I.Fname,I.AddDate,I.Popular,I.Hits"
      If  PrintType>=2 Then FieldStr=FieldStr & ",I.PhotoUrl,I.ProIntro As  Intro,I.BigPhoto,I.Price_market,I.Price_member,I.Price,I.Price_Original,I.Discount,I.Promodel,I.Point"
      If KS.ChkClng(ParamNode.getAttribute("producttype"))<>0 Then Param =Param  & " And  I.ProductType="&KS.ChkClng(ParamNode.getAttribute("producttype"))
      Case 7 
      FieldStr  =  "I.ID,I.Title,I.Tid,I.Inputer,I.Fname,I.AddDate,I.Popular,I.Hits"
      If  PrintType>=2 Then FieldStr=FieldStr & ",I.PhotoUrl,I.MovieContent As  Intro"
      If PrintType>=3 Or PicStyle=13 Or PicStyle=14 Or PicStyle=15  Then FieldStr=FieldStr &  ",I.MovieAct,I.MovieDY,I.MovieDQ,I.MovieTime,I.MovieYY,I.ReadPoint,I.Rank"
      If PrintType