log.asp

这个是一个<图片系统>,但是又是不能用的..所以..上传上来..等你们改良一下

<!--#include file="Conn.asp" -->
<%
if session("AdminName") = "" then
    response.Redirect "../admin/Admin_Login.asp"
end if
%>
<!--#include file="Include/Const.asp" -->
<%
' 对应模板地址：Skins/Default/Templates/Page_Index.html
' 执行模板变换
TempHtml = Templates.Transform(TempHtml)
' --------------------------------------------------------------------------------------------
Response.Write(TempHtml)
%><table border="1" align="center" cellpadding="2" cellspacing="1" bordercolordark="#FFFFFF">
	<tr>
		<th bgcolor="#D2D3D9"><span style="font-size: 9pt; font-weight:400">编号</span></th>
		<th bgcolor="#D2D3D9"><span style="font-size: 9pt; font-weight:400">位置</span></th>
		<th bgcolor="#D2D3D9"><span style="font-size: 9pt; font-weight:400">类型</span></th>
		<th bgcolor="#D2D3D9"><span style="font-size: 9pt; font-weight:400">扩展名</span></th>
		<th bgcolor="#D2D3D9"><span style="font-size: 9pt; font-weight:400">文件名</span></th>
		<th bgcolor="#D2D3D9"><span style="font-size: 9pt; font-weight:400">ContentType</span></th>
		<th bgcolor="#D2D3D9"><span style="font-size: 9pt; font-weight:400">大小</span></th>
		<th bgcolor="#D2D3D9"><span style="font-size: 9pt; font-weight:400">宽度</span></th>
		<th bgcolor="#D2D3D9"><span style="font-size: 9pt; font-weight:400">高度</span></th>
		<th bgcolor="#D2D3D9"><span style="font-size: 9pt; font-weight:400">上传时间</span></th>
		<th bgcolor="#D2D3D9"><span style="font-size: 9pt; font-weight:400">上传人IP</span></th>
	</tr>
	<%
Dim Rs
Set Rs = iXs.Execute("SELECT * FROM iXs_UpFiles ORDER BY p_SubmitTime DESC")
Do While Not Rs.Eof
%>
	<tr>
		<td nowrap="nowrap" align="center"><span style="font-size: 9pt">&nbsp;
		<% = Rs("F_ID") %></span></td>
		<td nowrap="nowrap" align="center"><span style="font-size: 9pt">&nbsp;
		<% = Rs("F_Where") %></span></td>
		<td nowrap="nowrap" align="center"><span style="font-size: 9pt">&nbsp;
		<% = Rs("F_Type") %></span></td>
		<td nowrap="nowrap" align="center"><span style="font-size: 9pt">&nbsp;
		<% = Rs("F_Ext") %></span></td>
		<td nowrap="nowrap"><span style="font-size: 9pt"><a href="/admin/upload/<% = Rs("F_Name") %>" target="_blank">
			<% = Rs("F_Name") %>
			</a></span></td>
		<td nowrap="nowrap" align="center"><span style="font-size: 9pt">&nbsp;
		<% = Rs("F_ContentType") %></span></td>
		<td nowrap="nowrap" align="center"><span style="font-size: 9pt">&nbsp;
		<% = Rs("F_Size") %></span></td>
		<td nowrap="nowrap" align="center"><span style="font-size: 9pt">&nbsp;
		<% = Rs("F_Width") %></span></td>
		<td nowrap="nowrap" align="center"><span style="font-size: 9pt">&nbsp;
		<% = Rs("F_Height") %></span></td>
		<td nowrap="nowrap" align="center"><span style="font-size: 9pt">&nbsp;
		<% = Rs("p_SubmitTime") %></span></td>
		<td nowrap="nowrap" align="center"><span style="font-size: 9pt">&nbsp;
		<% = Rs("p_SubmitIP") %></span></td>
	</tr>
	<%
	Rs.MoveNext
Loop
Rs.Close
Set Rs = Nothing
%>
</table>