分类: Cms预览模式: 普通 | 列表

[私密日志] 私密日志

作者:cmscn  日期:2007-02-05

该日志是私密日志，只有管理员或发布者可以查看！
分类:Cms | 固定链接 | 评论: 8 | 引用: 0 | 查看次数: 632

[私密日志] 私密日志

作者:cmscn  日期:2007-01-30

该日志是私密日志，只有管理员或发布者可以查看！
分类:Cms | 固定链接 | 评论: 8 | 引用: 0 | 查看次数: 694

[私密日志] 私密日志

作者:cmscn  日期:2007-01-29

该日志是私密日志，只有管理员或发布者可以查看！
分类:Cms | 固定链接 | 评论: 5 | 引用: 0 | 查看次数: 750

各板块设置不同关键字，增强收录（带后台管理）

作者:cmscn  日期:2007-01-28

演示可看本站网页源代码http://www.cherison.com.cn
原帖：http://www.cherison.com.cn/forum/view.asp?forum_id=8&view_id=22

1.修改admin_config_edit.asp
找到


Code:

<tr><td colspan=3 class=td> 网站安全过滤设置</td></tr>
<tr>
<td>用户名禁用：</td>
<td><input type=text name=web_dim_15 value='<%response.write web_dim(15)%>' size=40 maxlength=200></td>
<td class=gray><%call admin_read("","用户名禁用","网站注册用户名过滤字符，系统将默认禁用以下字符：<br>空格、|、:、'、

"、TABLE符、回车符、换行符等")%></td>
</tr>
<tr>



在前面加上


Code:

<tr><td colspan=3 class=td> 网站板块关键字设置</td></tr>
<tr>
<td>整站通用：</td>
<td colspan=2>
  <table border=0 cellspacing=0 cellpadding=0>
  <tr>
  <td><input type=text name=web_all value='<%response.write web_all%>' size=62 maxlength=200> </td>
  <td><%call admin_read("","板块关键字设置","当未对各板块设置关键字时，即显示此关键字，各关键字之间用“,”分开")%></td>
  </tr>
  </table>
</td>
</tr>
<tr>
<td>新闻板块：</td>
<td colspan=2>
  <table border=0 cellspacing=0 cellpadding=0>
  <tr>
  <td><input type=text name=web_news value='<%response.write web_news%>' size=62 maxlength=200> </td>
  <td><%call admin_read("","板块关键字设置","各板块设置不同关键字，增强收录，各关键字之间用“,”分开")%></td>
  </tr>
  </table>
</td>
</tr>
<tr>
<td>文章板块：</td>
<td colspan=2>
  <table border=0 cellspacing=0 cellpadding=0>
  <tr>
  <td><input type=text name=web_art value='<%response.write web_art%>' size=62 maxlength=200> </td>
  <td><%call admin_read("","板块关键字设置","各板块设置不同关键字，增强收录，各关键字之间用“,”分开")%></td>
  </tr>
  </table>
</td>
</tr>
<tr>
<td>下载板块：</td>
<td colspan=2>
  <table border=0 cellspacing=0 cellpadding=0>
  <tr>
 &am...

查看更多...

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

1.2中3.0头部及底部模仿的修改

作者:cmscn  日期:2007-01-28

修改include/skin.asp

头部修改


Code:

  response.write vbcrlf&"<body topmargin=0 leftmargin=0><a name='top'></a><center>"   
  if var3=4 then exit sub 
  response.write vbcrlf&lefter& _ 
                 vbcrlf&"<table border=0 cellspacing=0 cellpadding=0 width='100%'>" & _ 
                 vbcrlf&"<tr><td colspan=3 align=center height=26>" & _ 
                 vbcrlf&"  <table border=0 cellspacing=0 cellpadding=0 width='100%'>" & _ 
                 vbcrlf&"  <tr>" & _ 
                 vbcrlf&"  <td width=2><img src='"&joekoe_cms.web_dir_skin&"web/top_02.gif' border=0></td>" & _ 
                 vbcrlf&"  <td width=168 background='"&joekoe_cms.web_dir_skin&"web/top_03.gif'><img src='"&joekoe_cms.web_dir_skin&"web/top_03.gif' border=0></td>" & _ 
                 vbcrlf&"  <td width=31><img src='"&joekoe_cms.web_dir_skin&"web/top_04.gif' border=0></td>" & _ 
                 vbcrlf&"  <td  width='*' align=right background='"&joekoe_cms.web_dir_skin&"web/top_05.gif'>" & _ 
                 vbcrlf&" ...

查看更多...

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

  树形论坛for CMS 1.2

作者:cmscn  日期:2007-01-27



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

[私密日志] 私密日志

作者:cmscn  日期:2007-01-26

该日志是私密日志，只有管理员或发布者可以查看！
分类:Cms | 固定链接 | 评论: 7 | 引用: 0 | 查看次数: 699

[私密日志] 私密日志

作者:cmscn  日期:2007-01-25

该日志是私密日志，只有管理员或发布者可以查看！
分类:Cms | 固定链接 | 评论: 7 | 引用: 0 | 查看次数: 721

后台贴图商城列表增加预览

作者:cmscn  日期:2007-01-25

引用内容 引用内容
  <td><a href='<%response.write pageurl2%>action=edit&id=<%response.write id%>'  title='<img src=../upload/<%response.write spic%> border=0 height=120>' ><%response.write joekoe_cms.code_html(topic,1,(18+tnum))%></a></td>



商城
引用内容 引用内容
  <td><a href='?jk_mod=<%response.write jk_mod%>&action=edit&id=<%response.write id%>' title='<img src=../upload/<%response.write smallimg%> border=0 height=120>'><%response.write joekoe_cms.code_html(name,1,(18+tnum))%></a></td>

查看更多...

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

自助友情链接

作者:cmscn  日期:2007-01-23

<!-- #include file="inc/con_help.asp" -->
<!-- #include file="../include/jk_val_code.asp" -->
<%
index_url="links"
select case action
case "add"
  tit_fir="友情链接"
  tit="自助交换链接"
case else
  tit="友情链接"
end select

if action="add" then
call web_head(0,0,0,0,0)
else
call web_head(0,0,0,0,0)
end if
'----------------------------左边 开始----------------------------
%>
<table cellspacing=1 cellpadding=4 class=table>
<tr><td class=td0> <%response.write tit%></td></tr>
<tr class=bg_td><td align=center height=50><a href='<%response.write joekoe_cms.web_url%>' target=_blank><img border=0 src='<%=web_dim(6)%>images/logo.gif' width=88 heigh=31 alt='<%response.write joekoe_cms.web_name%>'></a></td></tr>
<tr class=bg_td><td align=center height=100><textarea name=flink_main rows=5 cols=21 onfocus=this.select() onmouseover=this.focus()><a href='<%response.write joekoe_cms.web_url%>' target=_blank><img border=0 src='<%response.write joekoe_cms.web_url%>images/logo.gif' width=88 heigh=31 alt='<%response.write joekoe_cms.web_name%>'></a></textarea></td></tr>
<tr class=bg_td><td align=center height=20><a href='?action=add'><b><font class=blue>自助添加友情链接</font></b></a></td></tr>
</table>
<%
call left_help()
'----------------------------左边 结束----------------------------
call web_center(0)
'----------------------------中间 开始----------------------------
response.write vbcrlf&"<table cellspacing=1 cellpadding=4 class=table>"

select case action
case "add"
  call links_add()
case else
  call links_view()
end select

response.write vbcrlf&"</table>"
'----------------------------中间 结束----------------------------
call web_end(0,0)

sub links_add()
  dim nname,nurl,npic,orders,nsort,hidden,valcode,found_err,sort
  if joekoe_cms.chk() then
    nname=trim(request.form("nname"))
    nname=joekoe_cms.code_form(nname)
    nurl=trim(request.form(&...

查看更多...

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