动易网站管理系统的首页INDEX.ASP 修改
以前管理网站的人员不干了,现在领导要在首页修改个小问题,用的是动易网站管理系统2006版的。但是在FTP中看到的index.asp的首页中居然没有内容。仅有一些个代码:<...
以前管理网站的人员不干了,现在领导要在首页修改个小问题,用的是动易网站管理系统2006版的。但是在FTP中看到的index.asp的首页中居然没有内容。仅有一些个代码:
<%@language=vbscript codepage=936 %>
<%
Option Explicit
Response.Buffer = True
%>
<!--#include file="conn.asp"-->
<%
If FileExt_SiteIndex < 4 Then
Call CloseConn
Response.redirect "Index" & GetFileExt(FileExt_SiteIndex)
Else
Call CloseConn
Call Main
End If
Function GetFileExt(FileExtType)
Select Case FileExtType
Case 0
GetFileExt = ".html"
Case 1
GetFileExt = ".htm"
Case 2
GetFileExt = ".shtml"
Case 3
GetFileExt = ".shtm"
Case 4
GetFileExt = ".asp"
End Select
End Function
Sub Main()
On Error Resume Next
Dim PE_Index
Set PE_Index = Server.CreateObject("PE_Common6.CreateIndex")
If Err Then
Err.Clear
Response.Write "对不起,你的服务器没有安装动易组件(PE_Common6.dll),所以不能使用动易系统。请和你的空间商联系以安装动易组件。"
Exit Sub
End If
PE_Index.iConnStr = ConnStr
PE_Index.iSystemDatabaseType = SystemDatabaseType
Call PE_Index.ShowHTML
Set PE_Index = Nothing
If Err Then
Response.Write "错 误 号:" & Err.Number & "<BR>"
Response.Write "错误描述:" & Err.Description & "<BR>"
Response.Write "错误来源:" & Err.Source & "<BR>"
Err.Clear
End If
End Sub
%>
动易的组件早已安装好。而且一切浏览正常,但是不晓得FTP中真正的首页跑哪去了,( 怎么不是index.asp文件 )有谁熟悉的,告知啊! 展开
<%@language=vbscript codepage=936 %>
<%
Option Explicit
Response.Buffer = True
%>
<!--#include file="conn.asp"-->
<%
If FileExt_SiteIndex < 4 Then
Call CloseConn
Response.redirect "Index" & GetFileExt(FileExt_SiteIndex)
Else
Call CloseConn
Call Main
End If
Function GetFileExt(FileExtType)
Select Case FileExtType
Case 0
GetFileExt = ".html"
Case 1
GetFileExt = ".htm"
Case 2
GetFileExt = ".shtml"
Case 3
GetFileExt = ".shtm"
Case 4
GetFileExt = ".asp"
End Select
End Function
Sub Main()
On Error Resume Next
Dim PE_Index
Set PE_Index = Server.CreateObject("PE_Common6.CreateIndex")
If Err Then
Err.Clear
Response.Write "对不起,你的服务器没有安装动易组件(PE_Common6.dll),所以不能使用动易系统。请和你的空间商联系以安装动易组件。"
Exit Sub
End If
PE_Index.iConnStr = ConnStr
PE_Index.iSystemDatabaseType = SystemDatabaseType
Call PE_Index.ShowHTML
Set PE_Index = Nothing
If Err Then
Response.Write "错 误 号:" & Err.Number & "<BR>"
Response.Write "错误描述:" & Err.Description & "<BR>"
Response.Write "错误来源:" & Err.Source & "<BR>"
Err.Clear
End If
End Sub
%>
动易的组件早已安装好。而且一切浏览正常,但是不晓得FTP中真正的首页跑哪去了,( 怎么不是index.asp文件 )有谁熟悉的,告知啊! 展开
4个回答
展开全部
动易网站管理系统的首页INDEX.ASP 修改
悬赏分:10 - 离问题结束还有 3 天 15 小时
以前管理网站的人员不干了,现在领导要在首页修改个小问题,用的是动易网站管理系统2006版的。但是在FTP中看到的index.asp的首页中居然没有内容。仅有一些个代码:
<%@language=vbscript codepage=936 %>
<%
Option Explicit
Response.Buffer = True
%>
<!--#include file="conn.asp"-->
<%
If FileExt_SiteIndex < 4 Then
Call CloseConn
Response.redirect "Index" & GetFileExt(FileExt_SiteIndex)
Else
Call CloseConn
Call Main
End If
Function GetFileExt(FileExtType)
Select Case FileExtType
Case 0
GetFileExt = ".html"
Case 1
GetFileExt = ".htm"
Case 2
GetFileExt = ".shtml"
Case 3
GetFileExt = ".shtm"
Case 4
GetFileExt = ".asp"
End Select
End Function 动易网站管理系统的首页INDEX.ASP 修改
悬赏分:10 - 离问题结束还有 3 天 15 小时
以前管理网站的人员不干了,现在领导要在首页修改个小问题,用的是动易网站管理系统2006版的。但是在FTP中看到的index.asp的首页中居然没有内容。仅有一些个代码:
<%@language=vbscript codepage=936 %>
<%
Option Explicit
Response.Buffer = True
%>
<!--#include file="conn.asp"-->
<%
If FileExt_SiteIndex < 4 Then
Call CloseConn
Response.redirect "Index" & GetFileExt(FileExt_SiteIndex)
Else
Call CloseConn
Call Main
End If
Function GetFileExt(FileExtType)
Select Case FileExtType
Case 0
GetFileExt = ".html"
Case 1
GetFileExt = ".htm"
Case 2
GetFileExt = ".shtml"
Case 3
GetFileExt = ".shtm"
Case 4
GetFileExt = ".asp"
End Select
End Function
悬赏分:10 - 离问题结束还有 3 天 15 小时
以前管理网站的人员不干了,现在领导要在首页修改个小问题,用的是动易网站管理系统2006版的。但是在FTP中看到的index.asp的首页中居然没有内容。仅有一些个代码:
<%@language=vbscript codepage=936 %>
<%
Option Explicit
Response.Buffer = True
%>
<!--#include file="conn.asp"-->
<%
If FileExt_SiteIndex < 4 Then
Call CloseConn
Response.redirect "Index" & GetFileExt(FileExt_SiteIndex)
Else
Call CloseConn
Call Main
End If
Function GetFileExt(FileExtType)
Select Case FileExtType
Case 0
GetFileExt = ".html"
Case 1
GetFileExt = ".htm"
Case 2
GetFileExt = ".shtml"
Case 3
GetFileExt = ".shtm"
Case 4
GetFileExt = ".asp"
End Select
End Function 动易网站管理系统的首页INDEX.ASP 修改
悬赏分:10 - 离问题结束还有 3 天 15 小时
以前管理网站的人员不干了,现在领导要在首页修改个小问题,用的是动易网站管理系统2006版的。但是在FTP中看到的index.asp的首页中居然没有内容。仅有一些个代码:
<%@language=vbscript codepage=936 %>
<%
Option Explicit
Response.Buffer = True
%>
<!--#include file="conn.asp"-->
<%
If FileExt_SiteIndex < 4 Then
Call CloseConn
Response.redirect "Index" & GetFileExt(FileExt_SiteIndex)
Else
Call CloseConn
Call Main
End If
Function GetFileExt(FileExtType)
Select Case FileExtType
Case 0
GetFileExt = ".html"
Case 1
GetFileExt = ".htm"
Case 2
GetFileExt = ".shtml"
Case 3
GetFileExt = ".shtm"
Case 4
GetFileExt = ".asp"
End Select
End Function
展开全部
就是这个文件。要改版面得从后台模版上改。要改得从模版中改来。QQ:周一到五基本上都在522500460
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
动易属于傻瓜式管理
index.asp文件只是一个执行文件
如果要改首页 或者其他页内容 要在首页模板中改
那里决定着首页到底显示什么
index.asp文件只是一个执行文件
如果要改首页 或者其他页内容 要在首页模板中改
那里决定着首页到底显示什么
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
登陆后台——系统管理——首页模版修改。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询