【正文】 size=224 小時/font /td td width=136 height=25 background=image/ /td /tr /table table border=1 bordercolor=CCCCCC cellpadding=0 cellspacing=0 width=300 %39。新聞發(fā)表最多者sql=select 標題,count(*) from pinglun group by 標題 order by count(*) desc set rs=(sql) i=0do while i8 if not then%tr td width=38 height=20 background=image/ align=center bordercolor=FFFFFF%=i+1%/tdtd colspan=2 width=254 font size=2 %=left(rs(0),6)%(%=rs(1)%) /font /td/tr %22 end ifif i8 and then%trtd colspan=3 bordercolor=FFFFFF /td/tr%end if i=i+1 loop % trtd colspan=3 width=150 height=138 align=center !1 table width=292 trtd width=150 height=138 a href= img src=image/ border=0/img /a /tdtd width=140 img src=image/ border=0/img :85868179br img src=image/ border=0/img :85868179br img src=image/ border=0/img :85868179br img src=image/ border=0/img :85868179br img src=image/ border=0/img :85868179br /td /tr/table br a href=mailto: img src=image/ border=0 width=100/img /a !1 /td /tr /table!end /tdtd width=400 b!tablestarttable width=600 border=1 cellspacing=0 cellpadding=0 height=400 23bordercolor=FFFFFF tr bordercolor=ff6403 th scope=col align=left width=320 height=106 !記錄相關問題 網站說明地方br ul font size=2li相關說明及新聞/li/fontfont size=2li相關說明及新聞/li/fontfont size=2li相關說明及新聞/li/font/ul/thform name=form1 th scope=col height=106 width=342 background=image/ align=right input type=text size=20 height=25 name=cat /input input type=submit value=Go height=25 width=5 /input % sub go_onclick fdsfdsf end sub if request(cat) then ?cat=amp。order by 瀏覽次數(shù) desc 39。查詢關注的分類 set rs=(sql)%%i=1do while not %a href=?id=%=rs(0)%font color=0 size=1◆%=left(rs(1),9)%/font/a font color=FF0000 size=1%=(rs(2))%/font %if i=2 then bri=0end ifi=i+1loop%/td /tr tr height=8025 td width=50% bordercolor=CCCCCC% sql=select top 10 編號,標題,類型 from newsdata where 類型=39。網頁39。該網頁現(xiàn)在還沒制作。b. 專欄網頁代碼. !include file=table border=1 bordercolor=4e4332 cellpadding=0 cellspacing=0 background=image\ width=992 align=left tr width=500 !圖片滾動新聞 td height=50 colspan=2 background=image\ marquee a href=img src=image\ border=0/a/imga href=img src=image\ border=0/a/imga href=img src=image\ border=0/a/img/marquee /td ! /tr tr align=top ! td width=394 height=200 align=center bordercolor=0embed src=swf\ allowfullscreen=true wmode=opaque width=250 height=200/embed /td ! td width=592 bordercolor=4e4332 bgcolor=ffffff table tr td align=leftheight=10 background=image\ font color=FFFFFF最新動態(tài)/font /td td width=30background=image\ a href=/a /td /tr tr height= td align=leftheight=290 colspan=2 % sql=select top 10 編號,標題 from newsdata order by 發(fā)布時間 desc set rs=(sql) i=0 do while not and i10 % lia href=?id=%=trim(rs(0))%29 font size=1%=rs(1)%/font/a/li % i=i+1 loop% /td /tr tr height=1 td align=leftheight=1 bgcolor=CCCCCC/td /tr /table /td ! /trtrtd colspan=2background=image\font color=ffffff推薦/font /td/tr tr ! td align=left bordercolor=CCCCCC bgcolor=ffffff % sql=select top 30 編號,標題,瀏覽次數(shù) from newsdata order by 瀏覽次數(shù) desc set rs=(sql) i=1 do while not and i10 % a href=?id=%=rs(0)%.font size=1%=rs(1)% %=rs(2)%/font/abr % i=i+1 loop % ! /td td align=left bordercolor=CCCCCCbgcolor=ffffff % i=1 do while not and i10 % a href=?id=%=rs(0)%.font size=1%=rs(1)% %=rs(2)%/font/abr % i=i+1 loop %! 30 /td /tr trtd colspan=2background=image\font color=ffffff最有影響力的文章/font /td/tr tr ! td align=left bordercolor=CCCCCC bgcolor=ffffff % sql=select 標題,count(*) from pinglun group by 標題 order by count(*) desc set rs=(sql) i=1 do while not and i10 sql=select 編號 from newsdata where 標題=39。 set rs1=(sql) if then sql=delete from pinglun where 標題=39。 (sql) end if if not then % a href=?id=%=rs1(0)%font size=2%=rs(0)% (%=rs(1)%)/font/abr % i=i+1 end if loop 39。rs(0)amp。rs(0)amp?？傮w框架 主要實現(xiàn)把上面的模塊應用在一個網頁上 2. 網頁代碼：% =true%body link=0 vlink=0 !include file=table width=950 border=0 cellspacing=0 cellpadding=0 align=center bgcolor=FFFFFF tr td !include file=/td /tr % if (page)= or (page)=1 thenpagenum1=1