相关文章
北京网站设计教你DIV+CSS制作另一导航条效果
北京网页设计引入样式表(css)的四种方式
企通互联模板设计完全学习视频教材(第一集)
北京网页设计DW滤镜样式的语法规则
企通互联Dreamweaver MX 2004从零开始(6)
北京网站建设Flash处理XML文档数据教程
网页设计制作简单实用的FLASH导航菜单
北京网站建设Flash视频教程:3.4 变形动画
网站设计Dreamweaver 常见问题2
网页设计小技巧:网页样式表CSS的书写风格
品牌理念
北京网站建设最佳合作伙伴
北京网站建设专家企通互联
竭诚为您提供网站建设服务!
友好连接
文章搜索
你的位置:首页 >> 网站制作 >> 北京网站设计北京网站设计让JS像调用“最新新闻”一样调用“最新下载”
北京网站设计北京网站设计让JS像调用“最新新闻”一样调用“最新下载”
第一步:添加“栏目JS”中的“最新下载”选项
需要修改的文件(修改相同,每个文件有两处):
/Admin/Js/SysJsAdd.asp北京网站制作
/Admin/Js/SysJsModify.asp
查找: <option value="ProclaimNews" <%if Request("NewsType") = "ProclaimNews" then Response.Write("selected")%>>公告新闻</option>
在下边添加: <option value="Newdown" <%if Request("NewsType") = "NewDown" then Response.Write("selected")%>>最新下载</option>
成为:
<option value="ProclaimNews" <%if Request("NewsType") = "ProclaimNews" then Response.Write("selected")%>>公告新闻</option>北京网站设计
<option value="Newdown" <%if Request("NewsType") = "NewDown" then Response.Write("selected")%>> 北京网站设计最新下载</option>
第二步 添加生成代码:
修改文件:/admin/Inc/Cls_RefreshJs.asp
在里面找到 北京网站建设Js生成部分也就是这个代码:
End If网站制作
Case Else网站设计 网站制作
if RsSysJsObj("FileType")=1 then企通互联
RsCreateSql = "Select top "&NewsNum&" * From News where ClassID in ('"&ClassIDStr&"') and DelTF=0 and AuditTF=1 order by AddDate desc" '最新新闻
在Case Else 北京网页设计上边 End If 的下边添加:
'=================================蚂蚁阿德添加最新下载开始北京网站制作 www.qitongnet.com
Case "Newdown"企通互联 网站设计
if RsSysJsObj("FileType")=1 then北京网页设计
RsCreateSql = "Select top "&NewsNum&" * From Download where ClassID in ('"&ClassIDStr&"') and AuditTF=1 order by AddTime desc" '最新下载网站制作
else 网站建设北京网站建设
RsCreateSql = "Select top "&NewsNum&" * From Download where AuditTF=1 order by AddTime desc" '最新下载企通互联
end if网站设计
Set RsCreateObj = Conn.Execute(RsCreateSql)北京网站建设
If Not RsCreateObj.eof then北京网站设计
JSCodeStr = "document.write('<table width=""100%"" border=""0"" cellpadding=""0"" cellspacing="""&RowSpace&"""><tr>"网站制作
for i=1 to NewsNum网页设计
If RsCreateObj.eof then Exit For网站建设
Set TempClassObj = Conn.Execute("Select ClassEName,ClassCName,SaveFilePath from NewsClass where ClassID='"&RsCreateObj("ClassID")&"'")北京网站建设
If DateTF = true then网站建设
If ShowClassTF = true then北京网站制作 北京网站制作
If RightDate = true then北京网页设计
JSCodeStr = JSCodeStr &"<td>"& NaviPic &"["&TempClassObj("ClassCName")&"]"&"<a class="""&TitleCSS&""" href="""&GetOneDownLoadLinkURL(RsCreateObj("DownloadID"))&""""&OpenMode&">"&GotTopic(LoseHtml(RsCreateObj("Name")),TitleNum)&"</a></td><td><div align=Right><Span class="""&DateCSS&""">"&DateFormat(RsCreateObj("AddTime"),""&DateType&"")&"</Span>"&ListSpaceStrs&"</div></td>"