预览模式: 普通 | 列表

几个网站

商城可以借鉴http://shop.8185.com

借鉴下 X-Space 个人门户吧 

模版看看www.poco.cn

整合看看http://www.jsp163.com

博客至少要有oblog主要功能

交友模块看看 交友MsLove3.0


查看更多...

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

文章多行列表

sub root_main(f_title,c_num,f_num)
%>
<table cellspacing=1 cellpadding=4 class=table>
<tr><td class=td0> <%response.write img_skin(web_img_m)%> <%response.write f_title%></td></tr>
<tr class=bg_td><td>
<table border=0 cellspacing=0 cellpadding=2 width='100%'>
<%
  sql="select top "&c_num&" id,c_id,topic,counter from root where hidden=1 order by id desc"
  set rs=joekoe_cms.exec(sql,1)
  do while not rs.eof 
  response.write "<tr>"
  for i=1 to 4
  if rs.eof then exit for
%>
<td>
<%response.write img_skin(web_img_h)%>
<a href="root/root_view.asp?c_id=<%response.write rs("c_id")%>&s_id=<%response.write sid%>&id=<%response.write rs("id")%>" alt='<%response.write joekoe_cms.code_js(joekoe_cms.code_html(rs("topic"),1,0),1)%>' target=_blank>
<%response.write joekoe_cms.code_js(joekoe_cms.code_html(rs("topic"),1,f_num),1)%></a></td>
<%
  rs.movenext
  next
  response.write "</tr>"
  loop
  rs.close
%>
<table border=0 cellspacing=0 cellpadding=0 width='100%'>
<tr><td align=right><a href="/root/root_list.asp?action=more&c_id=31">浏览更多…</a> </td></tr>
</table></td></tr></table>
<%
end sub
%>

调用 call root_main("美术馆",10,12)

查看更多...

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

多行列表 黄页

sub pris_main(f_title,ft,c_num,f_num)
dim i,ii:ii=0
  select case ft
  case "hot"
    sql=" order by counter desc,id desc"
  case "good"
    sql=" and isgood=1 order by id desc"
  case else
    sql=" order by id desc"
  end select
%>
<table cellspacing=1 cellpadding=4 class=table>
<tr><td class=td0> <%response.write img_skin(web_img_m)%> <%response.write f_title%></td></tr>
<tr class=bg_td><td>
<table border=0 cellspacing=0 cellpadding=2 width='100%'>
<%
  sql="select top "&c_num&" id,c_id,name,counter from pris where hidden=1"&sql
  set rs=joekoe_cms.exec(sql,1)
  do while not rs.eof 
  response.write "<tr>"
  for i=1 to 2
  if rs.eof then exit for
%>
<td>
<%response.write img_skin(web_img_h)%>
<a href="pris_view.asp?c_id=<%response.write rs("c_id")%>&s_id=<%response.write sid%>&id=<%response.write rs("id")%>" alt='<%response.write joekoe_cms.code_js(joekoe_cms.code_html(rs("name"),1,0),1)%>' target=_blank>
<%response.write joekoe_cms.code_js(joekoe_cms.code_html(rs("name"),1,f_num),1)%></a></td>
<%
  ii=ii+1
  rs.movenext
  next
  response.write "</tr>"
  loop
  rs.close
%>
<table border=0 cellspacing=0 cellpadding=0 width='100%'>
<tr><td align=right><a href="pris_list.asp?action=<%response.write ft%>">浏览更多…</a> </td></tr>
</table></td></tr></table>
<%
end sub

调用

call pris_main("最新公司","new",10,12)

查看更多...

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

jk下拉菜单

images/admin/admin.js
style/joekoe_function.js


function sel_type(trsurl,turl)
{
    var sn,i,wdim,temp1,nurl;
    wdim=turl.split("|");
    sn=wdim.length;
    for (i=0;i<sn;i++)
    {
    nurl=wdim;
        temp1="<OPTION value='"+nurl+"'";
        if (trsurl==nurl) { temp1+=" selected"; }
        temp1+=">"+nurl+"</option>";
    document.write(temp1);
    }



<Select size=1 name=edus>
<script language=javascript>
<!--
sel_type('','不限|初中|高中|中技|中专|大专|本科|硕士|博士');
-->
</script>
</Select>


<Select size=1 name=edus>
<script language=javascript>
<!--
sel_type('<%=rs("edus")%>','不限|初中|高中|中技|中专|大专|本科|硕士|博士');
-->
</script>
</Select>

显示被隐藏内容 显示被隐藏内容
<Select size=1 name=wrtopic>
<script language=javascript>
<!--
sel_type('','<%response.write web_dim(27)%>');
-->
</script>
</Select>




sub joekoe_chk_bm()
    if chk() then
      web_dim(27)=code_config(request.form("web_dim_27"),0)
    call joekoe_template_common()
    call joekoe_template_common_other()
    call joekoe_template_js_config()
    call admin_msg("已成功修改了"&ntit&tit_fir&"!","?action="&action,1)
    exit sub
  end if
  call form_first()
%>
<form action='?action=<%response.write action%>' method=post>
<input type=hidden name=chk value='yes'>
<tr><td colspan=3 class=td> 专业设置</td></tr>
<tr>
<td>新增专业:</td>
<td><textarea name=web_dim_27 rows=10 cols=61><%response.write web_dim(27)%></textarea></td>
<td class=gray>注意:用"|"分隔开</td>
</tr>
<%
  call submit_config()
end sub



隐藏内容 隐藏内容
该内容已经被作者隐藏,只有会员才允许查阅 登录 | 注册


查看更多...

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

一种标准的网页下拉菜单(符合web标准)

<!DOCTYPE html PUBliC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml" lang="zh-CN">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>css菜单演示</title>


<style type="text/css">
<!--

*{margin:0;padding:0;border:0;}
body {
    font-family: arial, 宋体, serif;
        font-size:12px;
}


#nav {
     line-height: 24px;  list-style-type: none; background:#666;
}

#nav a {
    display: block; width: 80px; text-align:center;
}

#nav a:link  {
    color:#666; text-decoration:none;
}
#nav a:visited  {
    color:#666;text-decoration:none;
}
#nav a:hover  {
    color:#FFF;text-decoration:none;font-weight:bold;
}

#nav li {
    float: left; width: 80px; background:#CCC;
}
#nav li a:hover{
    background:#999;
}
#nav li ul {
    line-height: 27px;  list-style-type: none;text-align:left;
    left: -999em; width: 180px; position: absolute; 
}
#nav li ul li{
    float: left; width: 180px;
    background: #F6F6F6; 
}


#nav li ul a{
    display: block; width: 180px;w\idth: 156px;text-align:left;padding-left:24px;
}

#nav li ul a:link  {
    color:#666; text-decoration:none;
}
#nav li ul a:visited  {
    color:#666;text-decoration:none;
}
#nav li ul a:hover  {
    color:#F3F3F3;text-decoration:none;font-weight:normal;
    background:#C00;
}

#nav li:hover ul {
    left: auto;
}
#nav li.sfhover ul {
    left: auto;
}
#content {
    clear: left; 
}


-->
</style>

<script type=text/javascript><!--//--><![CDATA[//><!--
function menuFix() {
    var&a...

查看更多...

分类:Css | 固定链接 | 评论: 5 | 引用: 0 | 查看次数: 783

js+css+div制作水平下拉菜单

JavaScript代码部分



CSS代码部分 


HTML代码部分



最终效果图

查看更多...

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

JK1.2分目录修正

1.图片路径错误
skin.asp
    pic_var=web_dim(6)&joekoe_cms.web_upload&"no_pic.gif"

    pic_var=web_dim(6)&joekoe_cms.web_upload&pic_var

2.后台无管理权限页面无法显示
admin_onlogin.asp
  call format_redirect("../admin/admin.asp?action=main&error=popedom")

查看更多...

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

对象关闭时,不允许操作

Joekoe CMS 4.0
错误信息:
ADODB.Connection
原始错误:
Error #3704, 对象关闭时,不允许操作。 ADODB.Connection
返回首页
Processed in 16.469 s, -1 queries, 21 Cache.

修改
CONST DB_SERVER= "localhost"

CONST DB_SERVER= "127.0.0.1"

查看更多...

分类:Asp | 固定链接 | 评论: 6 | 引用: 0 | 查看次数: 1133
重新设定所在空间权限,everyone 读写操作权限

查看更多...

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

常用游戏(应用)端口

常用端口:

21 ftp 
22 ssh 
25 smtp 
80 http 
110 pop3 
143 imap4 
389 ldap 
443 https 
3306 mysql 
3389 远程连接
5631   5632     pcAnywhere



常用游戏端口 

中国游戏中心 TCP 8000 

网络扑克和下棋程序通常使用1080端口

联众世界 TCP 2000   
1007暗棋 
2000游戏大厅 
2002聊天室 
2005麻将 
3030红心大战 
3050五子棋 
3060桥牌 
3100跳棋 
3200中国象棋 
3300国际象棋 
3400四国军棋 
4000GICQ 
~4010 GICQ 
3000围棋 
3001俄罗斯方块 
3002三打一 
3003斗地主 
3004升级 
3005梭哈 
3006拱猪 
3007够级 
3008双扣 
3010跑得快 
3012飞行棋 
3013拼图 
3015台球 
3016原子 
3017510k 
3018憋7 
3019黑白棋 
3020锄大地 
3021炒地皮 
3022炸弹人 
3023敲三家

网易泡泡 UDP 4001

泡泡堂 端口 7878、4848

边锋网络游戏世界 TCP 4000

中国围棋网 TCP 9696

笨苹果游戏互动网 UDP 5000

上海热线游戏频道 TCP 8000

凯思帝国游戏在线 TCP 2050

传奇要用到7000 7100 7200 
第一个是登陆验证,第二个是选角色好象是.第三个是连接游戏服务器 

红色警戒 5000

MU:80、3123、44405、44407、55901

剑侠情缘:6661,5622

Diablo II:TCP 4000; UDP 6112

骑士:15000到16000

酷狗:7000、8800、1283

RO:6900 6121 5121 4000 4242帐号端口是:6000

CS端口:27005、27007、27010、27015-27020、27025、54321

仙境传说主服务器端口:6900 帐号服务器端口:6000

天堂2端口:7777、2106

命运端口:8281

卡盟:9000

Poco:9099

99外挂:9130

梦幻西游:14288

魔力:9014

Quake(雷神之锤) 26000 
Quake2 27910

神迹:7000


网上赢家 TCP 8001 

证券之星 Tcp 8888 

中国电骡:5672

BT:  16381-16881

查看更多...

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