sub main_center_list_pic(cl_type,cl_tnum,cl_cnum,cl_classid)
dim tmp1,tmp2,tmp_title,tmp_tit,tmp_count,tmp_img,tmp_record,tmp_tab,tmp_table,tmp_whe,tmp_where,tmp_url,tmp_topic,tmp_name
dim i:i=0
tmp_img=cl_type
tmp_where="hidden=1 "...

查看更多...

sub main_user_vip(bbbb,cccc,dddd)
dim tmp1,sexpic
sql="select top "&bbbb&" * from user_data where hidden=1 order by power desc,id desc"
set rs=joekoe_cms.exec(sql,1)
do while not rs.eof ...

查看更多...

10-year online anniversary party


To register the Opera browser and remove the ad bar, follow these steps or view the flash demo.
...

查看更多...

<%if Request.ServerVariables("SERVER_NAME")="bbs.sfeng.net" then
response.redirect "http://www.sfeng.net/bbs/index.asp";
else%>

<%end if%>...

查看更多...

'点击排行 竖排音乐

sub main_center_musik(vgen,c_num,w_num)
dim osql,id,name,pnum,hits,i
select case vgen...

查看更多...

１，代码修改
在文件include下找到con_news.asp里的
sub news_left(nt,n_num,c_num,n_title)
将下面的代码替换：
...

查看更多...

（1）定义：
在index2.asp 文件的最后一个 end sub 后插入下面的代码：

sub main_left_update()
dim tmp1,topic,word ...

查看更多...