急急急

在区域(qy)那显示图片显示不出来为什么呀?谢谢?

google_ad_width = 250; google_ad_height = 250; google_ad_format = "250x250_as"; google_color_url = "000000";

<%

dim rssql2,PageSize,RowCount,TotalPages,PageNo,Position,PageBegin,PageEnd

set conn = server.CreateObject("ADODB.connection")

set rs= server.CreateObject("ADODB.RecordSet")

conn.open("Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&server.MapPath("zhongzhong.asp"))

rssql2 = "select * from house where fwlb="求购" order by sj desc"

rs.open rssql2,conn,3,3

PageSize=20

PageSize=20

If rs.RecordCount=0 then

%>

<%

else

rs.PageSize = Cint(PageSize)

TotalPages=rs.PageCount

PageNo=Request.QueryString("PageNo")

if PageNo="" or PageNo<1 Then

PageNo = 1

end if

rs.AbsolutePage = PageNo

Position=rs.PageSize*PageNo