Mar 27

谢谢好心人邀请了我,有兴趣的留下你的email或者百度帐号,大家一起来体验吧~

Mar 26

你可能每天都在用Gmail,但可能你每天使用的只是简单的收发邮件,或者内嵌的Gtalk聊天,再或者有时使用一下搜索功能。除了可以用插件实现一些原本没有的功能外,Gmail本身也有部分功能你可能没有发掘,或很少使用,不能说是Gmail的秘密,只能说是你可能不知道的关于Gmail的8件事。这些功能有的是有趣的,有的是很有用的。
1、Https加密方式登录

没错,Gmail是支持Https方式加密浏览的,在登录时使用https://mail.google.com进行登录或在登录后手动在地址栏的http后面加s亦可。

不管怎么说,使用https方式总让人更有安全感。当直接登录失败时,不妨加s重试(因为可能有时候由于某些“和谐”原因,所有含有google的url都被重置)。

2、Gmail支持Atom输出

Gmail是支持Feed输出的,输出的内容为邮件摘要。你可以使用订阅器对这个feed进行订阅,这样你就可以在阅读器里查看是否有新邮件了。

Gmail的Feed输出地址是https://帐号:密码@mail.google.com/mail/feed/atom

建议不要使用在线订阅器进行订阅,最好使用本地订阅器订阅(Google工具栏亦可),以防密码被盗。

3、Gmail搜索支持通用搜索符

Gmail是搜索除了能使用类似”in:inbox”的搜索范围语句之外,”+”(加号),”-”(减号),”|”(或号),”"”"(引号),也是可以使用的,和普通的网页搜索基本一样。

4、将Gmail当作语音信箱

如果你同时是个Gtalk使用者,你可以在软件版Gtalk上和某个离线的联系人进行语音,你所说的内容会被保存在对方的Gmail里。

5、快捷键

可能Google Reader里快捷键使用的频率较高,Gmail里没有多少人使用快捷键。但事实上Gmail也是支持快捷键的,但先要到设置里启用。具体的快捷键列表可参看这里,和GR里一样,如果你忘记了某个快捷键可键入“?”(Ctrl+/)。

6、Gmail被盗申诉

QQ被盗后可以到腾讯申诉取回,同样Gmail也有相似的服务。当你发现Gmail或Google帐户被盗后,可以打开https://services.google.com/inquiry/gmail_security1,选择相应的项目后你会被要求提供关于你Gmail的信息,包括最常联系的人的邮箱、你所创建的标签名称、邀请人邮箱(如果你是被邀请注册的)、最后登录日期、Gmail申请日期等等。

所以平时注意记录下相关的信息,以免被盗时无计可施。

7、在邮箱名任意位置加点

以前我无意中很火星地发现了原来Gmail会将“.”忽略,也就是说,someone@gmail.com以及som..eo.n…..e@gmail.com是一样的邮箱,Gmail在处理时会将所有的点忽略。

8、邮箱末尾加“+任何内容”

和在任意位置加点有点相似,你可以在邮箱末尾加上一个加号,后面再加上一些字符,比如someone+tianya@gmail.com,Gmail同样会将邮件发到someone@gmail.com

后面这两个功能有什么用呢?是便于搜索和创建过滤规则的。Gmail有一项非常优异的功能是创建高级过滤规则,除了可以从发件人地址进行过滤外,还可以从收件人地址进行过滤。

比如我在天涯论坛注册的邮箱是someone+tianya@gmail.com,那么我可以设置这样一个过滤规则:凡是收件人为someone+tianya@gmail.com的邮件都标记为“天涯”。这样所有来自天涯论坛的邮件都会自动加上“天涯”标签。

在搜索是也可以搜索收件人地址来找到所有来自“天涯论坛”的邮件。

原文在这里

Mar 14

1,看看自己具有哪个大明星的脸型 http://www.play-analogia.com/cgi-bin/index/

2,超有意思的Flash网站,虚拟办公 http://agencynet.com

3,亲自动手给美女画纹身 http://www.crustydemons.co.uk/UK/tattoo_parlour/index.html

4,输入文字就发出声音! http://www.putonghuaonline.com
只支持繁体中文,同时也是学习普通话和粤语的好地方

5,在线做个通缉令 http://www.glassgiant.com/wanted/

6,制作属于自己的卡通大头像吧 http://cartoon.msn.com.cn

7,在你的照片上添加有趣对话 http://www.bubblesnaps.com

8,这个网站提供各种有趣的在线拼图 http://www.thebroth.com

9,很逼真!模仿XP系统操作的网站 http://www.kingnare.com

10,原来制作带阴影的LOGO如此容易 http://msig.info/web2.php

11,教你打领带 http://www.tieknot.com/dalingdai.html

12,系鞋带的N种方法 http://www.fieggen.com/shoelace/lacingmethods.htm#2trillion

13,咱也弄个自己的徽章玩玩 http://www.says-it.com/seal/index.php

14,在线素描 http://flashface.ctapt.de

15,各种动画图标制做 http://ajaxload.info

16,各种字体图片制做 http://cooltext.com

17,http://www.pollyglotto.com/index8.php
超牛的语音翻译,输入文字里面的人自动给你以语音的形式翻译出来,有趣的是他眼睛跟你你鼠标转,遗憾的是不是免费的!

18,你今天印书了么?免费将你的博客翻印成书  http://www.mrprint.cn/?UN=f120.....;ShowType= 0
19,做个德国身份证玩玩 http://onlinewahn.de/generator/

20,自己做个图来让别人拼 http://www.flash-gear.com/puzzle/

21,在线媒体提取工具 http://solor.cn

22,DiY网络拼图 http://www.webpuzzle.cn

23,2G网络硬盘,仿windows操作系统 http://www1.pc2n.com

24.在线媒体转换工具 http://media-convert.com
它支持大量的文件格式之间的互相转换,包括视频、音频、PPT文档、Word文档、表格文档、图片等等数十种之多。比如你可 以把mp3转换成wav,把png转换成gif,把word文件转换成txt文件

25.在线保存,分享和交流网页,博客,新闻 http://www.hinale.com
为您的一篇文章嵌入Hinale按钮,更方便用户保存和交流您的文章

26.blog 搜索引擎 http://www.gnoos.com.au

27.[ ImageCrop ] http://www.imagecrop.com
功能相对简单,它其实是一款为MSN、Yahoo Messager等制作头像的剪裁工具,因此,它的特色在于内置了专用尺寸模板,比如MSN、论坛头像75×75或85×85的 尺寸等等。当然也可以自定义大小。

28.[ Online Image Editor ] http://www.online-image-editor.com
支持JPG、PNG、GIF及BMP格式的图像,具备可转换颜色模式,添加边框,转换图像格式等功能,内置10个滤镜效果。

29.[ GifWorks ]Gif动画处理工具 http://gifworks.com
可生成动画效果的文字,不过不支持中文。可编辑的图像格式只有Gif类型,允许上传最大单个文件为400K。具备30多种滤 镜效果、3 种优化工具及旋转、剪裁等常用图像编辑功能

30.[ Colorcombos ] http://www.colorcombos.com
是一个网页配色自动探测工具,你只需输入网站地点,它就会帮你把该网站当前的网页配色方案展示出来,并提供相应的色值

31.[ PhotoShow ] http://www.photoshow.com
是一个新型的图片展示服务,利用Flash技术构建。事实上,也可以把它当作如
[ ibloks ] http://www.wappblog.com/entry/200.html
[ Eyespot ] http://www.wappblog.com/entry/108.html
等这样的混合工具,它可把图片及音乐混合,做成一段效果非常酷的流媒体。

32.[ Imagesquash ] http://www.imagesquash.com
又是一个图片转换工具,它可以根据按上传图片大小的百分比进行缩小,可转换图片格式为Jpeg、Gif及PNG,可改变图片 质量。

33.[ 在线ping你的博客 ] http://pingoat.com

34.[ iBloks ] 是一个多媒体混合工具,它能把照片及音乐混合成一段视频
http://www.ibloks.com

35.[ Web2.0 STYLr ] 是一个web2.0 Logo制作工具
http://web2.0stylr.com/stylr.aspx

36.[ Web2.0 Logo Creator ] http://msig.info/web2.php
是一个专门用来制作web2.0网站logo的在线工具,制作出的logo具备了几个web2.0元素,比如倒影、beta 标志等等,在有些地方可能不能打开这个网站,可以去http://www.cnproxy.com/webproxy.asp,通过代理打开!!

37.爱因斯坦写汉字 http://www.sbfun.org/einstein/index.php

38.[ Crusty Demons ] http://www.crustydemons.co.uk/UK/tattoo_parlour/index.html
是一个在线的纹身视频制作工具,可自定义纹身图案、文字内容和纹身位置,完成后会生成一段视频,并且可下载图片或者发送给朋 友

39.[ Ponyfish ] http://www.ponyfish.com
是一个在线Feed创建工具

40.[ SubAdjust-Web ] http://dev.pdvel.com/subadjust/index.php
是一个用来调整DVD字幕的在线工具,你可以通过
[ SubAdjust-Web ] http://dev.pdvel.com/subadjust/index.php
来调整DIVX字幕的时间,以便使其与DVD视频同步,另外还可以用来在SubRip和MirroDVD字幕两种格式之间互 换。

41.在线favicon图标制作 http://tools.dynamicdrive.com/favicon/

42.[ converticon.com ] http://converticon.com
是一个在线ico文件和png文件互相转化工具

43.[ krun.ch ] http://krun.ch
提供了本地文件和网络文件的压缩和解压四种功能,压缩或解压缩后的文件可以下载到本地。另外它提供了zip、rar和gzi p压缩文件格式供选择

44.[ 在线做个徽章 ] http://www.says-it.com/seal/index.php

45.在这里,你可以在线做个以自己照片做硬币人物的硬币图片,好酷哦!!
http://onlinewahn.de/generator/m-maker.htm

46.想想自己的照片被外文报纸刊登在头版头条该是多么风光,在这里就可以轻松实现 http://onlinewahn.de/generator/z-maker.htm

47.一个在线生成flash菜单的网站,对站长很有帮助. http://www.hostsun.com/gr/flash_generators.php

48.对有些做了IP限制的网站,可能无法访问,可以使用这个代理访问. http://www.cnproxy.com

49.在线图片处理,网通 http://www.iephotoshop.com
电信 http://www1.iephotoshop.com

50.你可以制作出很有专业水准的动态logo,有很多的样式供你选择 http://www.logomaker.cn

51.Flash头像 http://www.dookyweb.com/avatars.swf  

52.印象派涂鸦板 http://jacksonpollock.org

53.在线网页截屏工具,在浏览器地址栏输入下面的代码就可以了。
http://images.websnapr.com/?url=thw.568idc.com红色部分换成你想要截的网页的地址

54.另外两个好用在线网页截屏工具 http://www.browsrcamp.com/ 和 http://snap.otag.cn/screenshot.aspx

55.可以突破网吧的下载限制进行下载 http://thw.568idc.com/serve/xiazai.html

56.跳转FLASH生成工具 http://www.dfxy.org/tiao/

57.[krun.ch] http://krun.ch
是一个在线压缩工具,它提供了本地文件上传压缩和解压、网络文件的压缩和解压四种功能,压缩或解压缩后的文件可以下载到本地 或者通过Email发送。另外它提供了zip、rar和gzip压缩文件格式供选择。

58.在线生成纯css代码实现的圆角矩形的网站,对网站制作者很有用的东西
http://www.spiffycorners.com
59.http://pentacom.jp/soft/ex/“; http://www.onlinewahn.de/generator/m-maker.htm

61.图片仓库:
http://pic.sdodo.com/

62.在线FLASH动画制作
http://www.dfilm.com/index_movie_start.html

63.图片生成网页图标
http://www.chami.com/html-kit/services/favicon/

64.由蝌蚪网络提供的Gmail注册入口
http://cnc.kedooo.net/gmail/
65.最全的邮件/QQ/MSN/BLOG图片生成器
http://www.eoool.com/

66.收藏夹图标生成器
http://www.html-kit.com/e/favicon.cgi

67.在线域名LOGO生成
http://phorum.com.tw/Generator.aspx
68.免费3D banner在线制做网站
http://www.3dtextmaker.com/cgi-bin/3dtext.pl

69.输入图片就能查看字体
http://uptime.netcraft.com/up/

72.查看该域名IP主机下的其他域名
http://whois.webhosting.info/

73.生成email图片
http://www.nhacks.com/email/index.php

74.世界网络里面有很多不错的测试
http://www.linkwan.com/gb/broadmeter

75.几个大城市的地图搜索
http://map.zhongsou.com

76.图片标签快速生成工具
http://www.eoool.com/

77.查询在google所有服务器中的PR值
http://www.iwebtool.com/pagera.....w.XXXXXoob .com

78.免费加入140个搜索引擎
http://freehosting.hostrave.co.....ware/index .php

79.在线生成多种样式的LOGO http://sherlocco.com/create.asp

80.街道路牌签名生成器
http://www.streetsigngenerator.com/

81.blog标签图片80×15/80×31制作
http://button.blogflux.com/

82.在线生成漫画小图像的站
http://www.abi-station.com/tchinese/
83.生成邮址图片\条形码生成\印章
http://www.makepic.com/

84.QQ在线状态代码生成
http://is.qq.com/webpresence/code.shtml

85.身份证号码在线生成器-韩国/台湾
http://i972.net/~gen/

86.条形码在线生成器
http://www.gzbonny.com/asp/barcode.asp

87.聊天工具在线状态生成器
http://www.onlinestatus.org/usage.php

88.在线字体生成工具
http://www.logomaker.cn/

90.在线制作卡通头像
http://cartoon.msn.com.cn/

91.网站综合信息查询
http://www.webmasterhome.cn/
92.在线制作按钮(多种款式)
http://www.buttonator.com
93.在线建立您的Web 2.0网站LOGO
http://web2.0stylr.com

94.在线生成彩字(爱狗狗吧)
http://www.igogo8.com/

95.live个性图标在线制作
http://linux-fans.com/email/live/live.php
96.在线(IE版)图像处理工具
http://www1.iephotoshop.com/

97.ajax载入效果
http://ajaxload.info/

98.报纸头条图片生成器
http://www.onlinewahn.de/generator/z-maker.htm

99.杂志封面生成器
http://www.funonit.com/funny_jokes/fake_magazine

100.MD5加密破解查询
http://www.md5.org.cn/

Mar 10

这是一篇最早发表于2002年的文章,在2005年又经过了一些修改,我看译言上没有就翻了过来。
虽然是老文章,但其中很多技巧却是难得一见的,透出了一个拥有丰富经验的摄影师的深厚功力。
你以前一定听过这种话:数码相机(以下用DC)无所不能。你只要按下按钮,一张伟大的照片就会变魔术般展现在你面前。相机越好,照出来的照片越好。果真如此吗?见鬼,当然不是了!
事实是你可以用一个简单的消费级傻瓜DC拍出一张伟大的照片,也可以用最贵的DC拍出一张垃圾照片。漂亮的照片不是相机搞出来的,而是摄影师搞出来的。只要有一些拍摄方面的知识,再加上不断改进的愿望,你可以用你的小DC拍出能登上时代周刊的大照片
为了帮助你在成为伟大摄影师的道路上快步前行,这里送给你10个技巧,它们会让你即使不花大价钱买昂贵的设备也能像专业人士一样拍照。
1.暖化你的照片
你注意过有些时候你拍的照片有一种冷冷的感觉吗?如果答案是肯定的,那你并不是孤独呵呵。DC的默认白平衡设置是“自动(auto)”,虽然在大部分情况下都是适用的,但有时候却会让景物太“冷”了。
当你拍户外景物的时候,特别是当阳光充足时,试着把你的白平衡调到“多云(cloudy)”那一档。对,就是“多云”那一档,这个变化跟在你的镜头前加一个暖色滤镜的效果是一样的。它使得照片中红色和黄色的更加丰满,从而暖化了这张照片

图1a
图1a 是在一个山区拍摄的,白平衡设置在“自动(auto)”

图1b
图1b 同一个场景,我把白平衡换成了“多云(cloudy)”,同时把一副Costa Del Mar太阳镜放在了镜头前(佳能PowerShot S200,程序模式program mode)
如果你不相信我,那就试试吧。在户外分别用自动白平衡和多云白平衡拍两组照片,然后在你的电脑上对比着看,我猜你一定会喜欢看上去暖洋洋的那一组的
2.用太阳镜做偏振镜
如果你真的想让你的照片有冲击力,那就随手带一个偏振镜吧。偏振镜是每个摄影师都必备的滤镜,它可以过滤掉眩光和那些意外的反射光,让你的照片的更加富有饱和度,特别是对天空最有效果
你说什麽?你的DC不能加滤镜。别失望,我有个绝招,在我的傻瓜DC上使用多年了。如果你有一副质量还过得去的太阳镜的话,只要把它摘下来放在你的镜头前就OK啦,这就是你的偏振镜哈哈。当然要让他们尽量靠近你DC的镜头,别这块儿挡住那块儿没挡住的。

图2a
图2a 正常拍摄,没有使用任何滤镜。

图2b
图2b 同样情况下拍摄,但我把我的太阳镜当作滤镜挡在了镜头前,注意到被增强的颜色和更加湛蓝的天空了吗?呵呵。(佳能PowerShot S200,程序模式program mode)
要想获得最好的效果,就让你的任意一个肩膀对准太阳,极化(polarizing)的效果在光源同被拍摄物呈90度角的时候是最好的。
3.户外人像的闪亮风采
数码相机没有被发现的特性之一就是强制闪光模式(fill flash or flash on)。通过手动控制闪光灯,而不是让DC自己决定什么时候该闪什么时候不该闪,你就在创造出伟大的户外人像照片的道路上迈进了关键的一步。
在强制闪光模式下,相机首先对背景曝光,接着会恰到好处的照亮你要拍的人物(这句话有点儿别扭)。结果是一个看上去很专业的照片,每样东西都看上去那么舒服。其实婚礼摄影师一直在用这个技巧(以前还奇怪他们为啥大白天的用闪光灯)。

图3
图3. 这两个小男孩在树荫底下,我打开强制闪光模式,照片上的每一样东西都得到了正确的曝光。(佳能PowerShot G2,1/250, f4,flash on)
当你使用这个技巧时,你可以让你的模特站在不同的光路上,比如测光,甚至逆光,你会拍到那种头发边缘闪闪发光的照片,而且这样你的模特就不必为太阳光的耀眼而眯缝眼睛了,当然他们看上去也就更自然。
记住,大多数相机内建的闪光灯只有10英尺(3.05米)甚至更短,所以你千万别站得离你的模特太远
4.令人疯狂微距模式
还记得你小时候在你脚下的草丛中发现了一个崭新世界时的情形吗?当你靠近地面,你看到了你从没看到过的一个庞大的生物世界。
现如今,你可能不想再那样把你腐败的肚子贴到你家后院的草皮上了,但是如果你打开微距模式(close up),开始更加细致地探索那个微观世界,你会得到巨大的回报,那就是你从没拍摄到的崭新的内容。
即使是最简单的物体,在微距模式下也会展现出迷人的新面容。最美妙的是,DC是最擅长干这个的了。

图4
图4 近距离观察时会觉得看上去很特别,或者很迷人。(佳能PowerShot G2,程序曝光programmed exposure, 点测光spot meter,微距模式Close up mode,闪光灯关闭flash off)
找到微距模式的按钮,它常常是一朵小花的样子,按下去打开微距模式,然后在相机允许的范围内尽量靠近你想拍摄的东西,一旦你构好图了,半按快门让相机对焦,对焦完毕之后,按下快门拍照。
记住在微距模式下,你将获得很浅的景深(就是那种背景虚化很厉害的效果),所以把焦距调到你要拍摄的物体身上是很重要的。
(译者补充:微距模式对焦距是有要求的,一般大变焦的相机在长焦端微距模式失效,大家注意)
5.总是很受伤的水平线
由于一些神秘的原因,绝大多数的人类在拿着他们带有LCD的DC拍摄时,无法把相机端平,造成的结果就是歪斜的日落,倒向一边的地平线和随处可见的比萨斜塔。
一部分的原因是,相机的镜头在LCD上成像时会产生畸变,你看上去竖直挺拔的大树,在镜头中会呈现向内弯曲的样子。

图5
图5 如何能让在LCD上看上去水平的图像在你的电脑上也看上去水平呢?找到那些天然的水平线当你的参照吧。有时你可以用天水相接的地方,剩下的时候你可以用地平线。在这张照片中我是使用湖岸来帮助我构图的。(佳能PowerShot G2, 光圈优先,f8,偏振镜)
你该怎么办呢?首先记住没有一劳永逸或者到处适用的方法,但是你可以通过记住一些诀窍来得到提高。
首先,要意识到把该是水平的尽量拍水平了是一件很重要的事情。如果你在构图上有麻烦,试着保持你的相机水平,然后轻轻地水平旋转一个细微的角度再拍一张,当然你可以再拍几张,然后把这几张对比一下,也许会有一张是让你感觉正确的。
如果你经常练习拍出水平照片的技术,慢慢地这就会变成一种习惯,然后你会发现你的风景照上了一个档次。
6.MMC卡
购买足够大的存储卡,这样你就不会因为卡满了而错过好照片了。
(译者注:现在的存储卡那叫一个便宜啊……这个已经不是问题了。)
7.总是使用最高的分辨率
买大容量存储卡的另一个重要理由是,它让你能使用你相机的最大分辨率。
一定要设置到最高分辨率,因为如果你不小心拍到了一张伟大的照片,你不会想仅仅在电脑上跟人分享吧。
(译者注:我总是把相片质量设置到最高,极精细的那一档,虽然照片的大小急剧增加,但是真如作者所说,这样做肯定不会后悔)
8.迷你三脚架
我曾经偶尔听到有些人说:“他一定是专业的,因为他用三脚架呢。”当然,用不用三角架跟你的拍照水平无关,但,这个有三条腿的家伙确实很有用。
问题在于三脚架携带起来太累赘了。
对于DC的使用者来说有一个好消息,UltraPod II,这种迷你三脚架可以收起来放在你的口袋里,它可以单独使用,也可以绑在一些物体上使用(比如绑在栏杆上)


(译者注:三脚架的作用不用说了,这么好的微型三脚架我也是第一次见到,搜了一下淘宝有卖,不贵,不过搜索的时候不能用ultrapod做关键词,而要用“迷你三脚架”做关键词)
9.自拍模式的乐趣
现在你手上有了迷你三脚架了,你就可以尝试另一个没有被开发出来的功能了:自拍模式(self timer就是那个定时拍)。这个功能让你按下快门后过一段时间再拍照(最多10秒),它解决了另一个困扰人们多年的问题——没有摄影者的全家福。
嗨,别觉得你丑就不想出现在合影当中,你可以把相机交给陌生人让他帮忙,当然,你要承担他们不可靠的风险。
自拍模式就是替代方案,用三脚架固定好相机,调整好各项设置,按下快门,然后迅速站到你预设的位置上,等一会儿就OK了。
自拍模式还有更强大的威力呢!当你用长时间曝光拍摄夜景时(比如那种马路上留下车灯痕迹的诡异照片),为了避免你用手按快门时造成相机震动使得照片模糊,你可以用自拍模式完美地克服这个问题。
10.长时间曝光下的流水
我拍的照片即使再美妙,也很难让我的家人看上眼。但还是有一个例外,最近我的妹妹在对我的一组以水为主题的照片评价时,说它们就像画一样,你要知道,这就是对我极大的赞美了。
她说的是我最喜爱的一种照片:用慢镜头拍水。就是用慢速快门,拍那种流动的水,创造出一种柔和且动态的感觉。

  
把你的相机放在三脚架上,强制慢速曝光(比如1秒或者更长),然后你就能得到这种像画一般的流动的水幕。(佳能PowerShot G2,光圈优先模式,f8,快门速度1秒,偏振镜,迷你三脚架)
因为较长的曝光时间,所以你需要一个三脚架来保持稳定,当然还要使用自拍模式了,使用光圈优先模式,然后把光圈设置到f8甚至更小,这将会使你获得很大的景深,同时让快门也慢下来。
拍那种背阴处的流水,日光下的流水可不允许你用那么长的曝光时间。
另一个小技巧是把你的太阳镜放在镜头前,除了偏振镜的作用,它还能阻挡一些日光从而让你获得更长的曝光时间成为可能。
最后的思考
大部分DC,即便是最傻瓜的DC,也有很多内建的功能。通过一些技巧和创造,你拍出的照片就会让人不禁发问:“你用什么机子拍的啊!?”
你当然要告诉他们实情了,毋庸置疑你将获得惊讶和赞美,但是内心深处你要明白,这么好的照片是你拍的而不是相机拍的,人是最关键的。

原文在这里

Mar 06

getting old, getting fat

原文在这里

Mar 06

1. 1979年5月和2000年5月的黄河。黄河三角洲的面积也逐渐在增大。GE控们可以下载联合国环境署的KMZ文件进一步观察,当然,我们也有很和谐的黄河景象

# Copyright for Jandan.net(http://jandan.net/)

2. 2002年3月(上图)和9月(下图)的洞庭湖。那一年的8月X年难遇的洪水来袭,steen所在的小县城就在洞庭湖下面,幸亏湖堤坚固,才能保住小命

3. 2003年9月及04年3月的马达加斯加岛Betsiboka河。上图为该河安静状态,下图为04年3月7号热带飓风Gafilo来袭时的洪灾以及巨大红色沉积羽流。由于近年来的过度采伐,河流不光重度溯源侵蚀,往下,河口淤积的状况也很严重

4. 1975年6月及2003年5月玻利维亚东部的圣克鲁斯省。毗邻Rio Grande河的该地曾是物产丰富的密雨林,小路穿梭其间。到03年已经沦为一块大农垦区

5. 1991年5月及2001年5月的科威特。上百口油井在1999年的海湾战争中被点燃,占科威特国土面积5%,夹杂着沙子和石油的浓烟在左图留下了明确的黑斑

6. 1976年9月及1999年9月土耳其境内的幼发拉底河。图为Atatürk水坝建造后的对比。水坝未建立起来之前,这里是干燥和低产的农业区(左图),1999年后这里的景观发生了明显改变

7. 1973年2月及2003年5月,位于阿根廷、巴西以及巴拉圭三国交界处的伊瓜苏瀑布(Iguassu Falls)。该瀑布是少数几个值得一看的瀑布之一,由于该地区的隔绝,造就了这里独一无二的巴拉纳雨林生态系统,这里有着上千种濒危物种。左图见证了早 期森林过度采伐,30年后这里的景观发生了巨大改变

8. 1972年及1987年的乍得湖。该湖曾是非洲最大湖中的一个,一直是喀麦隆、乍得、尼日尔和尼日利亚的重要水源地。但由于各种大规模的灌溉工程上马,加上沙漠侵蚀和逐渐干燥的气候因素,它的面积仅为以前的5%了。

9. 一些气候变化模型预测:随着地球温度上升2度所导致的格林兰岛的冰层融化能够使全球海平面上升7米,等同效果就是右图的加州佛罗里达半岛。那上升6度呢?看这里

原文在这里

Mar 03

是一个宏,运行它之后就可以将工作表保护破解掉

Public Sub AllInternalPasswords()
‘ Breaks worksheet and workbook structure passwords. Bob McCormick
‘ probably originator of base code algorithm modified for coverage
‘ of workbook structure / windows passwords and for multiple passwords

‘ Norman Harker and JE McGimpsey 27-Dec-2002 (Version 1.1)
‘ Modified 2003-Apr-04 by JEM: All msgs to constants, and
‘ eliminate one Exit Sub (Version 1.1.1)
‘ Reveals hashed passwords NOT original passwords
Const DBLSPACE As String = vbNewLine & vbNewLine
Const AUTHORS As String = DBLSPACE & vbNewLine & _
“Adapted from Bob McCormick base code by” & _
“Norman Harker and JE McGimpsey”
Const HEADER As String = “AllInternalPasswords User Message”
Const VERSION As String = DBLSPACE & “Version 1.1.1 2003-Apr-04″
Const REPBACK As String = DBLSPACE & “Please report failure ” & _
“to the microsoft.public.excel.programming newsgroup.”
Const ALLCLEAR As String = DBLSPACE & “The workbook should ” & _
“now be free of all password protection, so make sure you:” & _
DBLSPACE & “SAVE IT NOW!” & DBLSPACE & “and also” & _
DBLSPACE & “BACKUP!, BACKUP!!, BACKUP!!!” & _
DBLSPACE & “Also, remember that the password was ” & _
“put there for a reason. Don’t stuff up crucial formulas ” & _
“or data.” & DBLSPACE & “Access and use of some data ” & _
“may be an offense. If in doubt, don’t.”
Const MSGNOPWORDS1 As String = “There were no passwords on ” & _
“sheets, or workbook structure or windows.” & AUTHORS & VERSION
Const MSGNOPWORDS2 As String = “There was no protection to ” & _
“workbook structure or windows.” & DBLSPACE & _
“Proceeding to unprotect sheets.” & AUTHORS & VERSION
Const MSGTAKETIME As String = “After pressing OK button this ” & _
“will take some time.” & DBLSPACE & “Amount of time ” & _
“depends on how many different passwords, the ” & _
“passwords, and your computer’s specification.” & DBLSPACE & _
“Just be patient! Make me a coffee!” & AUTHORS & VERSION
Const MSGPWORDFOUND1 As String = “You had a Worksheet ” & _
“Structure or Windows Password set.” & DBLSPACE & _
“The password found was: ” & DBLSPACE & “$$” & DBLSPACE & _
“Note it down for potential future use in other workbooks by ” & _
“the same person who set this password.” & DBLSPACE & _
“Now to check and clear other passwords.” & AUTHORS & VERSION
Const MSGPWORDFOUND2 As String = “You had a Worksheet ” & _
“password set.” & DBLSPACE & “The password found was: ” & _
DBLSPACE & “$$” & DBLSPACE & “Note it down for potential ” & _
“future use in other workbooks by same person who ” & _
“set this password.” & DBLSPACE & “Now to check and clear ” & _
“other passwords.” & AUTHORS & VERSION
Const MSGONLYONE As String = “Only structure / windows ” & _
“protected with the password that was just found.” & _
ALLCLEAR & AUTHORS & VERSION & REPBACK
Dim w1 As Worksheet, w2 As Worksheet
Dim i As Integer, j As Integer, k As Integer, l As Integer
Dim m As Integer, n As Integer, i1 As Integer, i2 As Integer
Dim i3 As Integer, i4 As Integer, i5 As Integer, i6 As Integer
Dim PWord1 As String
Dim ShTag As Boolean, WinTag As Boolean

Application.ScreenUpdating = False
With ActiveWorkbook
WinTag = .ProtectStructure Or .ProtectWindows
End With
ShTag = False
For Each w1 In Worksheets
ShTag = ShTag Or w1.ProtectContents
Next w1
If Not ShTag And Not WinTag Then
MsgBox MSGNOPWORDS1, vbInformation, HEADER
Exit Sub
End If
MsgBox MSGTAKETIME, vbInformation, HEADER
If Not WinTag Then
MsgBox MSGNOPWORDS2, vbInformation, HEADER
Else
On Error Resume Next
Do ‘dummy do loop
For i = 65 To 66: For j = 65 To 66: For k = 65 To 66
For l = 65 To 66: For m = 65 To 66: For i1 = 65 To 66
For i2 = 65 To 66: For i3 = 65 To 66: For i4 = 65 To 66
For i5 = 65 To 66: For i6 = 65 To 66: For n = 32 To 126
With ActiveWorkbook
.Unprotect Chr(i) & Chr(j) & Chr(k) & _
Chr(l) & Chr(m) & Chr(i1) & Chr(i2) & _
Chr(i3) & Chr(i4) & Chr(i5) & Chr(i6) & Chr(n)
If .ProtectStructure = False And _
.ProtectWindows = False Then
PWord1 = Chr(i) & Chr(j) & Chr(k) & Chr(l) & _
Chr(m) & Chr(i1) & Chr(i2) & Chr(i3) & _
Chr(i4) & Chr(i5) & Chr(i6) & Chr(n)
MsgBox Application.Substitute(MSGPWORDFOUND1, _
“$$”, PWord1), vbInformation, HEADER
Exit Do ‘Bypass all for…nexts
End If
End With
Next: Next: Next: Next: Next: Next
Next: Next: Next: Next: Next: Next
Loop Until True
On Error GoTo 0
End If
If WinTag And Not ShTag Then
MsgBox MSGONLYONE, vbInformation, HEADER
Exit Sub
End If
On Error Resume Next
For Each w1 In Worksheets
‘Attempt clearance with PWord1
w1.Unprotect PWord1
Next w1
On Error GoTo 0
ShTag = False
For Each w1 In Worksheets
‘Checks for all clear ShTag triggered to 1 if not.
ShTag = ShTag Or w1.ProtectContents
Next w1
If ShTag Then
For Each w1 In Worksheets
With w1
If .ProtectContents Then
On Error Resume Next
Do ‘Dummy do loop
For i = 65 To 66: For j = 65 To 66: For k = 65 To 66
For l = 65 To 66: For m = 65 To 66: For i1 = 65 To 66
For i2 = 65 To 66: For i3 = 65 To 66: For i4 = 65 To 66
For i5 = 65 To 66: For i6 = 65 To 66: For n = 32 To 126
.Unprotect Chr(i) & Chr(j) & Chr(k) & _
Chr(l) & Chr(m) & Chr(i1) & Chr(i2) & Chr(i3) & _
Chr(i4) & Chr(i5) & Chr(i6) & Chr(n)
If Not .ProtectContents Then
PWord1 = Chr(i) & Chr(j) & Chr(k) & Chr(l) & _
Chr(m) & Chr(i1) & Chr(i2) & Chr(i3) & _
Chr(i4) & Chr(i5) & Chr(i6) & Chr(n)
MsgBox Application.Substitute(MSGPWORDFOUND2, _
“$$”, PWord1), vbInformation, HEADER
‘leverage finding Pword by trying on other sheets
For Each w2 In Worksheets
w2.Unprotect PWord1
Next w2
Exit Do ‘Bypass all for…nexts
End If
Next: Next: Next: Next: Next: Next
Next: Next: Next: Next: Next: Next
Loop Until True
On Error GoTo 0
End If
End With
Next w1
End If
MsgBox ALLCLEAR & AUTHORS & VERSION & REPBACK, vbInformation, HEADER
End Sub

Close
E-mail It