账号通
    

账号  

密码  

3173

查看

10

回复
主题:请教高手,KESINCMS 能在文章标题上加上价格吗 [收藏主题] 转到:  
fezz 当前离线

6

主题

0

广播

0

粉丝
添加关注
级别:学前班

用户积分:57 分
登录次数:1 次
注册时间:2009/12/15
最后登录:2009/12/15
fezz 发表于:2009/12/15 15:52:00   | 显示全部帖子 查看该作者主题 楼主 
科汛在线网校系统

小弟在线坐等高手

 

用的是V5.52的

 

 
  支持(0) | 反对(0) 回到顶部顶端 回到底部底部
fezz 当前离线

6

主题

0

广播

0

粉丝
添加关注
级别:学前班

用户积分:57 分
登录次数:1 次
注册时间:2009/12/15
最后登录:2009/12/15
fezz 发表于:2009/12/15 16:37:00   | 显示全部帖子 查看该作者主题 沙发 
 
  支持(0) | 反对(0) 回到顶部顶端 回到底部底部
fezz 当前离线

6

主题

0

广播

0

粉丝
添加关注
级别:学前班

用户积分:57 分
登录次数:1 次
注册时间:2009/12/15
最后登录:2009/12/15
fezz 发表于:2009/12/15 16:15:00   | 显示全部帖子 查看该作者主题 藤椅 
科汛在线网校系统

查了数据库里头有一堆 这样的代码

{$GetArticleList(1,"20090458415281",true,false,"",0,55,20,56,"ID Asc",1,true,1,"/Upfiles/dot_1.gif",1,"","/Upfiles/Line4.gif",0,"left","","",0,true,true,1,li01,hlink1,,,,)}

 

不知代表什么,是不是可以在里面增加价格的字段,,

 

以上对应的还有,

 
  '取得栏目文章列表
  Function GetArticleList(ChannelID,FolderID,I_S_C,S_C_N, OpenType, A_P, num, R_H,T_Len, ByVal S_Str, Col, PicTF, NavType, Nav, MoreType, MoreLink, SplitPic, DateRule,DateAlign, T_Css, DateCss,SpecialID,NewTF,HotTF,P_T,DivID,DivCss,UlID,ULCss,LiID,LICss,LabelID)
       If LabelID<>"ajax" and P_T>2 Then
     GetArticleList="<span id=""ks" & LabelID & "_" & FolderID & "_" & FCls.RefreshFolderID & "_0""></span>":Exit Function
    ElseIf P_T>2 Then
     P_T=P_T-2
    End If
   
    Dim SqlStr, A_PStr,M_L_S, O_T_S,C_F_T,Param
    If FolderID = "-1" Then
     FolderID = FCls.RefreshFolderID
     C_F_T = True
    Else
     C_F_T = False
    End If
   If FolderID = "" Then FolderID = "0"
   Select Case A_P
       Case "1":A_PStr = " And Recommend=1"
       Case "2":A_PStr = " And Popular=1"
       Case "3":A_PStr = " And Strip=1"
   End Select
    A_PStr=A_PStr & KS.GetSpecialPara(ChannelID,SpecialID)
    If Lcase(Left(Trim(S_Str),2))<>"id" Then  S_Str=S_Str & ",ID Desc"
    If FolderID = "0" Then Param="" Else If CBool(I_S_C) = True Then Param="Tid In (" & KS.GetFolderTid(FolderID) & ") And" Else Param="Tid='" & FolderID & "' And"
    SqlStr = "SELECT TOP " & num & " ID,Title,Tid,ReadPoint,InfoPurview,Fname,Changes,AddDate,Popular,NewsID,ShowComment,Comment,TitleType,TitleFontColor,TitleFontType,KS_moner FROM " & KS.C_S(ChannelID,2) &" Where " & Param & " Verific=1 AND DelTF=0 " & A_PStr & " ORDER BY IsTop Desc," & S_Str
    O_T_S = KS.G_O_T_S(OpenType)
    If MoreLink <> "" And FolderID <> "0" And C_F_T = False Then M_L_S = KS.GetMoreLink(P_T,Col, R_H, MoreType, MoreLink, KS.GetFolderPath(FolderID), O_T_S)
    GetArticleList = KS_A_L(ChannelID,SqlStr, M_L_S, S_C_N, O_T_S, R_H, T_Len, Col, PicTF, NavType, Nav, SplitPic, DateRule, DateAlign, T_Css, DateCss,NewTF,HotTF,P_T,DivID,DivCss,UlID,ULCss,LiID,LICss)
  End Function

 

这些代码,,我想是有相联的,但不知怎么去改,,高手指点一下

 

 
  支持(0) | 反对(0) 回到顶部顶端 回到底部底部
fezz 当前离线

6

主题

0

广播

0

粉丝
添加关注
级别:学前班

用户积分:57 分
登录次数:1 次
注册时间:2009/12/15
最后登录:2009/12/15
fezz 发表于:2009/12/15 16:06:00   | 显示全部帖子 查看该作者主题 板凳 
科汛在线网校系统

不行呀,不想这样,

有没有让系统自动调出价格的方法,

我看了里面的代码,太难懂了,不知在哪下手

 
  支持(0) | 反对(0) 回到顶部顶端 回到底部底部
fezz 当前离线

6

主题

0

广播

0

粉丝
添加关注
级别:学前班

用户积分:57 分
登录次数:1 次
注册时间:2009/12/15
最后登录:2009/12/15
fezz 发表于:2009/12/15 16:01:00   | 显示全部帖子 查看该作者主题 报纸 
 
  支持(0) | 反对(0) 回到顶部顶端 回到底部底部
fezz 当前离线

6

主题

0

广播

0

粉丝
添加关注
级别:学前班

用户积分:57 分
登录次数:1 次
注册时间:2009/12/15
最后登录:2009/12/15
fezz 发表于:2009/12/15 16:01:00   | 显示全部帖子 查看该作者主题 地板 
科汛智能建站系统
大哥,,,在哪加,,
 
  支持(0) | 反对(0) 回到顶部顶端 回到底部底部
<上一主题 | 下一主题 >
Powered By KesionCMS Version X1
厦门科汛软件有限公司 © 2006-2016 页面执行0.12500秒 powered by KesionCMS 9.0