ASP专题

关于aspcms调用自己的写的幻灯片地址的解决办法

需要在inc/AspCms_MainClass.asp中查找,Function getSlide,然后修改如下

事例

Dim str1,Str2,str3
    str1 =Split(slideImgs,",") 
    str2 =Split(slideLinks,",")
    str3=Split(slideTexts,",")
    Dim j
    content=replaceStr(content,"{aspcms:SlideLen}",ubound(str1))
    Dim i
    for i=0 to ubound(str1)
    content=replaceStr(content,"{aspcms:SlideImg"&i&"}",str1(i))
    next
    Dim n
    for n=0 to ubound(str2)
    content=replaceStr(content,"{aspcms:SlideLink"&n&"}",str2(n))
    next
    Dim m
    for m=0 to ubound(str3)
    content=replaceStr(content,"{aspcms:SlideText"&m&"}",str3(m))
    next
Avatar photo

人生长恨水长东

留言

此站点使用Akismet来减少垃圾评论。了解我们如何处理您的评论数据