Title:aspcms自定义幻灯片修改说明
DATA:2014/10/10 17:15:47 VISITORS:Tags:aspcms仿站标签 作者:快宜优网络 来源:www.k1u.com.cn
找到 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
前台调用 说明 :
{aspcms:SlideImg0} 即为第一张幻灯片图片
{aspcms:SlideImg1} 为第二张幻灯片图片
依次类推
例如:
< img src="{aspcms:SlideImg0}" />
< img src="{aspcms:SlideImg1}" />
< img src="{aspcms:SlideImg3}" />
注:<后面的空格去掉
上一篇:aspcms幻灯片图片调用代码
下一篇:aspcms显示三级栏目菜单代码