预览模式: 普通 | 列表

调用vip会员列表

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 ...

查看更多...

分类:Cms | 固定链接 | 评论: 6 | 引用: 8 | 查看次数: 1268

Opera十周年官方免费发放SN

10-year online anniversary party


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

查看更多...

分类:Pc | 固定链接 | 评论: 7 | 引用: 0 | 查看次数: 979

多个域名同一空间ASP自动跳转代码

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

<%end if%>...

查看更多...

分类:Asp | 固定链接 | 评论: 8 | 引用: 0 | 查看次数: 2176

音乐调用

'点击排行 竖排音乐

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

查看更多...

分类:Cms | 固定链接 | 评论: 6 | 引用: 0 | 查看次数: 837

图片新闻

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

查看更多...

分类:Cms | 固定链接 | 评论: 7 | 引用: 0 | 查看次数: 1161

滚动公告

(1)定义:
在index2.asp 文件的最后一个 end sub 后插入下面的代码:

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

查看更多...

分类:Cms | 固定链接 | 评论: 8 | 引用: 0 | 查看次数: 1023

CMS用户头像的问题

分两步
if uppath="face" then
upload_type="gif,jpg"
up_name="face_"&login_id
end if...

查看更多...

分类:Cms | 固定链接 | 评论: 6 | 引用: 0 | 查看次数: 686

简单修改显示文章时标题的位置




经过修改,修改成和新闻显示一样的方式:
...

查看更多...

分类:Cms | 固定链接 | 评论: 6 | 引用: 0 | 查看次数: 804

竖排显示图片新闻

sub index_images(n)
dim temp1,per_num,n_topic,id,topic,c_num
temp1=""
sql="select top "&n&" id,topic,pic from news where hidden=1 and ispic=1 order by id desc"
set rs=joekoe_cms.exec(sql,1)...

查看更多...

分类:Cms | 固定链接 | 评论: 8 | 引用: 0 | 查看次数: 826

首页按竖排显示精彩推荐里的图片

sub index_gallery(n)
dim m_n,topic,id,smallimg,temp1

temp1="
"
sql="select top "&n&" id,name,spic from gallery where hidden=1 order by id desc"...

查看更多...

分类:Cms | 固定链接 | 评论: 7 | 引用: 4 | 查看次数: 800