			<%
Public sub StrCount2(Str)
		Counter = 0
		z=0
		For I = 1 To Len(Trim(Str))
			If Asc(Mid(Str, I, 1))<0 Then
				Counter = Counter + 2
			Else
			Counter = Counter + 1
			
	
			end if
			if counter >= 26 then
			z=i
			response.write  left(str,z)
			exit for
			end if
		Next
		if z=0 then
			response.write str
end if
End sub
%><%
									
									set rsss=server.createobject("adodb.recordset")
    sqlss="select top 12 * from [fcpic]  order by adddate desc"
        rsss.open sqlss,conn,1,1
news_cont=0
%>	<table border="0" width="100%" cellpadding="0" cellspacing="0">
				<tr>
					<td>
					<table border="0" width="100%" cellspacing="0" cellpadding="0">
												<tr>
													<td bgcolor="#F7F7F7" height=20>¡¾Í¼¿âÅÅÐÐ°ñ¡¿¡¡¡¡</td>
															
													<td bgcolor="#E9E9E9"  width=2></td>
												</tr>
												<tr>
												
													<td bgcolor="#E9E9E9" height=2 colspan="1"></td>
													<td bgcolor="#E9E9E9" height=2 colspan="1"></td>

												</tr>
											</table></td>
				</tr>	<%do while not rsss.eof
										news_cont=news_cont+1
										%>
				<tr>
					<td height="20">&nbsp;
					<a href="list.asp?id=<%=rsss("id")%>" title='<%=rsss("picname")%>'><%StrCount2(rsss("picname"))%></a>[<font color="#FF0000"><%=rsss("count")%></font>]</td>
				</tr>
					<%
										rsss.movenext
										if news_cont >=9 then exit do
										
										loop
										rsss.close
										set rsss=nothing
							
										%>
				</table>
			