<?xml version="1.0" encoding="UTF-8"?>
<PluginInstall>
 <main>
  <PluginName>NewLogForPJBlog</PluginName>
  <PluginTitle>Recent Article</PluginTitle>
  <PluginType>sidebar</PluginType>
  <PluginHtmlCode><![CDATA[<$NewLog$>]]></PluginHtmlCode>
  <PluginASPCode><![CDATA[<%
        function NewArticle(ByVal action)
             Dim blog_Article
             IF Not IsArray(Application(CookieName&"_blog_Article")) or action=2 Then
             	Dim book_Articles,book_Article
             	Set book_Articles=Conn.Execute("SELECT top 10 C.log_ID,C.log_Author,C.log_IsShow,C.log_PostTime,C.log_title,L.cate_ID,L.cate_Secret FROM blog_Content AS C,blog_Category AS L where L.cate_ID=C.log_CateID and L.cate_Secret=false and C.log_IsDraft=false order by log_PostTime Desc")
             	SQLQueryNums=SQLQueryNums+1
             	TempVar=""
             	Do While Not book_Articles.EOF
             	    if book_Articles("cate_Secret") then 
                       book_Article=book_Article&TempVar&book_Articles("log_ID")&"|,|"&book_Articles("log_Author")&"|,|"&book_Articles("log_PostTime")&"|,|"&"[隐藏分类日志]"
             		 elseif book_Articles("log_IsShow") then
                       book_Article=book_Article&TempVar&book_Articles("log_ID")&"|,|"&book_Articles("log_Author")&"|,|"&book_Articles("log_PostTime")&"|,|"&book_Articles("log_title")
             		 else
                       book_Article=book_Article&TempVar&book_Articles("log_ID")&"|,|"&book_Articles("log_Author")&"|,|"&book_Articles("log_PostTime")&"|,|"&"[隐藏日志]"
             		end if
             		TempVar="|$|"
             		book_Articles.MoveNext
             	Loop
             	Set book_Articles=Nothing
             	blog_Article=Split(book_Article,"|$|")
             	Application.Lock
             	Application(CookieName&"_blog_Article")=blog_Article
             	Application.UnLock
             Else
             	blog_Article=Application(CookieName&"_blog_Article")
             End IF
             
             if action<>2 then
              dim Article_Items,Article_Item
             	For Each Article_Items IN blog_Article
             	 Article_Item=Split(Article_Items,"|,|")
             	 NewArticle=NewArticle&"<a class=""sideA"" href=""default.asp?id="&Article_Item(0)&""" title="""&Article_Item(1)&" 于 "&Article_Item(2)&" 发表该日志"&CHR(10)&CCEncode(CutStr(Article_Item(3),25))&""">"&CCEncode(CutStr(Article_Item(3),25))&"</a>"
             	Next
              end if
       end function
       '处理最新日志内容
        Dim Article_code
        if Session(CookieName&"_LastDo")="DelArticle" or Session(CookieName&"_LastDo")="AddArticle" or Session(CookieName&"_LastDo")="EditArticle" then NewArticle(2)
    	Article_code=NewArticle(0)
        side_html_default=replace(side_html_default,"<$NewLog$>",Article_code)
        side_html=replace(side_html,"<$NewLog$>",Article_code)
    %>]]></PluginASPCode>
  <PluginPath><![CDATA[guestbook.asp]]></PluginPath>
  <SettingFile></SettingFile>
  <CreateTableSQL><![CDATA[]]></CreateTableSQL>
  <UpdateTableSQL><![CDATA[]]></UpdateTableSQL>
  <DropTable></DropTable>
  <Author>PuterJam</Author>
  <pubDate>2005-10-24</pubDate>
  <About><![CDATA[PJblog 最新日志插件 1.1\n可以在首页显示最新的日志]]></About>
 </main>
</PluginInstall>