您当前位置:首页 > 文章中心 > SCSCMS > 修改教程

scscms插件-公告向左右滚动

稿件来源: 阳光企业网站管理系统   撰稿作者: 太阳光   发表日期: 2010-11-04   阅读次数: 256   查看权限: 游客查看

scscms插件-公告向左右滚动

先看看效果:http://www.scscms.com/scscms/gg_hor.asp?hor=2

第一步:在inc/scs_function.asp加入函数

'**************************************************
'函 数 名:Horizontal_diary(i_top)
'作    用:左右滚动的公告
'参    数:i_top表示选择多少条公告显示,建议为10
'**************************************************
Function Horizontal_diary(i_top)
Dim F_List
	Sql="Select Top "&i_top&" diary_date,diary_title,diary_good,web_url From [Scs_diary] Order By index_diary=1,diary_id Desc"
	Set Rs=Server.Createobject("adodb.recordset")
	Rs.open Sql,Conn,1,1
	If Rs.Eof and Rs.Bof Then
	F_List="正在更新之中……"
	Else
		Do While Not Rs.Eof
		i_Good=Split("紧急|重要|普通","|")(Rs(2))
		F_List=F_List&"<strong class=""scs_font"">["&i_Good&"]</strong> <a href=""" &Rs(3)& """ target=""_blank"">"&Rs(1)&"</a> <span class=disable_font>" &Rs(0)& "</span> &nbsp; "    
			Rs.MoveNext
		Loop
	End If 
	Rs.Close:Set Rs=Nothing
	Horizontal_diary=F_List
End Function

第二步:在inc/top.asp适当的位置插入HTML代码

<div class="maindiv">
<div class="div_title0"><div class="head_title0">&nbsp;</div><a href="/diary/">最新公告</a>  Announcements</div>
	<div id="horizontal" style="width:976px;height:18px;overflow:hidden">
	<%=Horizontal_diary(10)%>
	</div>
</div>
<div class="line"></div>

第三步:在inc/foot.asp的<script>内插入JS代码

new Marquee("horizontal",2,1,976,18,30,0,0); //向左滚动公告,注意m是大写
//或者
new Marquee("horizontal",3,1,976,18,30,0,0);//向右滚动公告注意m是大写
//上面的代码任选一行,不能两行都使用

说明:如果只是想在首页有此功能,那么第二、三步的代码就全部放在首页(default.asp)文件里

关键词: scscms,插件,公告滚动   编辑时间: 2010-11-05

  • 感到高兴

    1

    高兴
  • 感到支持

    0

    支持
  • 感到搞笑

    0

    搞笑
  • 感到不解

    0

    不解
  • 感到谎言

    0

    谎言
  • 感到枪稿

    0

    枪稿
  • 感到震惊

    0

    震惊
  • 感到无奈

    0

    无奈
  • 感到无聊

    0

    无聊
  • 感到反对

    0

    反对
  • 感到愤怒

    0

    愤怒
50%(1)
50%(1)
共有0 条评论 发言请遵守【相关规定

网友评论

会员头像
发 表同步腾讯微博    验证码:  点击更新请先登陆
  • 暂无评论
关闭模块文章图片 article Pictrue
  • 我的妈妈爸爸
  • 基于koa2+mysql+vue2.0+Element阳光内容管理系统
  • 代码覆盖率工具 Istanbul 入门教程
  • 全栈工程师的武器——MEAN
  • 9款超炫的 CSS3 复选框(Checkbox)
  • 微信开发在线翻译功能
  • CSS3那些不为人知的高级属性
  • 给easyui的datebox添加清空事件
  • flash写字效果
  • kendoUI系列教程之DropDownList下拉菜单
  • kendoUI系列教程之datetimepicker日期时间选择
  • kendoUI系列教程之datepicker日期选择
  • kendoUI系列教程之combobox下拉列表框
  • kendoUI系列教程之colorpicker
  • kendoUI系列教程之calendar日历表
  • kendoUI系列教程之autocomplete自动补齐