| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛 | 
登录
注册
用户控制面板
搜索
道具
风格
短消息
论坛展区
帮助
编程论坛 → WEB开发 → 『 ASP技术论坛 』 → [开源]我写的几段生成网站首页的代码，让高手见笑了
我的收件箱(0)
欢迎加入我们，一同切磋技术
用户名：   
 
密　码：  
共有 1374 人关注过本帖
标题：[开源]我写的几段生成网站首页的代码，让高手见笑了
只看楼主 加入收藏
静夜思
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来　自：济南的冬天
等　级：管理员
威　望：11
帖　子：8902
专家分：2567
注　册：2004-3-25
结帖率：100%
楼主
收藏
 问题点数：0 回复次数：13 
[开源]我写的几段生成网站首页的代码，让高手见笑了

主执行文件
create.asp

<!--#include file="clsMain.asp"-->
<%
create()

sub create()
dim fso,file,strOut
set fso=server.CreateObject("scripting.filesystemobject")
set file=fso.opentextfile(server.MapPath("indextmp.htm")) '打开模板
strOut=file.readall
file.close:set file=nothing

strOut=replace(strOut,"{$articlehot}",articlehot("all",14,18)) '论坛总的热门
strOut=replace(strOut,"{$kfyyhot}",articlehot("1",10,18))
strOut=replace(strOut,"{$webhot}",articlehot("3",10,18))
strOut=replace(strOut,"{$nethot}",articlehot("4",10,18))
strOut=replace(strOut,"{$sjkhot}",articlehot("5",10,18))
strOut=replace(strOut,"{$bbshot}",bbshot("all",14,36))
strOut=replace(strOut,"{$kfyyArticlenew}",Articlenew("1",10,36))
strOut=replace(strOut,"{$webArticlenew}",Articlenew("3",10,36))
strOut=replace(strOut,"{$netArticlenew}",Articlenew("4",10,36))
strOut=replace(strOut,"{$sjkArticlenew}",Articlenew("5",10,36))
strOut=replace(strOut,"{$kfyyGood}",Good("1",10,28))
strOut=replace(strOut,"{$webGood}",Good("3",10,28))
strOut=replace(strOut,"{$netGood}",Good("4",10,28))
strOut=replace(strOut,"{$sjkGood}",Good("5",10,28))
strOut=replace(strOut,"{$bokenew}",bokenew(14,26)) '博客最新

set file=fso.createtextfile(server.MapPath("../../index.html"))
file.writeline strOut
file.close:set file=nothing
set fso=nothing
end sub

siteconn.close:set siteconn=nothing
bbsconn.close:set bbsconn=nothing
bokeconn.close:set bokeconn=nothing
response.Write("生成网站首页完毕")
%>

搜索更多相关主题的帖子: 首页　开源　见笑　代码　
2005-12-03 14:20
静夜思
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来　自：济南的冬天
等　级：管理员
威　望：11
帖　子：8902
专家分：2567
注　册：2004-3-25
第 2 楼
收藏
 得分:0 

主执行文件包含的函数文件
clsMain.asp
[QUOTE]<!--#include file="conn.asp"-->
<%
dim sql,rs,thedi,rows,listbg
'################################################# 生成所有频道的热门文章 ############################################
function articlehot(theid,rows,lentitle)
dim tiaojian,str,ii,listbg,m

if theid="all" then
tiaojian="order by a.Hits desc"
else
set rs=siteconn.execute("select arrchildid from pe_class where classid="&theid&"")
tiaojian="and a.ClassId in("&rs(0)&") order by a.Hits desc"
rs.close:set rs=nothing
end if
sql="select top "&rows&" a.ClassId,a.ArticleId,a.Title,a.Hits,a.UpdateTime,b.ParentDir,b.ClassDir from PE_Article a,PE_Class b where a.ClassId=b.ClassId "&tiaojian
set rs=siteconn.execute(sql)

str="<table width='100%' cellpadding='0' cellspacing='0'>" '表格开始
ii=0
do while not rs.eof
ii=ii+1
if ii mod 2=0 then
listbg="listbg2"
else
listbg="listbg"
end if
m=datepart("m",rs("UpdateTime"))
if m<10 then m="0"&m
str=str&"<tr><td width='10' valign='top' class='"&listbg&"'></td><td class='"&listbg&"'><a class='listA' href='/Article"&rs("ParentDir")&rs("ClassDir")&"/"&datepart("yyyy",rs("UpdateTime"))&m&"/"&rs("ArticleId")&".html' title='"&rs("title")&"' target=""_blank"">"&gotTopic(rs("title"),lentitle)&"</a></td><td width='40' align='center' class='"&listbg&"'>"&rs("Hits")&"</td></tr>"
rs.movenext
loop
rs.close:set rs=nothing
str=str&"</table>" '表格结束
articlehot=str
end function

'################################################# 生成最新文章 ###############################################
function Articlenew(theid,rows,lentitle)
dim tiaojian,ii,m,str,thedate
set rs=siteconn.execute("select arrchildid from pe_class where classid="&theid&"")
tiaojian="and a.classid in("&rs(0)&") order by a.updatetime desc"
rs.close:set rs=nothing
sql="select top "&rows&" a.ClassId,a.ArticleId,a.Title,a.UpdateTime,b.classname,b.ParentDir,b.ClassDir from PE_Article a,PE_Class b where a.ClassId=b.ClassId "&tiaojian
set rs=siteconn.execute(sql)
ii=0
do while not rs.eof
ii=ii+1
if ii mod 2=0 then
listbg="listbg2"
else
listbg="listbg"
end if
m=datepart("m",rs("UpdateTime"))
if m<10 then m="0"&m
TheDate=ShortDate(rs("upDateTime"))
str=str&"<div class="&listbg&" style=""padding-left:10px;"">[<span class=""newclass""><a href=""/Article"&rs("ParentDir")&rs("ClassDir")&"/index.html"" title="""&rs("classname")&""">"&rs("classname")&"</a></span>]<span class=""newtitle""><a href=""/Article"&rs("ParentDir")&rs("ClassDir")&"/"&datepart("yyyy",rs("UpdateTime"))&m&"/"&rs("ArticleId")&".html"" title='"&rs("title")&"' target=""_blank"">"&gotTopic(rs("title"),lentitle)&"</a></span><span class=""thetime"">"&TheDate&"</span></div>"
rs.movenext
loop
rs.close:set rs=nothing
Articlenew=str
end function

'################################################## 生成最新推荐 ##############################################
function Good(theid,rows,lentitle)
dim tiaojian,ii,m,str
set rs=siteconn.execute("select arrchildid from pe_class where classid="&theid&"")
tiaojian="and a.ClassId in("&rs(0)&") and elite=-1 order by a.UpdateTime desc"
rs.close:set rs=nothing
sql="select top "&rows&" a.ClassId,a.ArticleId,a.Title,a.UpdateTime,b.ParentDir,b.ClassDir from PE_Article a,PE_Class b where a.ClassId=b.ClassId "&tiaojian
set rs=siteconn.execute(sql)
ii=0
do while not rs.eof
ii=ii+1
if ii mod 2=0 then
listbg="listbg2"
else
listbg="listbg"
end if
m=datepart("m",rs("UpdateTime"))
if m<10 then m="0"&m
str=str&"<div class="&listbg&" style=""padding-left:10px;""><a class='listA' href='/Article"&rs("ParentDir")&rs("ClassDir")&"/"&datepart("yyyy",rs("UpdateTime"))&m&"/"&rs("ArticleId")&".html' title='"&rs("title")&"' target=""_blank"">"&gotTopic(rs("Title"),lentitle)&"</a></div>"
rs.movenext
loop
rs.close:set rs=nothing
Good=str
end function

'################################################## 在首页生成论坛热门 #############################################
function bbshot(theid,rows,lentitle)
dim tiaojian,TheDate,boardname,str,noboard,ii
noboard="145,35,34,33,16,159,194,46,47,48" '禁止调用的版面ID
if theid="all" then
tiaojian="and a.child>10 and a.hits>10 and a.boardid not in("&noboard&") and len(a.title)>10 order by a.dateandtime desc"
else
tiaojian="and a.child>10 and a.hits>10 and a.boardid in("&theid&") and a.boardid not in("&noboard&") and len(a.title)>10 order by a.dateandtime desc"
end if
sql="select top "&rows&" a.TopicId,a.title,a.boardid,a.DateAndTime,b.boardtype from Dv_Topic a,Dv_board b where a.boardid=b.boardid "&tiaojian
set rs=bbsconn.execute(sql)

ii=0
do while not rs.eof
ii=ii+1
if ii mod 2=0 then
listbg="listbg2"
else
listbg="listbg"
end if
boardname = replace(replace(rs("boardtype"),"『 ","")," 』","")
TheDate=ShortDate(rs("DateAndTime"))
str=str&"<div class="&listbg&" style=""padding-left:10px;"">[<span class=""newclass""><a href=""bbs/list.asp?boardid="&rs("boardid")&""" title="""&boardname&""">"&boardname&"</a></span>]<span class=""newtitle""><a href=""bbs/dispbbs.asp?boardID="&rs("boardid")&"&id="&rs("topicid")&""" title="""&rs("title")&""" target=""_blank"">"&gotTopic(rs("title"),lentitle)&"</a></span><span class=""thetime"">"&TheDate&"</span></div>"
rs.movenext
loop
rs.close:set rs=nothing
bbshot=str
end function

'################################################ 生成首页最新博客 ################################################
function bokenew(rows,lentitle)
dim str,ii,thedate
sql="select top "&rows&" * from Dv_Boke_Topic where len(title)>9 order by topicid desc"
set rs=bokeconn.execute(sql)
ii=0
do while not rs.eof
ii=ii+1
if ii mod 2=0 then
listbg="listbg2"
else
listbg="listbg"
end if
TheDate=ShortDate(rs("PostTime"))
str=str&"<div class="&listbg&"><span style=""margin-left:10px;width:164px;""><a href=""/bbs/boke.asp?Userid_"&rs("userid")&".showtopic."&rs("topicid")&".html"" title="""&rs("title")&""" target=""_blank"">"&gotTopic(rs("title"),lentitle)&"</a></span><span>"&TheDate&"</span></div>"
rs.movenext
loop
rs.close:set rs=nothing
bokenew=str
end function

'##################################################### 日期格式转换函数 #########################################
function ShortDate(riqi)
if datepart("m",riqi)<10 and datepart("d",riqi)>=10 then
riqi="0"&datepart("m",riqi)&"-"&datepart("d",riqi)
elseif datepart("m",riqi)<10 and datepart("d",riqi)<10 then
riqi="0"&datepart("m",riqi)&"-0"&datepart("d",riqi)
elseif datepart("m",riqi)>=10 and datepart("d",riqi)<10 then
riqi=datepart("m",riqi)&"-0"&datepart("d",riqi)
else
riqi=datepart("m",riqi)&"-"&datepart("d",riqi)
end if
ShortDate=riqi
end function

'**************************************************
'函数名：gotTopic
'作 用：截字符串，汉字一个算两个字符，英文算一个字符
'参 数：str ----原字符串
' strlen ----截取长度
'返回值：截取后的字符串
'**************************************************
function gotTopic(str,strlen)
if str="" then
gotTopic=""
exit function
end if
dim l,t,c, i
str=replace(replace(replace(replace(str,"&nbsp;"," "),"&quot;",chr(34)),"&gt;",">"),"&lt;","<")
l=len(str)
t=0
for i=1 to l
c=Abs(Asc(Mid(str,i,1)))
if c>255 then
t=t+2
else
t=t+1
end if
if t>=strlen then
gotTopic=left(str,i)
exit for
else
gotTopic=str
end if
next
gotTopic=replace(replace(replace(replace(gotTopic," ","&nbsp;"),chr(34),"&quot;"),">","&gt;"),"<","&lt;")
end function
%>[/QUOTE]


畅所欲言
2005-12-03 14:21
静夜思
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来　自：济南的冬天
等　级：管理员
威　望：11
帖　子：8902
专家分：2567
注　册：2004-3-25
第 3 楼
收藏
 得分:0 
模板文件
indextmp.htm
<html>
<head>
<title>编程中国-中国最大的编程网站</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<style>
.main_title_575 UL {
padding: 0px; margin: 0px;
}
.main_title_575 LI {
PADDING-RIGHT: 3px; DISPLAY: inline; PADDING-LEFT: 3px; PADDING-BOTTOM: 0px; MARGIN: 0px; PADDING-TOP: 3px; LIST-STYLE-TYPE: none
}
.main_title_575 LI A {
BORDER: #ffffff 1px solid; PADDING-RIGHT: 2px; PADDING-LEFT: 3px; PADDING-BOTTOM: 0px; PADDING-TOP: 2px;
}
.main_title_575 LI A:hover {
BACKGROUND-COLOR: #ff8d25;text-decoration: none;
}
.smtitle{
border-bottom:#ff3300 1px solid;
border-left:#0069f7 4px solid;
padding-left:8px;
color:#009900;
font-weight:bold;
}
</style>
</head>
<body leftmargin=0 topmargin=0>
<noscript>
<iframe src=*></iframe>
</noscript>
<link href='/Skin/Skin5.css' rel='stylesheet' type='text/css'>
<div id=menuDiv style="Z-INDEX: 1000; VISIBILITY: hidden; WIDTH: 1px; POSITION: absolute; HEIGHT: 1px; BACKGROUND-COLOR: #9cc5f8"></div>
<!-- ********网页顶部代码开始******** -->
<table class=top_tdbgall style="WORD-BREAK: break-all" cellSpacing=0 cellPadding=0 width=760 align=center border=0>
<tr>
<!--频道显示代码-->
<td class=top_Channel align=right colSpan=2>| <A class=Channel2 href="/Index.html">网站首页</A> | <A class=Channel href="/Article/Index.html" target=_self>技术教程</A> | <A class=Channel href="/Soft/Index.html" target=_self>下载频道</A> | <A class=Channel href="/bbs/bokeindex.asp" target=_self>编程博客</A> | <A class=Channel href="/bbs/" target=_self>编程论坛</A> |&nbsp;</td>
</tr>
<!--顶部空距代码-->
<tr>
<td class=top_top colSpan=2></td>
</tr>
<tr>
<!--banner广告显示代码-->
<td align=middle><a href='http://www.bc-cn.net' title='编程中国'><img src='/images/logo.gif' width='180' height='60' border='0'></a></td>
<td align=middle><iframe height=60 width=468 marginwidth=0 marginheight=0 frameborder=0 scrolling=no src="/aaa/ad1.html"></iframe></td>
</tr>
<tr>
<td bgColor=#e7e7e7 colSpan=2 height=4></td>
</tr>
<tr>
<td bgColor=#006ad5 colSpan=2 height=3></td>
</tr>
</table>
<!--导航代码开始-->
<table class=top_Path style="WORD-BREAK: break-all" cellSpacing=0 cellPadding=0 width=760 align=center border=0>
<tr>
<td align=middle width="5%"><IMG height=11 src="/Images/arrow3.gif" width=29></td>
<td>您现在的位置：&nbsp;<a href='http://www.bc-cn.net'>编程中国</a>&nbsp;>>&nbsp;网站首页 </td>
</tr>
</table>
<!--导航代码结束-->
<!-- ********网页顶部代码结束******** -->
<!-- ********网页中部代码开始******** -->
<table class=center_tdbgall cellSpacing=0 cellPadding=0 width=760 align=center border=0>
<tr>
<td vAlign=top rowspan="2" width=180><!--用户登录代码开始-->
<table cellSpacing=0 cellPadding=0 width="100%" background=skin/blue/login_02.gif border=0>
<!--热门文章代码开始-->
<tr>
<td class=main_title_575 align=middle><A class=class href="/Article/ShowHot.asp"><B>热 门 文 章</B></A></td>
</tr>
<tr>
<td class=left_tdbg1 vAlign=top>
{$articlehot}
</td>
</tr>
<tr>
<td class=left_tdbg2></td>
</tr>
<!--热门文章代码结束-->
<tr>
<td class=left_title align=middle colSpan=2>站 内 搜 索</td>
</tr>
<tr>
<td class=left_tdbg1 align=middle colSpan=2><FORM name=search action=/Article/search.asp method=post>
<Input id=Keyword maxLength=50 size=16 value=关键字 name=Keyword>
<Input id=Submit type=submit value=搜索 name=Submit>
<BR>
<Input style="BORDER-RIGHT: 0px; BORDER-TOP: 0px; BORDER-LEFT: 0px; BORDER-BOTTOM: 0px" type=radio CHECKED value=Article name=Channel>
文章
<Input style="BORDER-RIGHT: 0px; BORDER-TOP: 0px; BORDER-LEFT: 0px; BORDER-BOTTOM: 0px" type=radio value=Soft name=Channel>
下载<BR>
<Input style="BORDER-RIGHT: 0px; BORDER-TOP: 0px; BORDER-LEFT: 0px; BORDER-BOTTOM: 0px" type=radio value=Photo name=Channel>
图片
<Input style="BORDER-RIGHT: 0px; BORDER-TOP: 0px; BORDER-LEFT: 0px; BORDER-BOTTOM: 0px" type=radio value=bbs name=Channel>
论坛<BR>
<Input id=Field3 type=hidden value=Title name=Field>
</FORM></td>
</tr>
<tr>
<td class=left_tdbg2 colSpan=2></td>
</tr>
<!--站内搜索代码结束-->
</table></td>
<td width=4></td>
<td vAlign=top width=354><!--本站最新文章代码开始-->
<table cellSpacing=0 cellPadding=0 width="100%" border=0>
<tr>
<td class=main_title_575><A class=class href="/bbs/index.asp"><B>论坛热门主题</B></A></td>
</tr>
<tr>
<td class=main_tdbg_575 vAlign=top height=176>{$bbshot}</td>
</tr>
</table>
<!--本站最新文章代码结束--></td>
<td width=5></td>
<td vAlign=top width=216><!--特别推荐代码开始-->
<table style="WORD-BREAK: break-all" cellSpacing=0 cellPadding=0 width="100%" border=0>
<tr>
<td class=main_title_575><A class=class href="/bbs/BokeIndex.asp"><B>最新博客</B></A></td>
</tr>
<tr>
<td class=main_tdbg_575 vAlign=top height=176>{$bokenew}</td>
</tr>
</table>
<!--特别推荐代码结束--></td>
<td width=1></td>
</tr>
<tr>
<td colspan="4" style="padding:0px 0px 4px 2px;"><iframe height=80 width=575 marginwidth=0 marginheight=0 frameborder=0 scrolling=no src="/aaa/ad2.html"></iframe></td>
</tr>
</table>
<!--开发语言频道代码开始-->
<table class=center_tdbgall cellSpacing=0 cellPadding=0 width=760 align=center border=0>
<tr>
<td class=left_tdbgall vAlign=top width=759><table cellSpacing=0 cellPadding=0 width=100% border=0>
<tr>
<td colspan=5 class=main_title_575><ul>
<A class=class href="/Article/kfyy/Index.html"><B>开发语言频道</B></A>
<li><a href=/Article/kfyy/cyy/Index.html style="COLOR: #fff">C语言专题</a></li>
<li><a href=/Article/kfyy/vb/Index.html style="COLOR: #fff">VB专题</a></li>
<li><a href=/Article/kfyy/cjj/Index.html style="COLOR: #fff">C++专题</a></li>
<li><a href=/Article/kfyy/java/Index.html style="COLOR: #fff">JAVA专题</a></li>
<li><a href=/Article/kfyy/delphi/Index.html style="COLOR: #fff">Delphi专题</a></li>
<li><a href=/Article/kfyy/hb/Index.html style="COLOR: #fff">汇编专题</a></li>
</ul></td>
</tr>
<tr>
<td class=main_tdbg_575 vAlign=top width=173><div class=smtitle>开发语言热门文章</div>
{$kfyyhot}</td>
<td width=4></td>
<td class=main_tdbg_575 vAlign=top width=363><div class=smtitle>开发语言论坛热门主题</div>
{$kfyyArticlenew}</td>
<td width=5></td>
<td class=main_tdbg_575 vAlign=top width=215><div class=smtitle>开发语言推荐文章</div>
{$kfyyGood}</td>
</tr>
</table></td>
<td width=1></td>
</tr>
<tr>
<td class=main_shadow></td>
</tr>
</table>
<!--开发语言频道代码结束-->
<!--开发专题频道代码开始--><!--开发专题频道代码结束-->
<!--WEB开发频道代码开始-->
<table class=center_tdbgall cellSpacing=0 cellPadding=0 width=760 align=center border=0>
<tr>
<td class=left_tdbgall vAlign=top width=759><table cellSpacing=0 cellPadding=0 width=100% border=0>
<tr>
<td colspan=5 class=main_title_575><ul>
<A class=class href="/Article/web/Index.html"><B>WEB开发频道</B></A>
<li><a href=/Article/web/asp/Index.html style="COLOR: #fff">ASP专题</a></li>
<li><a href=/Article/web/jsp/Index.html style="COLOR: #fff">JSP专题</a></li>
<li><a href=/Article/web/php/Index.html style="COLOR: #fff">PHP专题</a></li>
<li><a href=/Article/web/javascript/Index.html style="COLOR: #fff">JavaScript专题</a></li>
<li><a href=/Article/web/xml/Index.html style="COLOR: #fff">XML专题</a></li>
</ul></td>
</tr>
<tr>
<td class=main_tdbg_575 vAlign=top width=173><div class=smtitle>WEB开发热门文章</div>
{$webhot}</td>
<td width=4></td>
<td class=main_tdbg_575 vAlign=top width=363><div class=smtitle>WEB开发论坛热门主题</div>
{$webArticlenew}</td>
<td width=5></td>
<td class=main_tdbg_575 vAlign=top width=215><div class=smtitle>WEB开发推荐文章</div>
{$webGood}</td>
</tr>
</table></td>
<td width=1></td>
</tr>
<tr>
<td class=main_shadow></td>
</tr>
</table>
<!--WEB开发频道代码结束-->
<!--.NET框架代码开始-->
<table class=center_tdbgall cellSpacing=0 cellPadding=0 width=760 align=center border=0>
<tr>
<td class=left_tdbgall vAlign=top width=759><table cellSpacing=0 cellPadding=0 width=100% border=0>
<tr>
<td colspan=5 class=main_title_575><ul>
<A class=class href="/Article/net/Index.html"><B>.NET框架频道</B></A>
<li><a href=/Article/net/aspx/Index.html style="COLOR: #fff">ASP.NET专题</a></li>
<li><a href=/Article/net/cs/Index.html style="COLOR: #fff">C#专题</a></li>
<li><a href=/Article/net/vbnet/Index.html style="COLOR: #fff">VB.NET专题</a></li>
<li><a href=/Article/net/vcnet/Index.html style="COLOR: #fff">VC.NET专题</a></li>
<li><a href=/Article/net/j/Index.html style="COLOR: #fff">J#.NET专题</a></li>
<li><a href=/Article/net/jscriptnet/Index.html style="COLOR: #fff">Jscript.NET专题</a></li>
</ul></td>
</tr>
<tr>
<td class=main_tdbg_575 vAlign=top width=173><div class=smtitle>.NET框架热门文章</div>
{$nethot}</td>
<td width=4></td>
<td class=main_tdbg_575 vAlign=top width=363><div class=smtitle>.NET框架论坛热门主题</div>
{$netArticlenew}</td>
<td width=5></td>
<td class=main_tdbg_575 vAlign=top width=215><div class=smtitle>.NET框架推荐文章</div>
{$netGood}</td>
</tr>
</table></td>
<td width=1></td>
</tr>
<tr>
<td class=main_shadow></td>
</tr>
</table>
<!--.NET框架代码结束-->
<!--数据库代码开始-->
<table class=center_tdbgall cellSpacing=0 cellPadding=0 width=760 align=center border=0>
<tr>
<td class=left_tdbgall vAlign=top width=759><table cellSpacing=0 cellPadding=0 width=100% border=0>
<tr>
<td colspan=5 class=main_title_575><ul>
<A class=class href="/Article/net/Index.html"><B>数据库频道</B></A>
<li><a href=/Article/sjk/access/Index.html style="COLOR: #fff">ACCESS专题</a></li>
<li><a href=/Article/sjk/vfp/Index.html style="COLOR: #fff">VFP专题</a></li>
<li><a href=/Article/sjk/sqlserver/Index.html style="COLOR: #fff">SQL Server专题</a></li>
<li><a href=/Article/sjk/mysql/Index.html style="COLOR: #fff">MySQL专题</a></li>
<li><a href=/Article/sjk/oracle/Index.html style="COLOR: #fff">Oracle专题</a></li>
<li><a href=/Article/sjk/pb/Index.html style="COLOR: #fff">PowerBuilder专题</a></li>
</ul></td>
</tr>
<tr>
<td class=main_tdbg_575 vAlign=top width=178><div class=smtitle>数据库热门文章</div>
{$sjkhot}</td>
<td width=4></td>
<td class=main_tdbg_575 vAlign=top width=363><div class=smtitle>数据库论坛热门主题</div>
{$sjkArticlenew}</td>
<td width=5></td>
<td class=main_tdbg_575 vAlign=top width=215><div class=smtitle>数据库推荐文章</div>
{$sjkGood}</td>
</tr>
</table></td>
<td width=1></td>
</tr>
<tr>
<td class=main_shadow></td>
</tr>
</table>
<!--数据库代码结束-->
<table class=center_tdbgall cellSpacing=0 cellPadding=0 width=760 align=center border=0>
<tr>
<td align=middle></td>
</tr>
<tr>
<td class=main_shadow></td>
</tr>
</table>
<!--横向友情链接代码开始-->
<!--横向友情链接代码结束-->
<!-- ********网页中部代码结束******** -->
<!-- ********网页底部代码开始******** -->
<table class=Bottom_tdbgall style="WORD-BREAK: break-all" cellSpacing=0 cellPadding=0 width=760 align=center border=0>
<tr align=middle>
<td class=Bottom_Adminlogo colSpan=2>| &nbsp;<A class=Bottom href="/$">设为首页</A>&nbsp; | &nbsp;<A class=Bottom href="">加入收藏</A>&nbsp; | &nbsp;<A class=Bottom href="mailto:web@bc-cn.net">联系站长</A>&nbsp; | &nbsp;<A class=Bottom href="/Copyright.asp" target=_blank>版权申明</A>&nbsp; | &nbsp;<A class=Bottom href="/Admin/Admin_Index.asp" target=_blank>管理登录</A>&nbsp;|</td>
</tr>
<tr class=Bottom_Copyright>
<td align=middle width="100%">Copyright &copy;2002 - 2005 编程中国<br>
<br>
<A href="http://www.miibeian.gov.cn/" target=_blank>鲁ICP备05001121</A></td>
</tr>
</table>
<!-- ********网页底部代码结束******** -->
<!-- ********首页双边对联广告******** -->
</body>
</html>

[此贴子已经被作者于2005-12-3 14:28:00编辑过]


畅所欲言
2005-12-03 14:24
caiyakang
Rank: 2
等　级：新手上路
威　望：5
帖　子：2111
专家分：0
注　册：2005-3-24
第 4 楼
收藏
 得分:0 
帮老大顶一下！！

中国人的财富网:http://www..cn/
2005-12-03 14:48
hxfly
Rank: 5Rank: 5
等　级：贵宾
威　望：17
帖　子：5810
专家分：118
注　册：2005-4-7
第 5 楼
收藏
 得分:0 
不是高手
但是想笑

呵呵
开个玩笑

老大,换个ID吧,你用这个ID发大众帖子,影响了你在我新中的高大形象了!~

[此贴子已经被作者于2005-12-3 15:06:24编辑过]


2005-12-03 15:03
静夜思
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来　自：济南的冬天
等　级：管理员
威　望：11
帖　子：8902
专家分：2567
注　册：2004-3-25
第 6 楼
收藏
 得分:0 
以下是引用hxfly在2005-12-3 15:03:00的发言：
开个玩笑

老大,换个ID吧,你用这个ID发大众帖子,影响了你在我新中的高大形象了!~


是不是写的很烂


畅所欲言
2005-12-03 15:14
hxfly
Rank: 5Rank: 5
等　级：贵宾
威　望：17
帖　子：5810
专家分：118
注　册：2005-4-7
第 7 楼
收藏
 得分:0 
不是

是看你用这个至高无上的ID发表平民的东西
一下没有了那种崇拜的感觉!~

2005-12-03 15:24
静夜思
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来　自：济南的冬天
等　级：管理员
威　望：11
帖　子：8902
专家分：2567
注　册：2004-3-25
第 8 楼
收藏
 得分:0 
很多论坛管理员除了发通告不发普通帖子的，可我也得学ASP

畅所欲言
2005-12-03 15:36
hxfly
Rank: 5Rank: 5
等　级：贵宾
威　望：17
帖　子：5810
专家分：118
注　册：2005-4-7
第 9 楼
收藏
 得分:0 
换个ID

纯属建议
呵呵

2005-12-03 15:41
盖茨他爹
Rank: 6Rank: 6
等　级：贵宾
威　望：28
帖　子：5255
专家分：0
注　册：2005-5-3
第 10 楼
收藏
 得分:0 
对，管理员就应该神秘一点，这样才会让人着迷。
2005-12-03 15:43
快速回复：[开源]我写的几段生成网站首页的代码，让高手见笑了
数据加载中...
 
　　　



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有，并保留所有权利。
Powered by Discuz, Processed in 0.013809 second(s), 7 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved