5UCMS跳转时间修改成0秒跳转（实现马上跳转）_5ucms模版插件下载开发定制,5ucms站群模版,免费模版下载,5ucms仿站建站培训网

首页 > 5ucms教程 > 正文

5UCMS跳转时间修改成0秒跳转（实现马上跳转）

作者：Qiuss 来源：日期：2012/4/14 12:06:31 浏览量：447(滞后) 人气：LOADING...(实时) 【大中小】

修改5ucms文件：inc/class_content.asp

邱嵩松提示，可以修改好后保留一份，方便将来再次使用，查代代码：

If Len(Ra("JumpUrl")) > 0 Then
Dim JumpALT
JumpALT = "<head><meta http-equiv=""Content-Type"" content=""text/html; charset=" & response.charset & """ /><title>" & Ra("Title") & "</title><meta http-equiv=""Refresh"" content=""2;URL=" & Ra("JumpUrl") & """ /></head><body><div style=""text-align:left;margin:10px;""><div style=""padding:6px;font-size:14px;border:solid 1px #CCCCCC;background-color:#F8F8F5;""><h4 style=""padding:5px;font-size:16px;font-weight:bold;display:inline;"">" & Ra("Title") & "</h4><div style=""padding:5px;color:#666666;font-size:12px;"">" & Ra("Description") & "</div></div></div></body></html>"
If iPage = 1 Then CreateContent = JumpALT
If Createhtml = 1 Or Createhtml = 3 Then Call CreateFile(JumpALT, Filepath) ' 保存
Ra.Close: Exit Function
End If

将以上代码替换成：

If Len(Ra("JumpUrl")) > 0 Then
Dim JumpALT
JumpALT = "<head><meta http-equiv=""Refresh"" content=""0;URL=" & Ra("JumpUrl") & """ /></head>"
If iPage = 1 Then CreateContent = JumpALT
If Createhtml = 1 Or Createhtml = 3 Then Call CreateFile(JumpALT, Filepath) ' 保存
Ra.Close: Exit Function
End If

本站推荐：5ucms模板 5ucms插件微信/QQ:3876307 [复制给好友] [打印] [关闭] [返回] [顶部]

0 很有用	上一篇：让5ucms跳转的文章记录浏览量的方法下一篇：5ucms分类搞不明白怎么办，什么是大类，什么是小类？

本站声明：本网站所载文章等内容，目的在于传递更多信息，并不代表本网赞同其观点和对其真实性负责。如涉及作品内容、版权及其它问题，请在30日内与本网联系（Email：3876307#qq.com），我们将在第一时间删除内容。若原创内容转载请注明出处。常见问题：什么是路径码？如有问题，请在下方评论提问或加入5ucmsQQ群 5UCMS跳转时间修改成0秒跳转（实现马上跳转）的关键词:5UCMS 跳转时间跳转 5UCMS跳转

评论信息