ASPCMS系统额外增加移动手机版 并共用一个数据库ASPCMS系统额外增加移动手机版 并共用一个数据库

从前 车马很慢
书信很远 一生只够爱一个人
Hi, 请登录     我要注册     找回密码

ASPCMS系统额外增加移动手机版 并共用一个数据库

ASPCMS系统介绍

ASPCMS是完全开源的一套CMS建站系统,主要面向企业进行快速的建造简洁,高效,易用,安全的公司企业网站,一般的开发人员就能够使用本系统以最低的成本、最少的人力投入在最短的时间内架设一个功能齐全、性能优异的公司企业网站。ASPCMS是基于ASP+Access(sql2000)开发的网站内容管理系统,提供了简介类模块,新闻类模块,产品类模块,图片类模块,下载类模块。你在使用过程中可选择任意模块来建设您的网站。GgD北洋博客-分享新鲜科技、互联网和IT技术的个人原创boke网站

GgD北洋博客-分享新鲜科技、互联网和IT技术的个人原创boke网站

增加移动手机端背景

在ASPCMS系统快速发展的前几个版本里面,因为市场发展及技术更新时间排列问题,导致最后并没有完善的处理好移动端适配及手机网站的生成问题;在2.0以后版本里面,官方增加了对此功能的完善,然而,大量用户在使用过程中,并没有自己的手机网站,在这种情况如下,如何在现有网站上增加一个适配的手机网站,成了一种潜在需求;GgD北洋博客-分享新鲜科技、互联网和IT技术的个人原创boke网站

GgD北洋博客-分享新鲜科技、互联网和IT技术的个人原创boke网站

移动手机网站添加教程

第一步:将压缩包中的wap文件夹对应复制到网站根目录,将templates/cn/wap文件夹对应复制到你的网站根目录/templates/你的模板文件夹下;GgD北洋博客-分享新鲜科技、互联网和IT技术的个人原创boke网站

WAP前端执行文件与WAP模板文件夹下载地址     提取码: (s9wn

第二步:使用NOTEPAD++或者Dreamweaver打开网站根目录的/inc/AspCms_CommonFun.asp文件,ctrl+f查找Function createFolder1 在这个函数的上方插入以下代码:GgD北洋博客-分享新鲜科技、互联网和IT技术的个人原创boke网站

Sub Check_Wap()
 dim MoblieUrl,reExp,MbStr
 MoblieUrl=sitepath&"/wap/"'此为手机网站路径,各位在复制代码时只要将此路径修改成指定手机网站的路径即可。推荐使用独立手机网站域名。
 Set reExp = New RegExp
 MbStr="Android|iPhone|UC|Windows Phone|webOS|BlackBerry|iPod"
 reExp.pattern=".*("&MbStr&").*"
 reExp.IgnoreCase = True
 reExp.Global = True
 If reExp.test(Request.ServerVariables("HTTP_USER_AGENT")) Then
  response.redirect MoblieUrl
  response.End
 End If
End Sub

如图所示:GgD北洋博客-分享新鲜科技、互联网和IT技术的个人原创boke网站

GgD北洋博客-分享新鲜科技、互联网和IT技术的个人原创boke网站

第三步:1)使用NOPTEAD++或者Dreamweaver打开网站根目录的/inc/AspCms_MainClass.asp文件,ctrl+f查找Public Function parseCommon(),在这个函数的上方插入以下代码:GgD北洋博客-分享新鲜科技、互联网和IT技术的个人原创boke网站

Public Function indexpath()
	content=replaceStr(content,"{aspcms:topsortid}",0)
	content=replaceStr(content,"{aspcms:sortid}",0)
End Function

2)再查找htmlFilePath=rs("htmlFilePath") 替换为:GgD北洋博客-分享新鲜科技、互联网和IT技术的个人原创boke网站

if isnul(pagemode)then 
	htmlFilePath=rs("htmlFilePath")
else
	htmlFilePath=pagemode
	languagePath=rs("languagePath")&pagemode&"/"
end if

3)查找:GgD北洋博客-分享新鲜科技、互联网和IT技术的个人原创boke网站

if isurl(sortUrl) then
	getSortLink=sortUrl
else

将else下内容替换为:GgD北洋博客-分享新鲜科技、互联网和IT技术的个人原创boke网站

if isnul(pagemode) then
	getSortLink=sitePath&sortUrl
else
	getSortLink=sitePath&"/"&pagemode&sortUrl
end if

第四步:打开程序根目录下的/inc/AspCms_SettingClass.asp文件和后台文件夹下的/inc/AspCms_SettingClass.asp文件,在第4行下面新增一行:GgD北洋博客-分享新鲜科技、互联网和IT技术的个人原创boke网站

dim pagemode:pagemode=""

第五行:打开程序根目录的index.asp文件,在<%下面新增一行:GgD北洋博客-分享新鲜科技、互联网和IT技术的个人原创boke网站

Check_Wap()

好了,修改到此结束,接下来用手机访问你的域名测试下吧,但是目前网站必须是以动态方式运行,静态不会跳转,各连接也不正常。GgD北洋博客-分享新鲜科技、互联网和IT技术的个人原创boke网站

赞() 打赏
未经允许不得转载:技术笔记 » ASPCMS系统额外增加移动手机版 并共用一个数据库
分享到: 更多 (0)

本站友链交换和投稿功能正在建设中......

友链交换我要投稿

觉得文章有用就打赏一下文章作者

支付宝扫一扫打赏

微信扫一扫打赏