[落伍原创] 个人站长制做网页常用代码征集帖 [复制链接]
查看:3249771 | 回复:113

拒绝游泳的鱼 · 发表于 2005-9-29 22:15:18

请大家提供自己制作网页过程中感觉最实用的代码(并不强调原创,发表时请使用[code]并且禁用表情和URL识别),可获得一定加分,请勿灌水.

请大家注意是简短的代码,无论是HTML或者是JAVASCRIPT,不是整站或者整套程序.sluke提供就比较OK

sluke · 发表于 2005-9-29 22:17:45

广告位

<?php
$str = file("http://tq.tom.com/china/index.html");
$count = count($str);
for ($i=0;$i<$count;$i++){
$file .= $str[$i];
}
$tomtq = explode("<table width="774" border="0" cellspacing="1" cellpadding="1" bgcolor="#ABABAB">",$file);
$tomtq = explode("</table>",$tomtq[1]);
$tomtq= $tomtq[0];
//$tomtq tom天气小偷
?>

复制代码

[ 本帖最后由 sluke 于 2005-9-29 22:22 编辑 ]

Gil · 发表于 2005-9-29 22:30:21

我用的是惊云
我想落伍基本人人都知道惊云的代码了吧

ZEROCOOL · 发表于 2005-9-29 22:31:41

DEDE,帝国,MAMBO,都不错

帝国最BT,免费要加一个东东..呵呵

DEDE目前没出现大的问题

MAMBO对服务器要求比较高,当初一个10W左右数据的站,被蜘蛛一怕机器就挂,只适合小型站点

[ 本帖最后由 ZEROCOOL 于 2005-9-29 22:32 编辑 ]

§雨雨‰拾荒§ · 发表于 2005-9-29 22:32:39

<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>天气预报</title>
<style type="text/css">
<!--
td {
font-size: 12px;
}
-->
</style>
<script language="JavaScript" type="text/JavaScript">
<!--
var openW;
function openWindow(theURL,winName,features) { //v2.0
//openW=window.open(theURL,winName,features);
//var mxh2 = window.open("about:blank","window_mxh")
//var mxh2 =window.open(theURL,winName,features);
window.showModalDialog(theURL,test(),'dialogHeight:270px;dialogWidth:265px;scroll:no;status:no')
}
function test(){
location.href="index.htm";
}
//-->
</script>
<script language="javascript" id="objscript"></script>
<script language="JavaScript" type="text/JavaScript" src="http://www.116.com.cn/116/home/weather/public.js"></script>
<script language="JavaScript" type="text/JavaScript" src="http://www.116.com.cn/116/home/weather/weather.js"></script>
<script language="JavaScript" type="text/JavaScript" src="http://jsp.116.com.cn/notice/iptocityid.jsp"></script>
<script language="JavaScript">
var locid;
var cityname;
var defid;
if(getCookie("defid")=='')
{
locid=CityID;
setCookie("defid",CityID);
}else
{
locid=getCookie("defid");
}
var havecheck;
if(getCookie("check")==''){
havecheck='2';
}else{
havecheck=getCookie("check");
}
var show;
if(havecheck=='0'){
locid=getCookie("CityID");
show=0;
}else {
locid=getCookie("defid");
show=1;
}
var urlstr = "http://jsp.116.com.cn/weather/"+locid+".js";
document.all["objscript"].src = urlstr;
//var oWea = new makeWeatherObj();
</script>
<body topmargin="0" leftmargin="0" style="background-color=transparent">
<SCRIPT language="javascript">
var oWea = new makeWeatherObj();
</script>
<div align="center">
<table width="180" height="52" border="0" cellpadding="0" cellspacing="0">
<tr>
<td align="center" valign="middle"><table width="139" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="53" rowspan="2" align="center"><SCRIPT language="javascript">
var weather24=oWea.swWeather24.split("-");
document.write("<img src=http://www.116.com.cn/116/home/weather/images/icons/"+transTab(weather24[0])+"_small.gif border='0'>");
if(weather24.length==2) document.write("<img src=http://www.116.com.cn/116/home/weather/images/icons/"+transTab(weather24[1])+"_small.gif border='0'>");
</script></td>
<td width="86" align="center"><font color="#ff6600">
<SCRIPT language="javascript">
document.write(oWea.swName);
</script>
</font></td>
</tr>
<tr>
<td align="center"><SCRIPT language="javascript">
var wendu=oWea.swWendu24.split("-");
document.write("<span class='f12blue2'>"+wendu[0]+"</span>");
</script></td>
</tr>
</table></td>
</tr>
</table>
</div>

复制代码

好象是根据IP来断定的

水龙头 · 发表于 2005-9-29 22:34:34

同一空间多绑一个域名

<%
CheckDomain
Sub CheckDomain()
dim sDomain
sDomain = Request.ServerVariables("HTTP_HOST")
If Instr(sDomain,"a.xxx.com")>0 then Response.Redirect "a/"
End Sub
%>

复制代码

同一空间多绑二个域名

<%
CheckDomain
Sub CheckDomain()
dim sDomain
sDomain = Request.ServerVariables("HTTP_HOST")
If Instr(sDomain,"a.xxx.com")>0 then
Response.Redirect "a/"
Elseif Instr(sDomain,"b.xxx.com")>0 then
Response.Redirect "b/"
End If
End Sub
%>

复制代码

同一空间多绑三个域名

<%
CheckDomain
Sub CheckDomain()
dim sDomain
sDomain = Request.ServerVariables("HTTP_HOST")
If Instr(sDomain,"a.xxx.com")>0 then
Response.Redirect "a/"
Elseif Instr(sDomain,"b.xxx.com")>0 then
Response.Redirect "b/"
Elseif Instr(sDomain,"c.xxx.com")>0 then
Response.Redirect "c/"
End If
End Sub
%>

复制代码

胖花 · 发表于 2005-9-29 22:45:09

网页固定位置浮动图片/广告代码

以下是我站里面所加的代码，截取出来，请自行修改
＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝

<SCRIPT FOR=window EVENT=onload LANGUAGE="javascript">
initAd();//载入页面后，调用函数initAd()
</SCRIPT>
<script language="javascript">
<!--
function initAd() {
document.all.AdLayer.style.posTop = -200;
//设置onLoad事件激发以后，广告层相对于固定后的y方向位置
document.all.AdLayer.style.visibility = 'visible'//设置层为可见
MoveLayer('AdLayer');//调用函数MoveLayer()
}
function MoveLayer(layerName) {
var x = 0;//浮动广告层固定于浏览器的x方向位置
var y = 360;//浮动广告层固定于浏览器的y方向位置
var diff = (document.body.scrollTop + y - document.all.AdLayer.style.posTop)*.40;
var y = document.body.scrollTop + y - diff;
eval("document.all." + layerName + ".style.posTop = y");
eval("document.all." + layerName + ".style.posright = x");//移动广告层
setTimeout("MoveLayer('AdLayer');", 0);//设置20毫秒后再调用函数MoveLayer()
}
//-->
</script>
<!--下面为一个ID为AdLayer的层(如ID名不为AdLayer，
上面MoveLayer()内的AdLayer也要作相应修改)，包括一张带链接的图片-->
<div id=AdLayer style='position:absolute; width:61px; height:59px; z-index:20; visibility:hidden;; right: 10px; top: 100px'>
<a href="addxinxi.asp"><img border="0" src="images/fb.jpg" width="100" height="40"></a></div>

复制代码

[ 本帖最后由胖花于 2005-9-29 22:51 编辑 ]

爱乐之人 · 发表于 2005-9-29 22:45:09

俺不会写..学了，在这里补充！

jiangyao · 发表于 2005-9-29 22:46:16

再占
到时候编辑

玩到老 · 发表于 2005-9-29 22:59:53

我也是！
等待编辑

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

[落伍原创] 个人站长制做网页常用代码征集帖 [复制链接]
查看:3249771 | 回复:113

天气预报 code来的

浏览过的版块

QQ绑定

落伍手机绑定

落伍美化

[落伍原创] 个人站长制做网页常用代码征集帖 [复制链接] 查看:3249771 | 回复:113

天气预报 code来的

浏览过的版块

QQ绑定

落伍手机绑定

落伍美化

[落伍原创] 个人站长制做网页常用代码征集帖 [复制链接]
查看:3249771 | 回复:113