存档
结婚后，才发现什么都需要钱。人活着好累啊。
以前在公司1200的工资，说什么也不能再干了。结完婚后跳槽到了临沂万网（临沂城建时代广场14楼），工资到了1600。也许外地的朋友说太少，在临沂这个工资已经算是比较高了。我没有抱怨工作，不是抱怨工资太少的意思。而是确实不够花了。
5月初，搬到了南坊郊区买的房子里(家里给买的)，安上了网线，说什么也不能闲着了，哪怕赚点吃饭钱也好。以前爱学校的时候做个威客，用了半个小时，找了两个还算不错的担子，加起来3100，我知道自己做不完，吧第二个单子(1600)也别人合作，每人800。
接到单子以后基本上天天两点以后睡觉。第一个担子预计15号完工，没想到如此工作量如此之大，好在现在总算完了。第二个单子也接不成了。1500+1600，这个月的工资勉强能拿到3100左右，加上我几个垃圾站的广告收入3300左右。挣这点钱，天天睡不到5个小时。
本来预计收入3300的，今天杨蕾打来电话给我介绍了个客户，做企业网站，他弟弟的，说不赚钱也不现实，意思性的收了300。这样这个月收入勉强超过3600，想想真不容易啊。
花销也是蛮大的，空间域名费用算100，车油钱300，午饭300，话费100（我和夫人）。再加上其他开支什么的，这些钱也剩不了多少，一想这些，真是感觉人生没有了希望。不过我是比较幸运了，最起码车房家里给买好了。
发发牢骚，工作去了。下个月少做些，做几个小单。好好整整我的那些网站，今天看dh.wjgww.com的流量，竟然不到10个了。启源，加油。
好久没用asp写程序了，最近工作需要，想起了以前写的一个分页函数。不过时间太久远了，找不到了。今天我抽空在写个吧，方便以后工作中使用。
直接写成函数的形式，如果输出生成好的页码，然后又程序输出或保存到文件中。
前十页为一批，第十页显示1,2,3…10；第十一页页码就变成了11,12…20
这种模式很多CMS都用到，比如5UCMS。函数名留点版权信息吧,cs=CatSeven
< %
function csPage(id,all,url1,url2)
if id<>1 then tmp="<a href="""&url1&"1"&url2&""">首页</a> <a href="""&url1&id-1&url2&""">上一页</a>"
istart=((id-1)\10)*10+1
if(all-id)>9 then
iend=((id-1)\10)*10+10
else
iend=all
end if
for i=istart to iend
if i=id then
tmp=tmp&"<span>"&i&"</span> "
else
tmp=tmp&"<a href="""&url1&i&url2&""">"&i&"</a> "
end if
next
if id<>all then tmp=tmp&"<a href="""&url1&id+1&url2&""">下一页</a> <a href="""&url1&all&url2&""">尾页</a>"
csPage=tmp
end function
‘DEBUG
for j=1 to 40
response.write "#Page"&j&":"&csPage(j,40,"#TEST_","_View")&"<br />"
next
%>
生成效果如下：
#Page1:1 2 3 4 5 6 7 8 9 10 下一页 尾页
#Page2:首页 上一页 1 2 3 4 5 6 7 8 9 10 下一页 [...]
巧用流量统计查看推介广告投放效果。
最近我做了一个免费网赚的小站，专门教大家如果进行网赚。怎样赚点零花钱呢，当然是推介广告。小站地址为：爱思路路发(爱思考，路路发，免费网赚教大家:http://www.is668.cn )
广告到此为止。既然说到推介广告，统计起来不是很方便。比如看从那个页面点击的，点至了多少次（联盟里一般只能统计到有多少下线。），到底效果怎么样呢？我想个大老鸟可能也像我一样心中没谱吧。今天趁周末的时间，我就找到了一个解决办法。非常简单，可以统计的点击次数，点击页面。。。。而且不用使用任何耗资源的统计分析程序。
< %
‘用alimama_{来路地址}
uid=split(trim(request.querystring),"_")(0)
‘如果广告多可以查询数据库
select case uid
case "alimama"
url="http://www.alimama.com/membersvc/rd.do?w=p_10763360&p=&f=http://www.alimama.com/membersvc/promotion/tjyj.htm"
case else
url="http://www.is668.cn"
end select
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<title>正在跳转到注册页面</title>
<meta name="robots" content="noarchive">
<script type="text/javascript">
window.onload=function(){
location.href="< %=url%>";
}
</script>
</meta></head>
<body>
正在跳转到注册页面，请稍后。。。
<div style="display:none">
<script src="http://s106.cnzz.com/stat.php?id=1408214&web_id=1408214&show=pic" language="JavaScript" charset="gb2312"></script>
</div>
</body>
</html>
使用的时候就简单了。直接连接方法：
http://www.is668.cn/redirect.asp?alimama_http://www.miaoqiyuan.cn
这样在统计中搜索访问文件名redirect.asp，就知道点击次数了
另一种比较灵活的方法就是
<script type="text/javascript">
function writeads(adkey,t){
document.writeln(’<a href="http://www.is668.cn/redirect.asp?alimama_’+location.href+’">’+t+’</a>’);
}
writeads(’alimama’,'点击注册阿里妈妈账号’);
</script>
网胜是一个非常强大的b2b 系统，但是添加广告很麻烦，我写了一个批量添加广告的工具。把该工具防止到database目录，用http访问即可。WebsenElecommerce.asp为accsee数据库 名。
< %
set conn=server.createobject("adodb.connection")
conn.open "provider=microsoft.jet.oledb.4.0;data source="&server.mappath("WebsenElecommerce.asp")
‘index[1-10]
‘trade[1-6]
’seller[1-6]
‘com[1-6]
‘prduct[1-6]
‘expr[1-6]
‘job[1-6]
‘men[1-2]
sub pagead(pagen,pagename)
addad pagen&"_1",110,80,"/Uploadfile/AD/58947179.gif",pagename
addad pagen&"_2",110,80,"/Uploadfile/AD/58501753.gif",pagename
addad pagen&"_3",110,80,"/Uploadfile/AD/58560214.gif",pagename
addad pagen&"_4",110,80,"/Uploadfile/AD/58630553.gif",pagename
addad pagen&"_5",654,90,"/Uploadfile/AD/4422441.gif",pagename
addad pagen&"_6",285,90,"/Uploadfile/AD/58293163.jpg",pagename
end sub
sub addad(adid,adwidth,adheight,imgurl,pagename)
runsql "insert into Websen_ad(adid,adType,adsrc,adwidth,adheight,adlink,adalt,adstopdate,Which_mod,which_page,addate) values(‘"&adid&"’,1,’"&imgurl&"’,"&adwidth&","&adheight&",’http://www.lyjzjx.com’,'建筑工程机械网’,'"&date()+365&"’,1,’"&pagename&"’,365)"
end sub
sub runsql(sql)
conn.execute(sql)
end sub
pagead "trade","我要采购"
pagead "seller","我要销售"
pagead "com","公司库"
pagead "prduct","产品库"
pagead "expr","展会服务"
‘pagead "job","人才招聘"
‘pagead "men","商业资讯"
response.write "批量添加广告成功"
%>