<!--#include file="utf-8.asp" -->
<!--#include file="js/Function.asp" -->
<!--#include file="CheckAdmin.asp" -->
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<META NAME="copyright" CONTENT="Copyright 2010-2012 - yidacms.com" />
<META NAME="Author" CONTENT="世纪伟成  yidacms.com" />
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<link href="js/admin.css" rel="stylesheet" type="text/css">
<title>插件安装！</title>
</head>
<body>
<%
		'版权：世纪伟成(http://yidacms.com)
		'本信息不会影响您网站的正常访问，无论免费用户或是收费用户请保留这里的信息.
		'如果您删除了这里的版权信息,将追究法律责任.
		File=server.MapPath ("setup.asp")
		function FSOlinedit(File,lineNum) 
		if linenum < 1 then exit function 
		dim fso,f,temparray,tempcnt 
		set fso = server.CreateObject("scripting.filesystemobject") 
		if not fso.fileExists(File) then exit function 
		set f = fso.opentextfile(File,1) 
		if not f.AtEndofStream then 
		tempcnt = f.readall 
		f.close 
		set f = nothing 
		temparray = split(tempcnt,chr(13)&chr(10))
		if lineNum>ubound(temparray)+1 then 
		exit function 
		else 
		FSOlinedit = temparray(lineNum-1) 
		end if 
		end if 
		end function 
		max=FSOlinedit(File,1)
%>
		<table width="98%" border="1" cellpadding="10" cellspacing="0" bordercolor="#cccccc" style="border-collapse:collapse" bgcolor="#FFFFFF" align="center">
		  <tr>
			<td colspan="3">&nbsp; 什么是插件？ 插件是可扩展的系统功能！<br />
							&nbsp;    怎么使用插件？ 首先去(<a href="http://yidacms.com/htdocs/web/my/index.asp?boardid=19" target="_blank">yidacms.com 下载插件</a>)，把下载后的插件文件解压到管理员目录或替换掉以前的插件文件。<br />
							 &nbsp;   怎么安装插件？ 进入后台>条件设置>启动插件>刷新后台>左侧 插件管理>添加插件>安装>刷新后台</td>
		  </tr>
		  <tr>
                 <% IF max = "无插件可安装" then%>
			<td colspan="3">&nbsp;当前[<font color="#ff0000"><%Response.Write max%></font>]</td>
                  <%else%>
			<td colspan="3">&nbsp;当前可以安装的插件为[<font color="#ff0000"><%Response.Write max%></font>] 是否<a href="setup.asp">安装</a>?</td>
                 <%end if%>
		  </tr>
		  <tr>
			<td width="150" colspan="3" bgcolor="#CCCCCC">&nbsp;当前<font color="red">已</font>安装的插件有：</td>
		  </tr>
				<%
				set rs=server.createobject("adodb.recordset")   
				sql="select * from shuaiweb_Plugins ORDER BY id DESC"  
				rs.open sql,dbok,1,1 
		
				if rs.bof and rs.eof then
					response.write "<tr><td><font color=""red"">&nbsp;暂无安装过的插件！</font></td></tr>"
						Else
						i=1
				do while not rs.eof
				%>
						<tr>
						<td width="150">&nbsp;<%=i%></td>
						<td>&nbsp;<a href="<%=rs("shuaiweb_Pluginsurl")%>"><font color="#ff0000"><%=rs("shuaiweb_Pluginstitle")%>插件</font></a></td>
						<td widht="300"> 创建时间: <%=rs("time")%></td>
						</tr>
				<% 
				i=i+1 
				rs.MoveNext 
				loop  
				rs.close
				End If
				%>
		  </tr>
		</table>
</body>
</html>