aspcms免费开源企业网站开发建设管理系统源码程序

 找回密码
 立即注册

QQ登录

只需一步,快速开始

搜索
查看: 2616|回复: 0

AspCms自定义幻灯片更改技巧

[复制链接]

187

主题

188

帖子

609

积分

高级会员

Rank: 4

积分
609
发表于 2019-3-27 17:45:49 | 显示全部楼层 |阅读模式
aspcms自定义幻灯片更改技巧
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
    www.zzarea.com

找到 inc/AspCms_MainClass.asp 这个文件
然后查找 Function getSlide
在下面加入以下内容
前台调用 说明 :
{aspcms:SlideImg0} 即为第一张幻灯片图片
{aspcms:SlideImg1} 为第二张幻灯片图片
回复

使用道具 举报

*滑块验证:
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

QQ|Archiver|手机版|小黑屋|aspcms免费开源企业网站开发建设管理系统源码程序 ( 冀ICP备17022052号-2|网站地图

GMT+8, 2024-3-28 20:37 , Processed in 0.033138 second(s), 19 queries .

Powered by aspcms免费开源企业网站开发建设管理系统源码程序

© 2001-2025 aspcms免费开源企业网站开发建设管理系统源码程序

快速回复 返回顶部 返回列表