日期:2020-4-17 16:03:34 阅读:
找到 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}" />
注:<后面的空格去掉
作者:快宜优 (来源:快宜优)
[声明] 本文系本网编辑转载,转载目的在于传递更多信息,并不代表本网赞同其观点和对其真实性负责。如涉及作品内容、版权和其它问题,请在30日内与本网邮箱 7016867@qq.com 联系,我们将在第一时间删除内容!