百独托管7500 紫田网络超高转化播放器收cps[推荐]速盾CDN 免实名免备防屏蔽阿里云 爆款特卖9.9元封顶提升alexa、IP流量7Q5团队
【腾讯云】中小企福利专场【腾讯云】多款产品1折起高防 随时退换 好耶数据小飞国外网赚带你月入万元炎黄网络4H4G10M 99每月
香港带宽CN2/美国站群优惠中客数据中心 服务器租用联盟系统移动广告平台 中易企业专场腾讯云服务器2.5折九九数据 工信部正规资质
腾讯云新用户大礼包代金券高价收cpa注册量高价展示【腾讯云】2核2G/9.93起租服务器找45互联 随时退换阿里云 短信服务 验证秒达

[代码发布] 即日起,在落伍解决你用惊云管理系统中所遇到的问题 [复制链接]
查看:1514298 | 回复:155

头像被屏蔽

0

主题

18

帖子

56

积分

落伍者(一心一意)

Rank: 1

贡献
47
鲜花
0
注册时间
2005-11-28
发表于 2005-12-3 13:48:43 | 来自 中国广东深圳
如何修改或者增加分类模板里的代号呢?比如
代号:网页标题:T_TITLE 分类位置:T_TYPE 本级分类名:T_NAME 本类TOP:TXtop
vv5000 该用户已被删除
发表于 2005-12-3 18:27:56 | 来自 中国陕西商洛
提示: 作者被禁止或删除 内容自动屏蔽
头像被屏蔽

1

主题

621

帖子

568

积分

禁言

寂寞香烟

贡献
33
鲜花
0
注册时间
2005-6-21
发表于 2005-12-8 00:07:28 | 来自 中国河南开封
惊云下载系统如何修改或者增加分类模板里的代号呢?比如
代号:网页标题:T_TITLE 分类位置:T_TYPE 本级分类名:T_NAME 本类

TOP:TXtop?
pencat=replace(pencat,"T_TYPE",thistype)
pencat=replace(pencat,"T_NAME",ttype)
pencat=replace(pencat,"T_TITLE",thistitle)
pencat=replace(pencat,"TXtop",txtop)
pencat=replace(pencat,"DOWN_LIST",dlist)
pencat=replace(pencat,"XG_LIST",xlist)
pencat=replace(pencat,"XG_INFO",xinfo)
pencat=replace(pencat,"T_USER",user)
pencat=replace(pencat,"T_content",content)
pencat=replace(pencat,"T_up",up)
pencat=replace(pencat,"T_down",down)
都在这 自己看看  看看就明白了


怎么给惊云增加自定义标签?
修改soft_makesoft.asp文件,可以在这里定义

怎么让惊云下载   点击后弹出来下载框 但保存不了文件 一直是下载

状态呢?
这个可以通过设置FTP来实现

怎么让点击下载后,出现新的下载页面,在这个新下载页面上出现下载

连接 ?
修改down.asp最后第二行:
'转向连接
response.redirect fileurl
CODE:response.write "<title>"&cxn&""&cxv&" - 下载地址

</title><a href="&fileurl&"><b><font size=""2"">下载地址--点击

开始下载</font></b></a></div></center>"

怎么叫惊云生成HTML的时候是拼音呀?
例如:生成电影 头文字D  
touwendid.htm
要修改index_mb.asp,soft_makesoft.asp,soft_makesort.asp等文件

。这个有些工作量

如何在首页实现以时间来调用数据,比如说我要在一个栏目调用昨天添

加的数据,怎么实现?
参考代码:
下面定义了一个名字为aaa的标签,取的是昨天以后的记录
CODE:
i=0
sql="select top 15 cxn,cxv,id from down where date>#" & cstr

(DateAdd("d",-1,Now())) & "# order by hits desc"
rs.open sql,conn,1,1
if rs.eof then
  weektop="还没有软件"
else
do while not rs.eof
  aaa=aaa&"·<a href=""../soft/soft_"&rs("id")&".htm"">"&rs

("cxn")&" "&rs("cxv") &"</a><br>"
i=i+1
if i>=15 then exit do
参考代码:
下面定义了一个名字为aaa的标签,取的是昨天以后的记录

[code]
i=0
sql="select top 15 cxn,cxv,id from down where date>#" & cstr

(DateAdd("d",-1,Now())) &a ...
如果我想调用明天的数据,是不是把-1改为+1就可以了

在下载页怎么直接显示出上传的缩侵图?
在服务器安装生成图片缩略图组件(比如ASPJPEG),修改upload.asp

最近软件更新可以用下面的代码?
CODE:[Copy to clipboard]<%
rs.open ("select top 20 cxn,cxv,id,tid from down where gs=0

order by date desc"),conn,1,1
if rs.eof then
%>
                    <tr>
                      <td width="100%">还没有软件</td>
                    </tr>
                    <%
else
i=0
do while not rs.eof
%>
top 20 为软件显示的数量多少,

TXtop 之类的如何修改的?如何修改推荐个数?
打开down_makesoft.asp或down_makesort.asp找到
CODE:
'########读取本类top10
set rs=server.CreateObject("ADODB.RecordSet")
sql="select * from down where tid in ("&sqqq&") order by hits

desc"
rs.open sql,conn,1,1
if rs.eof then
   txtop="·还没有下载"
else
do while not rs.eof
h=h+1
txtop=txtop&"·<a href=""../soft/"&rs("id")&".htm"">"&rs

("cxn")&" "&rs("cxv")&"</a><br>"
if h>=10 then exit do
rs.movenext
loop
h=0
end if
rs.close
其中if h>=10 then exit do,这里10就是默认个数

列表部分(T_LB)   在哪修改?
down_makesort.asp中

怎么设置TXtop   每个推荐的字数 就是每个推荐的 设置它为10个字 ?
参考
CODE:
''########读取本类top10
set rs=server.CreateObject("ADODB.RecordSet")
sql="select * from down where tid in ("&sqqq&") order by hits

desc"
rs.open sql,conn,1,1
if rs.eof then
   txtop="·还没有下载"
else
do while not rs.eof
h=h+1
txtop=txtop&"·<a href=""../soft/"&rs("id")&".htm"">"&left(rs

("cxn")&" "&rs("cxv"),20)&"</a><br>"
if h>=10 then exit do
rs.movenext
loop
h=0
end if
rs.close

请问怎么把下载地址的文字连接改成图片的???
就是把“下载地址1”  改用图片
修改soft_makesoft.asp中
CODE:
'########读取下载连接
sql="select * from downfile where downid="&id&" order by

downno"
  rs.open sql,conn,1,1
  if not rs.eof then
if gs=1 or gs=2 or gs=3 then
dlist=dlist&"<img src=../images/play_"&gs&".gif width=16

height=16>&nbsp;"
else
dlist=dlist&"<script language=""javascript"">function JyDownH

(htmlurl){var newwin=window.open

(htmlurl,'','toolbar=no,location=no,directories=no,status=no,m

enubar=no,scrollbars=no,resizable=no');return false;}

</script>"
end if
  do while not rs.eof
pi=pi+1
if gs=1 or gs=2 or gs=3 then
dlist=dlist&"<a target=""_self"" href=""javascript:""

onClick=""window.open('../play.asp?id="&id&"&no="&rs

("downno")

&"','','toolbar=no,location=no,directories=no,status=no,menuba

r=no,scrollbars=yes,resizable=no,width=368,height=285,status=n

o,resizable=no')"">["&pi&"]</a>"
else
dlist=dlist&"<a href=""../down.asp?id="&id&"&no="&rs

("downno")&""" onclick=""return JyDownH(this.href);""><img

border=0 src=../images/d_download.gif width=14 height=14>点这

里下载-> "
if rs("filename")<>"" then
dlist=dlist&""&rs("filename")&""
else
dlist=dlist&""&cxn&" "&cxv&""
end if
dlist=dlist&"</a><br>"  
end if
rs.movenext
loop
end if
rs.close
'#######读取相关软件

CODE:
'########读取下载连接
sql="select * from downfile where downid="&id&" order by

downno"
  rs.open sql,conn,1,1
  if not rs.eof then
if gs=1 or gs=2 or gs=3 then
dlist=dlist&"<img src=../images/play_"&gs&".gif width=16

height=16>&nbsp;"
else
dlist=dlist&"<script language=""javascript"">function JyDownH

(htmlurl){var newwin=window.open

(htmlurl,'','toolbar=no,location=no,directories=no,status=no,m

enubar=no,scrollbars=no,resizable=no');return false;}

</script>"
end if
  do while not rs.eof
pi=pi+1
if gs=1 or gs=2 or gs=3 then
dlist=dlist&"<a target=""_self"" href=""javascript:""

onClick=""window.open('../play.asp?id="&id&"&no="&rs

("downno")

&"','','toolbar=no,location=no,directories=no,status=no,menuba

r=no,scrollbars=yes,resizable=no,width=368,height=285,status=n

o,resizable=no')"">["&pi&"]</a>"
else
dlist=dlist&"<a href=""../down.asp?id="&id&"&no="&rs

("downno")&""" onclick=""return JyDownH(this.href);""><img

border=0 src=../images/d_download.gif width=14 height=14><img

src=xxx>-> "
'if rs("filename")<>"" then
'dlist=dlist&""&rs("filename")&""
'else
'dlist=dlist&""&cxn&" "&cxv&""
'end if
dlist=dlist&"</a><br>"  
end if
rs.movenext
loop
end if
rs.close
'#######读取相关软件
也可以在首页模板改
参考:
i=0
sql="select top 28 id,cxn,cxv,hot from down order by hits

desc"
rs.open sql,conn,1,1
if rs.eof then
  top="还没有软件"
else
do while not rs.eof
  if rs("hot")=5 then     '这里默认推荐等级为5的软件为推荐软件
   top=top&"·<a href=""../soft/"&rs("id")&"/"">"&rs("cxn")

&rs("cxv")&"推荐</a><br>"
else
   top=top&"·<a href=""../soft/"&rs("id")&"/"">"&rs("cxn")

&rs("cxv")&"</a><br>"
  end if
i=i+1
if i>=28 then exit do
rs.movenext
loop
end if
rs.close


怎么样在 “傲游(Maxthon) v1.5 build 95 增强版 荐 (10.6) ”  推

荐的帖子后面加个“荐”字?
代码应该如何写呢。试了好多次,都不成功!
这个可以修改down_makesoft.asp中修改模板
头像被屏蔽

0

主题

3878

帖子

3835

积分

落伍者(两全齐美)

....继续梦游....

Rank: 2

贡献
268
鲜花
0
注册时间
2003-2-16
发表于 2006-2-19 05:48:21 | 来自 中国安徽宿州
怎么能找到数据库里面的日文字符?
签名被屏蔽

5

主题

2万

帖子

6322

积分

落伍者(三羊开泰)

落 伍 美 女 帮 副 帮 主

Rank: 3Rank: 3

贡献
1338
鲜花
27
注册时间
2004-6-19
发表于 2006-2-23 12:01:19 | 来自 中国云南昆明
怎么调用栏目下的软件呢。而不是分类的呢!!!
头像被屏蔽

3

主题

234

帖子

6

积分

落伍者(一心一意)

Rank: 1

贡献
2
鲜花
0
注册时间
2005-6-6
发表于 2006-5-2 11:14:10 | 来自 中国北京
感谢楼主的无私奉献,呵呵
论坛客服/商务合作/投诉举报:2171544 (QQ)
落伍者创建于2001/03/14,本站内容均为会员发表,并不代表落伍立场!
拒绝任何人以任何形式在本论坛发表与中华人民共和国法律相抵触的言论!
落伍官方微信:2030286 邮箱:(djfsys@gmail.com|tech@im286.com)
© 2001-2014

浙公网安备 33060302000191号

浙ICP备11034705号 BBS专项电子公告通信管[2010]226号

  落伍法律顾问: ITlaw-庄毅雄

手机版|找回帐号|不能发帖?|Archiver|落伍者

GMT+8, 2024-6-16 18:19 , Processed in 0.105129 second(s), 33 queries , Gzip On.

返回顶部