ÅäºÏ½¹µãͼflashʹÓã¬ÔÀ´ÊÇÈ¡µÃ×îеÄͼƬÎÄÕ£¬È»ºó°ÑÏà¹ØÐÅÏ¢×÷Ϊ²ÎÊý´«µÝ¸øflash²¥·Å¡£
focus.asp´úÂëÈçÏ£º
<!--#Include File="conn.asp" -->
<!--#Include File="include/inc.asp"-->
<%
'Ê×Ò³½¹µãÒ³Ãæ
'by winston
'2010/05/15
Dim QueryArray
Dim FocusLinks,FocusPcis,FocusText
Dim PageNum,PageSize,PageCount,ReCount,Column
Dim i
PageNum=EA_Pub.SafeRequest(1,"page",0,1,0)
PageSize=10
ReCount=EA_DBO.Get_Article_ImgStat()(0,0)
PageCount=EA_Pub.Stat_Page_Total(PageSize,ReCount)
If PageNum>PageCount And PageCount>0 Then PageNum=PageCount
If PageCount>0 Then
QueryArray=EA_DBO.Get_Article_ImgList(PageNum,PageSize)
For i=0 To UBound(QueryArray,2)
If 0=i Then
FocusLinks= EA_Pub.Cov_ArticlePath(QueryArray(0,i),QueryArray(5,i),EA_Pub.SysInfo(18)) & ""
FocusPcis= QueryArray(2,i) & ""
FocusText=EA_Pub.Add_ArticleColor(QueryArray(3,i),QueryArray(1,i))& ""
Else
FocusLinks=FocusLinks & "|"& EA_Pub.Cov_ArticlePath(QueryArray(0,i),QueryArray(5,i),EA_Pub.SysInfo(18))
FocusPcis=FocusPcis & "|"& QueryArray(2,i)
FocusText=FocusText & "|"& EA_Pub.Add_ArticleColor(QueryArray(3,i),QueryArray(1,i))
End If
Next
Else
FocusLinks=""
FocusPcis=""
FocusText=""
End If
%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3c.org/TR/1999/REC-html401-19991224/loose.dtd">
<HTML xmlns="http://www.w3.org/1999/xhtml">
<HEAD>
<TITLE>flash</TITLE>
<META http-equiv=Content-Type content="text/html; charset=utf-8">
<META content="MSHTML 6.00.2900.3676" name=GENERATOR>
</HEAD>
<BODY style="BACKGROUND: none transparent scroll repeat 0% 0%; MARGIN: 0px" mce_style="BACKGROUND: none transparent scroll repeat 0% 0%; MARGIN: 0px
ÎÒϲ»¶¿´flash¶¯»£¬´ò¿ªÁËfirefox£¬°Ù¶ÈÒ»ÏÂflash¶¯»£¬½øÈëÍøÕ¾Ö®ºó¹Û¿´²»ÁË£¬µ«firefoxÌáʾ“ÄúÐèÒªÆäËû²å¼þÒÔÏÔʾ´ËÒ³ÃæµÄËùÓÐýÌå”ÓÚÊǵã»÷“°²×°È±Ê§²å¼þ”£¬Õâʱfirefox×Ô¶¯²éÕÒ²å¼þ£¬Ìáʾ£º
Adobe Flash Player(installer)
µ¥»÷Ñ¡ÔñÕâ¸ö²å¼þ£¬²¢µ¥»÷“ÏÂÒ»²½”£¬¸ù¾ÝÌáʾ£¬ÊäÈëÃÜ ......