请看:http://www.hs-ysxx.com/Index.asp，

下面的“最新图片”与上面的无法对齐,怎么修改？

左边的表格上下宽度一样，但是“最新图片”不能自动收缩。

请教修改方法。

另外编辑器要修改一下宽度（主要为了美观）（在Include目录下的 PowerEasy.GuestBook.asp中修改）
以及修改编辑器按钮的使用权限（实现游客可插入图片.flash等）

仿造后演示地址： http://www.cqteas.com/ljy/  

此主题相关图片如下xin_0820205261034125459052.jpg：

修改方法很简单  不用什么动态标签  用自定义列表标签就可以了   可以用在任何频道 

做成自定义页面  用iframe调用
<iframe border=0  name=bd marginwidth=0 framespacing=0 arginheight=0 src="{$InstallDir}showpage.asp?id=1" frameborder=0 noResize width=710 height=370 scrolling=no vspale="0"></iframe>

（上面iframe的页面路径根据实际情况修改）

斑竹说火狐下右侧文字显示不出来。。  我没办法了   新华的也显示不出来  不过IE下面完全正常的   我想  还是用IE的人多吧。。。 

下载地址：

100%无错！  放心使用

var baseURL后面的是频道目录  注意修改

另外根据上面修改的路径 要注意修改 s.src=baseURL+src.substr(33);  红色的数值

2008年1月31日修改兼容SiteWeaver 6.5，增加了插件安全系数，所有传递的参数都经过严格的过滤，杜绝SQL注入！

 点击浏览该文件

第一步：在后台任一文章频道 自定义字段管理中，添加一个新字段，配置如下：
    使用范围：所有同类频道
    字段名称：MY_upart
    字段标题：顶
    字段说明：任意
    调用标签：{$MY_upart}
    字段类型：单行文本
    默认值：0
    是否必填：是

确认输入无错后，保存修改。

第二步：下载上面的文件后解压，得到2个文件，分别是:install_ding.asp  ding.asp，这两个文件都放在与conn.asp同级目录下。

第三步：如果你的网站目前没有录入文章是一个空表，可以跳过此步。如果你的文章模块已有数据，请执行此操作，在浏览器执行install_ding.asp，操作完成后务必删除该文件！(操作前最好备份数据库)

第四步：在任意你想显示顶文章的页面（只要能正常得到{$ArticleID}的页面）插入以下代码：<iframe src="/ding.asp?articleid={$ArticleID}" width="55" height="65" scrolling="no" frameborder="0"></iframe>，如果你网站的ding.asp文件路径与上面不同，请将上面代码的文件路径修改正确。

第五步：该生成的生成，该清除缓存的清除缓存。完毕

--------------------------------------------------------------------------------------

将文件放在频道目录的修改方法,

方法1.将文件放置在频道目录中，然后将ding.asp第1、2行修改为
<!--#include file="../start.asp" -->

方法2：文件仍放在根目录，修改sql = "select MY_upart from PE_Article where Deleted=" & PE_False & " and Status=3 and ArticleID=" & ArticleID
修改为
sql = "select PE_Article.MY_upart,PE_Channel.ChannelDir from PE_Article,PE_Channel where PE_Article.ChannelID=PE_Channel.ChannelID and PE_Article.Deleted=" & PE_False & " and PE_Article.Status=3 and PE_Article.ArticleID=" & ArticleID

Response.Write"<a href="""&InstallDir&add&""" target=""_top"">查看</a>"
修改为
Response.Write"<a href="""&InstallDir&rs("ChannelDir")&add&""" target=""_top"">查看</a>"

此方法可以自动分辨文章所属频道的目录，演示地址：http://guest.pasun.cn/l12/200703/706.html和http://guest.pasun.cn/Article/dfgh/gdfh/200705/965.html

摘自：动易论坛

动易默认显示方式：

共 100 篇文章  首页 上一页 下一页 尾页 页次：1/5页  20篇文章/页 转到：第5页

人性化显示方式：

共100篇文章  当前显示1-20篇文章  首页 | 上一页 | 1 2 3 4 5 6 7 8 9 | 下一页 | 尾页

修改方法：

编辑 include/PowerEasyCommon.Front.asp
查找 Function ShowPage_Html(ByVal strPath, iClassID, FileExt, sfilename, totalnumber, MaxPerPage, CurrentPage, ShowTotal, ShowAllPages, strUnit)

大概在第3244行，选择代码直到End Function，大概第3438行。

将这些内柔替换为以下内容，然后刷新缓存，重新生成相关页面。

代码：

Function ShowPage_Html(ByVal strPath, iClassID, FileExt, sfilename, totalnumber, MaxPerPage, CurrentPage, ShowTotal, ShowAllPages, strUnit)
    Dim NextPage, PrevPage, EndPage
    Dim TotalPage, strTemp, strUrl, i
    If totalnumber = 0 Or MaxPerPage = 0 Or IsNull(MaxPerPage) Then
        ShowPage_Html = ""
        Exit Function
    End If
    If totalnumber Mod MaxPerPage = 0 Then
        TotalPage = totalnumber \ MaxPerPage
    Else
        TotalPage = totalnumber \ MaxPerPage + 1
    End If
	
    If CurrentPage > TotalPage Then CurrentPage = TotalPage

    PrevPage = TotalPage - CurrentPage + 2
    NextPage = TotalPage - CurrentPage
	
    EndPage = 1

    If sfilename <> "" Then
        strUrl = JoinChar(sfilename)
    Else
        strUrl = ""
    End If
    
    If Right(strPath, 1) = "/" Then
        strPath = Left(strPath, Len(strPath) - 1)
    End If
    
    strTemp = strTemp & "<div class=""showpage"">"
    If ShowTotal = True Then
        strTemp = strTemp & "共" & totalnumber & strUnit & "&nbsp; "
    End If
		
	If CurrentPage >= TotalPage Then
		strTemp = strTemp & "当前显示" & (TotalPage-1)*MaxPerPage+1 & "-" & totalnumber & strUnit & "&nbsp; "
	Elseif CurrentPage=1 Then
		strTemp = strTemp & "当前显示1-" & 1*MaxPerPage & strUnit & "&nbsp; "
	Else
		strTemp = strTemp & "当前显示" & (CurrentPage-1)*MaxPerPage+1 & "-" & CurrentPage*MaxPerPage & strUnit & "&nbsp; "
	End If	
	
    If CurrentPage = 1 Then
        strTemp = strTemp & "首页 | 上一页 |"
    Else
        If iClassID > 0 Then
            strTemp = strTemp & "<a href='" & strPath & "/List_" & iClassID & FileExt & "'>首页</a> |"
        Else
            strTemp = strTemp & "<a href='" & strPath & "/" & "'>首页</a> |"
        End If
        If CurrentPage = 2 Then
            If iClassID > 0 Then
                strTemp = strTemp & " <a href='" & strPath & "/List_" & iClassID & FileExt & "'>上一页</a> |"
            Else
                strTemp = strTemp & " <a href='" & strPath & "/" & "'>上一页</a> |"
            End If
        Else
            If strUrl <> "" Then
                strTemp = strTemp & " <a href='" & strUrl & "page=" & (CurrentPage - 1) & "'>上一页</a> |"
            Else
                If iClassID > 0 Then
                    strTemp = strTemp & " <a href='" & strPath & "/List_" & iClassID & "_" & PrevPage & FileExt & "'>上一页</a> |"
                Else
                    strTemp = strTemp & " <a href='" & strPath & "/List_" & PrevPage & FileExt & "'>上一页</a> |"
                End If
            End If
        End If
    End If
	
	strTemp = strTemp & " "
	
    If ShowAllPages = True Then
		Dim Jmaxpages
		If (CurrentPage - 4) <= 0 or TotalPage < 10 Then
			Jmaxpages = 1
			Do While (Jmaxpages<10)
				If Jmaxpages = CurrentPage Then
					strTemp = strTemp & "<font color=""FF0000"">" & Jmaxpages & "</font> "
				ElseIf Jmaxpages = 1 Then
					If iClassID > 0 Then
						strTemp = strTemp & "<a href=""" & strPath & "/List_" & iClassID & FileExt & """>" & Jmaxpages & "</a> "
					Else
						strTemp = strTemp & "<a href=""" & strPath & "/" & """>" & Jmaxpages & "</a> "
					End If
				Else
					If strUrl <> "" Then
					   strTemp = strTemp & "<a href=""" & strUrl & "page=" & Jmaxpages & """>" & Jmaxpages & "</a> "
					Else
						If iClassID > 0 Then
							strTemp = strTemp & "<a href=""" & strPath & "/List_" & iClassID & "_" & TotalPage - Jmaxpages + 1 & FileExt & """>" & Jmaxpages & "</a> "
						Else
							strTemp = strTemp & "<a href=""" & strPath & "/List_" & TotalPage - Jmaxpages + 1 & FileExt & """>" & Jmaxpages & "</a> "
						End If
					End If
				End If
				If Jmaxpages = TotalPage Then Exit Do
				Jmaxpages = Jmaxpages + 1
			Loop
		ElseIf (CurrentPage + 4) >= TotalPage Then
			Jmaxpages = TotalPage-8
			Do While (Jmaxpages <= TotalPage)
				If Jmaxpages = CurrentPage Then
					strTemp = strTemp & "<font color=""FF0000"">" & Jmaxpages & "</font> "
				ElseIf Jmaxpages = 1 Then
					If iClassID > 0 Then
						strTemp = strTemp & "<a href=""" & strPath & "/List_" & iClassID & FileExt & """>" & Jmaxpages & "</a> "
					Else
						strTemp = strTemp & "<a href=""" & strPath & "/" & """>" & Jmaxpages & "</a> "
					End If
				Else
					If strUrl <> "" Then
					   strTemp = strTemp & "<a href=""" & strUrl & "page=" & Jmaxpages & """>" & Jmaxpages & "</a> "
					Else
						If iClassID > 0 Then
							strTemp = strTemp & "<a href=""" & strPath & "/List_" & iClassID & "_" & TotalPage - Jmaxpages + 1 & FileExt & """>" & Jmaxpages & "</a> "
						Else
							strTemp = strTemp & "<a href=""" & strPath & "/List_" & TotalPage - Jmaxpages + 1 & FileExt & """>" & Jmaxpages & "</a> "
						End If
					End If
				End If
				Jmaxpages = Jmaxpages + 1
			Loop
		Else
			Jmaxpages = CurrentPage - 4
			Do While (Jmaxpages < CurrentPage + 5)
				If Jmaxpages = CurrentPage Then
					strTemp = strTemp & "<font color=""FF0000"">" & Jmaxpages & "</font> "
				ElseIf Jmaxpages = 1 Then
					If iClassID > 0 Then
						strTemp = strTemp & "<a href=""" & strPath & "/List_" & iClassID & FileExt & """>" & Jmaxpages & "</a> "
					Else
						strTemp = strTemp & "<a href=""" & strPath & "/" & """>" & Jmaxpages & "</a> "
					End If
				Else
					If strUrl <> "" Then
					   strTemp = strTemp & "<a href=""" & strUrl & "page=" & Jmaxpages & """>" & Jmaxpages & "</a> "
					Else
						If iClassID > 0 Then
							strTemp = strTemp & "<a href=""" & strPath & "/List_" & iClassID & "_" & TotalPage - Jmaxpages + 1 & FileExt & """>" & Jmaxpages & "</a> "
						Else
							strTemp = strTemp & "<a href=""" & strPath & "/List_" & TotalPage - Jmaxpages + 1 & FileExt & """>" & Jmaxpages & "</a> "
						End If
					End If
				End If
				Jmaxpages = Jmaxpages + 1
			Loop
		End If
    End If

    If CurrentPage >= TotalPage Then
        strTemp = strTemp & "| 下一页 | 尾页"
    Else
        If strUrl <> "" Then
            strTemp = strTemp & "| <a href='" & strUrl & "page=" & (CurrentPage + 1) & "'>下一页</a> "
            strTemp = strTemp & "| <a href='" & strUrl & "page=" & TotalPage & "'>尾页</a>"
        Else
            If iClassID > 0 Then
                strTemp = strTemp & "| <a href='" & strPath & "/List_" & iClassID & "_" & NextPage & FileExt & "'>下一页</a> "
                strTemp = strTemp & "| <a href='" & strPath & "/List_" & iClassID & "_" & EndPage & FileExt & "'>尾页</a>"
            Else
                strTemp = strTemp & "| <a href='" & strPath & "/List_" & NextPage & FileExt & "'>下一页</a> "
                strTemp = strTemp & "| <a href='" & strPath & "/List_" & EndPage & FileExt & "'>尾页</a>"
            End If
        End If
    End If
	
    strTemp = strTemp & "</div>" & vbCrLf
	
    If ShowAllPages = True And TotalPage > 20 Then
        strTemp = strTemp & "<script language='javascript'>" & vbCrLf
        strTemp = strTemp & "function gopage(page,totalpage){" & vbCrLf
        strTemp = strTemp & "  if (event.keyCode==13){" & vbCrLf
        strTemp = strTemp & "    if(Math.abs(page)>totalpage) page=totalpage;" & vbCrLf
        If iClassID > 0 Then
            If strUrl <> "" Then
                strTemp = strTemp & "    if(Math.abs(page)>1) window.location='" & strUrl & "page='" & "+Math.abs(page);" & vbCrLf
            Else
                strTemp = strTemp & "    if(Math.abs(page)>1) window.location='" & strPath & "/List_" & iClassID & "_'" & "+(totalpage-Math.abs(page)+1)+'" & FileExt & "';" & vbCrLf
            End If
            strTemp = strTemp & "    else  window.location='" & strPath & "/List_" & iClassID & FileExt & "';" & vbCrLf
        Else
            If strUrl <> "" Then
                strTemp = strTemp & "    if(Math.abs(page)>1) window.location='" & strUrl & "page='" & "+Math.abs(page);" & vbCrLf
            Else
                strTemp = strTemp & "    if(Math.abs(page)>1) window.location='" & strPath & "/List_'+(totalpage-Math.abs(page)+1)+'" & FileExt & "';" & vbCrLf
            End If
            strTemp = strTemp & "    else  window.location='" & strPath & "/Index" & FileExt & "';" & vbCrLf
        End If
        strTemp = strTemp & "  }" & vbCrLf
        strTemp = strTemp & "}" & vbCrLf
        strTemp = strTemp & "</script>" & vbCrLf
    End If
    ShowPage_Html = strTemp
End Function

编辑admin/admin_article.asp，找到大概2327行，注释掉该行：

'Call CreateAllJS

即在该行前面添加一个单引号。

往后阿标将致力于提供各大CMS文章系统的插件开发、模板制作以及技术支持。欢迎大家前来讨论咨询。

小弟今天不小心在后台将注册头像中的60个头像全部删掉了！图片还在，但是就是后台对注册头像的管理界面中却是什么也没有了，不知道该怎么恢复！！！

看下图：：

我是３．６２版的，今天换了个空间，结果在后台添加文章时就出错，出现空白的页面如图，结果添加文章不成功，而在图片或下载频道添加图片或软件时不出错．谁能帮我下，我的学校网站，搞不好吃领导批啊！

Microsoft OLE DB Provider for SQL Server 错误 '80040e14'

在关键字 'Key' 附近有语法错误。

/inc/function.asp，行 739

Microsoft OLE DB Provider for SQL Server 错误 '80040e14'

列名 'True' 无效。

/inc/function.asp，行 739

检查过连接文件没有问题