<!--#include file="conn.asp"--><%
	link_database()
%>
<!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 http-equiv="content-type" content="text/html; charset=gb2312">
<meta name="generator" content="oblog">
<meta name="keywords" content="²©¿Í">
<link rel="alternate" href="rss2.asp" type="application/rss+xml" title="rss" >
<title>²¥ÐãÍø</title>
<link href="OblogStyle/OblogsysDefault4.css" rel="stylesheet" type="text/css" /> 
<script src="inc/main.js"></script>
<script>function chkdiv(divid){var chkid=document.getElementById(divid);if(chkid != null){return true; }else {return false; }}</script>
<LINK media=screen href="skin/style/xiaoxie/images/N.css" type=text/css rel=stylesheet>
<LINK href="skin/style/xiaoxie/images/m.css" type=text/css rel=stylesheet>
</head>
<body>
	<table cellSpacing="0" cellPadding="0" width="100%" align="center" border="0" id="table2">
		<tr>
<%
Dim sql, rs, i, proviso, typeID1, orderFild

typeID1 = Request.ServerVariables("QUERY_STRING")
'Response.Write("debug_typeID1->" & typeID1 & "<p>")

orderFild = "logid"

proviso = "logtype = 10 AND oblog_user.userid = oblog_log.userid AND ishide <> 1 AND isdraft = 0 AND passcheck = 1 And oblog_log.isdel = 0 And oblog_user.isdel = 0 AND oblog_log.blog_password = 0 And (ispassword='' Or ispassword is null)"
if "1" = typeID1 then	'ÔÚÏß×ÔÅÄ
	proviso = proviso & " AND IsUpload = 0"
elseif "2" = typeID1 then
	proviso = proviso & " AND IsUpload = 1"
elseif "3" = typeID1 then
	orderFild = "iis"
elseif "4" = typeID1 then
	orderFild = "commentnum"
elseif "5" = typeID1 then
	orderFild = "LastTime"
elseif "6" = typeID1 then
	orderFild = "scores"
elseif "7" = typeID1 then
	proviso = proviso & " AND ClassID = 1"
elseif "8" = typeID1 then
	proviso = proviso & " AND ClassID = 3"
else
	proviso = proviso & " AND isbest = 1"
end if
if proviso <> "" then proviso = " WHERE " & proviso

sql = "SELECT TOP 18 * FROM oblog_log, oblog_user" & proviso & " ORDER BY " & orderFild & " DESC"
i = 1
'Response.Write("debug->" & sql & "<p>")
Set rs = conn.Execute(sql)
Do While Not rs.Eof
%>
			<td>
				<div class="I">
						<a target="_blank" href="/<%=rs("logfile")%>">
						<img style="Z-INDEX: 8" height="70" alt="<%=rs("topic")%>" src="/dvimage/<%=rs("vodFileName")%>_<%=rs("vodPicNum")%>.jpg" width="94" border="0"></a> 
				</div>
				<div class="H nLeft">
					<a class="blue12" target="_blank" href="/<%=rs("logfile")%>"><%=Left(rs("topic"), 8)%></a> &nbsp; &nbsp;
				</div>
			</td>
<%
	if 0 = i MOD 6 then Response.Write("</tr><tr>")
	i = i + 1
	if i > 18 then Exit Do
	rs.MoveNext
Loop
%>
		</tr>
	</table>
</body>
</html>
<%
	conn.Close
	Set conn = Nothing
%>