如何通过按钮控制的图片上下翻滚效果(2)_动易Cms教程
//和
//<div class="NUM1" id="led3">3</div> …… (以此类推)
//另外还要在CSS中添加 .f3…… #led3……的相关定义
var direction = "down";
var mainobj = document.all("mainpic");
function scrolldown(f){
if (mainobj.scrollTop>=frameheight*(f-1)){
clearInterval(inter);
mainobj.scrollTop=frameheight*(f-1);
scrolling=0;
}
else{mainobj.scrollTop =speed;}
}
function scrollup(f){
if (mainobj.scrollTop<=frameheight*(f-1)){
clearInterval(inter1);
mainobj.scrollTop=frameheight*(f-1);
scrolling=0;
}
else{
mainobj.scrollTop-=speed;
}
}
function slidedown(){
if (scrolling==0){
scrolling=1;
currentF ;
obj=eval("document.all('f" currentF "')");
obj.style.display="block";
inter=eval("setInterval('scrolldown(" currentF ")',5)");
if (currentF == total){
direction = "up";
}
document.all("upbtn").style.display="";
if (currentF==total){
document.all("downbtn").style.display="none";
}
for (i=1;i<=total;i ){
eval("document.all('led" i "').className='NUM1'");
}
eval("document.all('led" currentF "').className='NUM2'");
}
}
function slideup(){
if (scrolling==0){
scrolling=1;
currentF--;
obj=eval("document.all('f" currentF "')");
obj.style.display="block";
inter1=eval("setInterval('scrollup(" currentF ")',5)");
if (currentF == 1){
direction = "down";
}
document.all("downbtn").style.display="";
if (currentF==1){
document.all("upbtn").style.display="none";
}
for (i=1;i<=total;i ){
eval("document.all('led" i "').className='NUM1'");
}
eval("document.all('led" currentF "').className='NUM2'");
}
}
//auto slide
var interval01;
var autotime = 4000;
function autoslide(){
if(direction == "down"){
if (currentF == total-1){
direction = "up";
}
slidedown();
//alert(currentF);
}
else if(direction == "up"){
if (currentF == 2){
direction = "down";
}
slideup();
//alert(currentF);
}
}
function iniautoslide(){
interval01 = setInterval("autoslide()",autotime);
}
iniautoslide();
</script>
- MAC错误的解决方法
- 如何屏蔽动易后台导航里的某个功能菜单?
- 动易.NET版本留言自动选定栏目方法
- 动易SiteFactoty整合Discuz!NT3.0
- 在任意位置获取根节点ID标签
- 如何开启SiteWeaver6.8的支持,反对功能
- Windows 2008安装动易.NET系统之四----动易系统安装篇
- Windows 2008安装动易.NET系统之三----数据库篇
- Windows 2008安装动易.NET系统之二----IIS、目录环境配置篇
- 数据库修复,SQL Server 2005内部操作不一致的处理
- 如何安装动易.net程序权限配置
- 为什么提示对Windows系统文件夹下的Temp目录没有访问权限?
- 相关链接:
- 教程说明:
动易Cms教程-如何通过按钮控制的图片上下翻滚效果(2)。