|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
想法是和程序员的想法不一样的.至于为什么.大家去想一想.跟心理学有关的三)把旧事代码拔出你的页面
最好的旧事公布,固然是为网站自己定做的,那样才干与主页作风分歧,但云云一来,旧事公布体系出缺乏了通用性了,不克不及移值到其余网站上利用,有得必有掉,在这个基本上关头是找一个平行点。综合来考滤,最好的做法是与页面分别,那样就能够不影响网页的表面,而也能到达很好的效果,在利用旧事的网页上我们能够经由过程安排一条如许的script语句来挪用旧事代码
《scriptlanguage="javascript"
src="http//xxx.com.cn/special/linux/lnews/autoup.asp"》
人人能够到这里看看效果
如今请人人看看autoup.asp的代码。
《%@language="vbscript"%》
《!--#includeVirtual="/news/data/data.inc"--》
《%
Setrs=Server.CreateObject("ADODB.Recordset")
sql="select*fromdataOrderbynews_idDesc"
rs.opensql,conn,3,2
ifrs.bofthen
response.end
endif
dispmess="《tableborder=0width=100%cellpadding=0》"
rs.movefirst
disp=""
count=0
disp="《tr》《tdwidth=100%》《b》广州市场《/b》《/td》《/tr》"
dowhilenotrs.eof
广州市场
ifCint(rs("news_class"))=3then
disp=disp&"《tr》《tdwidth=100%》《a
href=http://www.aaaaa.com.cn/news/read.asp?news_id="&rs("news_id")&"
target=_blank》>>"&rs("news_title")&"《/a》(《fontsize=1》"&rs
("news_year")&"-"&rs("news_month")&"-"&rs("news_day")&""&rs
("news_time")&"《/font》)《/td》《/tr》"
ifcount》=10thenclng(application("disp_1"))-1then
exitdo
endif
count=count+1
endif
rs.movenext
loop
disp=disp&"《tr》《tdwidth=100%align=right》【更多旧事...】
《/td》《/tr》"
dispmess=dispmess&disp
rs.movefirst
disp=""
count=0
disp="《tr》《tdwidth=100%》《b》市场风云《/b》《/td》《/tr》"
dowhilenotrs.eof
市场风云
ifCint(rs("news_class"))=1then
disp=disp&"《tr》《tdwidth=100%》《a
href=http://www.aaaaa.com.cn/news/read.asp?news_id="&rs("news_id")&"
target=_blank》>>"&rs("news_title")&"《/a》(《fontsize=1》"&rs
("news_year")&"-"&rs("news_month")&"-"&rs("news_day")&""&rs
("news_time")&"《/font》)《/td》《/tr》"
ifcount》=10thenclng(application("disp_2"))-1then
exitdo
endif
count=count+1
endif
rs.movenext
loop
disp=disp&"《tr》《tdwidth=100%align=right》【更多旧事...】
《/td》《/tr》"
dispmess=dispmess&disp
rs.movefirst
disp=""
count=0
disp="《tr》《tdwidth=100%》《b》IT旧事《/b》《/td》《/tr》"
dowhilenotrs.eof
IT旧事
ifCint(rs("news_class"))=2then
disp=disp&"《tr》《tdwidth=100%》《a
href=http://www.aaaaa.com.cn/news/read.asp?news_id="&rs("news_id")&"
target=_blank》>>"&rs("news_title")&"《/a》(《fontsize=1》"&rs
("news_year")&"-"&rs("news_month")&"-"&rs("news_day")&""&rs
("news_time")&"《/font》)《/td》《/tr》"
ifcount》=50thenclng(application("disp_3"))-1then
exitdo
endif
count=count+1
endif
rs.movenext
loop
disp=disp&"《tr》《tdwidth=100%align=right》【更多旧事...】
《/td》《/tr》"
dispmess=dispmess&disp
dispmess=dispmess&"《/table》"
dispmess="document.write("&dispmess&")"
%》
《%=dispmess%》国内有些大的CRM厂商的ASP就写得不错.无论是概念还是它里面用JAVASCRIPT的能力.并不是说现在的程序员用了ASP.NET来写程序就可以说自己高档了 |
|