如何把动易默认栏目页的index.html去掉
1个回答
展开全部
不知道各位站长有多少人用动易程序,动易是asp,在安全性方面要比php略差一些。但是如果你网站的数据不太多用access数据库的话,动易转移网站的时候比较方便,直接下载上传就可以了,php+mysql的话还要转移数据库比较麻烦。但是用access的缺点就是数据大了网站反应会比较慢。所以现在用php程序的站长要占到绝大部分。
php和asp谁优谁差就不再讨论了,笔者今天想说的是在使用动易过程中遇到的一个问题。使用动易程序的朋友们都知道,动易的栏目页和内容页面的导航,如果你在后台选择“列表文件分目录保存在所属栏目的文件夹中,例:Article/ASP/JiChu/index.html(栏目首页) Article/ASP/JiChu/List_2.html(第二页)”,那么默认的样式就是/***/index.html,大家都知道在seo方面,目录形式的权重要优于.html。那么我们如何才能将默认的/***/index.html修改成为/***/呢?笔者以前搞过类似的问题,今天又遇到这个问题,忘记了怎么搞,所以又查了一些资料,为了以后不在到处查资料,故写此篇文章方面以后遇到此类问题容易解决。下面给出方法:
修改 Include/PowerEasy.Common.Front.asp 文件找到以下代码
Function GetClassUrl(sParentDir, sClassDir, iClassID, iClassPurview)
Dim strClassUrl
If (UseCreateHTML = 1 Or UseCreateHTML = 3) And iClassPurview < 2 Then
strClassUrl = ChannelUrl & GetListPath(StructureType, ListFileType, sParentDir, sClassDir)
& GetListFileName(ListFileType, iClassID, 1, 1) & FileExt_ListElsestrClassUrl = ChannelUrl_ASPFile & "/ShowClass.asp?ClassID=" & iClassIDEnd IfGetClassUrl = strClassUrl
End Function
Function GetClass_1Url(sParentDir, sClassDir, iClassID, iClassPurview)
Dim strClassUrl
If (UseCreateHTML = 1 Or UseCreateHTML = 3) And iClassPurview < 2 Then
strClassUrl = ChannelUrl & GetListPath(StructureType, ListFileType, sParentDir, sClassDir)
& GetList_1FileName(ListFileType, iClassID) & FileExt_ListElsestrClassUrl = ChannelUrl_ASPFile & "/ShowClass.asp?ShowType=2&ClassID=" & iClassIDEnd IfGetClass_1Url = strClassUrl
End Function
将红名代码部分删除即可
希望这篇文章能给遇到此类问题的朋友带来一点帮助。
php和asp谁优谁差就不再讨论了,笔者今天想说的是在使用动易过程中遇到的一个问题。使用动易程序的朋友们都知道,动易的栏目页和内容页面的导航,如果你在后台选择“列表文件分目录保存在所属栏目的文件夹中,例:Article/ASP/JiChu/index.html(栏目首页) Article/ASP/JiChu/List_2.html(第二页)”,那么默认的样式就是/***/index.html,大家都知道在seo方面,目录形式的权重要优于.html。那么我们如何才能将默认的/***/index.html修改成为/***/呢?笔者以前搞过类似的问题,今天又遇到这个问题,忘记了怎么搞,所以又查了一些资料,为了以后不在到处查资料,故写此篇文章方面以后遇到此类问题容易解决。下面给出方法:
修改 Include/PowerEasy.Common.Front.asp 文件找到以下代码
Function GetClassUrl(sParentDir, sClassDir, iClassID, iClassPurview)
Dim strClassUrl
If (UseCreateHTML = 1 Or UseCreateHTML = 3) And iClassPurview < 2 Then
strClassUrl = ChannelUrl & GetListPath(StructureType, ListFileType, sParentDir, sClassDir)
& GetListFileName(ListFileType, iClassID, 1, 1) & FileExt_ListElsestrClassUrl = ChannelUrl_ASPFile & "/ShowClass.asp?ClassID=" & iClassIDEnd IfGetClassUrl = strClassUrl
End Function
Function GetClass_1Url(sParentDir, sClassDir, iClassID, iClassPurview)
Dim strClassUrl
If (UseCreateHTML = 1 Or UseCreateHTML = 3) And iClassPurview < 2 Then
strClassUrl = ChannelUrl & GetListPath(StructureType, ListFileType, sParentDir, sClassDir)
& GetList_1FileName(ListFileType, iClassID) & FileExt_ListElsestrClassUrl = ChannelUrl_ASPFile & "/ShowClass.asp?ShowType=2&ClassID=" & iClassIDEnd IfGetClass_1Url = strClassUrl
End Function
将红名代码部分删除即可
希望这篇文章能给遇到此类问题的朋友带来一点帮助。
博思aippt
2024-07-20 广告
2024-07-20 广告
作为深圳市博思云创科技有限公司的工作人员,对于Word文档生成PPT的操作,我们有以下建议:1. 使用另存为功能:在Word中编辑完文档后,点击文件->另存为,选择PowerPoint演示文稿(*.pptx)格式,即可将文档内容转换为PPT...
点击进入详情页
本回答由博思aippt提供
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询