Dim oShell, oExec, sLine
dim url
url = "http://www.tek-tips.com/viewthread.cfm?qid=1520693&page=20"
Set oShell = CreateObject("WScript.Shell")
'Set oExec = oShell.Exec("%COMSPEC% /c md5 ""-d" & url & """")
Set oExec = oShell.Exec("md5 ""-d" & url & """")
Do While oExec.Status = 1
WScript.Sleep 50
Loop
Do Until oExec.StdOut.AtEndOfStream
sLine = oExec.StdOut.ReadLine
Loop
WScript.Echo sLine
--
Feng
--
Feng
"syntax match num /\d*/ contained
highlight link header_name Statement
highlight link header function
highlight link method include
highlight link direction type
highlight link status lcursor
"highlight link deep_link underlined
--
Feng
以下就是我在网上找到的资料. 其中, smtp中的yourusername是要写全名的,也就是要包含@gmail.com.
## ~/.mutt/muttrc
set from=yourusername@gmail.com
# 你在gmail.com的邮箱地址
set realname="Simon"
# 比如，王小二
set reverse_name=yes
set reverse_realname=
set imap_user = 'yourusername@gmail.com'
#gmail邮箱的IMAP用户名嗯
set spoolfile = imaps://imap.gmail.com:993/INBOX
#set sendmail="/usr/sbin/ssmtp -C$HOME/.mutt/ssmtp.conf"
set smtp_url="smtp://yourusername@smtp.gmail.com:587/"
#也是要把yourusername替换成相应的你的用户名
set folder = "imaps://imap.gmail.com:993"
#set record=+sent-mail-`date +%Y`
set record="+[Gmail]/Sent Mail"
set postponed="+[Gmail]/Drafts"
# previously do: mkdir -p ~/.mutt/cache/{headers,bodies}
set header_cache="~/.mutt/cache/headers"
set message_cachedir="~/.mutt/cache/bodies"
set certificate_file=~/.mutt/certificates
set move=no
set delete=yes
set edit_hdrs
set include
set reply_to
set abort_nosubject=no
alternates '(username|altusername)([-+].*)?@.*'
set hdr_format="%4C %Z %{%m/%d} %-15.15F (%4c) %s" # format of the index
hdr_order From: Date: User-Agent: X-Mailer To: Cc: Reply-To: Subject:
ignore *
unignore From: Date: User-Agent: X-Mailer To: Cc: Reply-To: Subject:
my_hdr Reply-To:
# setup gmail filters to apply the corresp. labels:
mailboxes ! =ml-lug-list =ml-lug-org =[Gmail]/Drafts "=[Gmail]/All Mail"
set editor="emacsclient %s"
smtp server
smtp.gmail.com/submit/user=fengimap@gmail.com/novalidate-cert
inbox-path
{imap.gmail.com/user=fengimap@gmail.com/ssl/novalidate-cert}Inbox
这两行写进去后，就可以收发邮件了．PINE不像MUTT需要MSMTP（或FETCH等其它软件）的支持．用起来很舒服．ALPINE用的不是VIM来写邮箱，这点也与MUTT不同，能不能设置成我就不知道了．毕竟我下载下来到现在也就两小时左右．
之前在折腾PINE，后来才知道PINE是古代的东西，２００５年的．现在都用ALPINE．难怪我APT-GET不到．手动装了一个，还有一堆的依赖．后来才知道有ALPINE可以直接用．PINE和ALPINE都有WIN32的版本．实在是爽．呵，除了上面两行的设置，我其它的没动过，不会．．．呵呵．．．
然后
/msg NickServ REGISTER password email@server.com
把用户名注册了，也不懂是干什么用的，先注册呗
要去邮箱收个验证码，就是下面这排，把它在irssi中输入就注册完成
/msg NickServ VERIFY REGISTER fennng ltdscltmuzcx
vim .screenrc
加入这行
shell -$SHELL
就可以了．这样它就会乖乖的去LOAD我们的 .bash_profile 文件．
SocksListenAddress 192.168.0.2
SocksListenAddress 192.168.1.140
这样后，还是不行．．晕，忘了重启TOR了．
于是 sudo /etc/init.d/tor restart
还是不行．．．用UC，和QQ测试都通不过．．．晕死
看看了TOR的日志
vim /var/log/tor
发现不是连不上，而是TOR好像没法支持做QQ的代理
26 May 27 00:18:00.720 [warn] Fetching socks handshake failed. Closing.
27 May 27 00:18:07.866 [warn] socks5: command 3 not recognized. Rejecting.
呵，因为这篇日志在LINUX里写的，而且我只用TERM．．．虽然我有装GNOME和XFACE．．．呵呵，进去后慢死．．．破电脑．．．再说我现在还是SSH呢，也进不了X．
在TERM上，复制和粘贴果然痛苦，刚才顺便研究了下SCREEN的复制文字功能，首先是
CTRL+A CTRL+[ 进和COPY模式，
然后按空格进入类似VIM的VISUAL模式，再用JK移动，来选择要复制的同容．再按空格结束复制．
要粘贴的时候，按下 CTRL+A CTRL+] 就可以了．
晕了．．．写好了，忘了在MUTT中，怎么结束编辑了．．好像 :q 直接退出就可以，那就这样吧．
我知道A的ASCII 码是65, 空格是20...但是 ASCII码表中的0是什么? 不太清楚. 没研究过. 只不过刚才碰到了个搞笑的问题.
这段代码用来给HTML加乱码, 如果 random number 是0的话, 那么, 跟在那个字符后面的所有内容就会凭空消失. 字串本来应该是越加越长的, 但这回居然越加越短...神奇...
matchString = /(<)((br\/>|\/p>|br>))/i;
replaceString = /(<)'((br\/>|\/p>|br>))/gi;
while (htmlCode.match(matchString)){
var tempSeed = seed;
for (i = 0; i < 20; i++){
randomNumber = Math.floor(Math.random()*127) + 1
if (randomNumber == 60 || randomNumber == 62){
randomNumber++;
}
tempSeed += randomNumber;
tempSeed += String.fromCharCode(randomNumber);
}
tempSeed = "<span style='font-size:0px'>" + tempSeed + "</span>"
htmlCode = htmlCode.replace(matchString, tempSeed + "$1'$2");
}
其实是个很简单的东西，在网上找了半天，居然没有现成的．．．
只好自己动手了．
写成HTA了，跟批处理用法一样，复制，粘贴到记事本，存成HTA格式， 双击运行．．．
功能，就是把含有中文的网址成转成全英文的，就是用％XX代替中文，明白？
很多多余的代码，只是为了好看那么一点点，有些代码是纯属多余，没用到，懒得删．
<HTA:APPLICATION
<head>
<meta http-equiv="content-type" content="text/html; charset=UTF-8">
<style>
body { background-color: #eeeeee; background-repeat: repeat-x; background-position: top}
td { font-family: Verdana, Arial, Helvetica, sans-serif; font-size: 9pt; color: #333333}
a{color:#FFCC33;text-decoration:none}
a:hover{text-decoration:underline}
.frmDefault_Text { font-family: Verdana, Arial, Helvetica, sans-serif; font-size: 8pt; height: 20px; width: 400px; background-image: url(images/tplMain_r1_c1.jpg);
background-repeat: repeat-x; border: #000000; border-style: solid; border-top-width: 1px; border-right-width: 1px; border-bottom-width: 1px; border-left-width: 1px}
.frmDefault_Text_Short { font-family: Verdana, Arial, Helvetica, sans-serif; font-size: 8pt; height: 20px; width: 60px; background-image: url(images/tplMain_r1_c1.jpg);
background-repeat: repeat-x; border: #000000; border-style: solid; border-top-width: 1px; border-right-width: 1px; border-bottom-width: 1px; border-left-width: 1px}
.frmDefault_TextArea { font-family: Verdana, Arial, Helvetica, sans-serif; font-size: 8pt; height: 80px; width: 500px; background-image: url(images/tplMain_r1_c1.jpg);
background-repeat: repeat-x; border: #000000; border-style: solid; border-top-width: 1px; border-right-width: 1px; border-bottom-width: 1px; border-left-width: 1px}
.frmText_Quantity { font-family: Verdana, Arial, Helvetica, sans-serif; font-size: 8pt; height: 20px; width: 30px; background-image: url(images/tplMain_r1_c1.jpg);
background-repeat: repeat-x; border: #000000; border-style: solid; border-top-width: 1px; border-right-width: 1px; border-bottom-width: 1px; border-left-width: 1px}
.frmDefault_Button { font-family: Verdana, Arial, Helvetica, sans-serif; font-size: 9pt; font-weight: bold; background-color: #FFCC33; border: #000000; border-style: solid;
border-top-width: 1px; border-right-width: 1px; border-bottom-width: 1px; border-left-width: 1px}.fntHeader_1 { font-weight: bold; }
.celTable_1_Header { font-weight: bold; background-color: #999999; font-size: 8pt}
.celTable_1_Row td { font-size: 8pt}
.celInstall_Position { background-image: url(bap/images/imgInstall_Car_Aerial.gif); background-repeat: no-repeat; background-position: center center}
.celTool_Tip { background-color: #cccccc; padding-top: 10px; padding-right: 10px; padding-bottom: 10px; padding-left: 10px; border: #FFCC33; border-style: solid; border-top-width: 2px; border-right-width: 2px; border-bottom-width: 2px; border-left-width: 2px}
</style>
</head>
<body>
把中文网址转换成英文，IE中有效．
<br/>
这里输入原网址:
<input type = "text" size = "50" id = "txtUrl" value = "" class = "frmDefault_Text" />
<br/>
<input type = "button" value = "转换" onclick = "convert()" class="frmDefault_Button" />
<input type = "button" value = "清除" onclick = "clearTxt()" class="frmDefault_Button" />
<br/>
以下是转换出来的结果:
<textarea id = "txtAResult" rows = "5" cols = "50" class = "frmDefault_TextArea" />will be here </textarea>
<br/>
<input type = "button" value = "复制到剪贴板" onclick = "url2Clip()" class="frmDefault_Button" />
<br/>
<script>
function convert(){
url = "http://www.cjl520.com/免费下载/小曹影楼素材-SWF转VCD%20DVD工具（最好的FLASH转DVD工具）.rar"
if (txtUrl.value != ""){
url = txtUrl.value;
}
url = encodeURI(url);
url = url.replace("%25","%");
txtAResult.value = url;
}
function url2Clip(){
window.clipboardData.setData("text",txtAResult.value)
}
function clearTxt(){
txtUrl.value = "";
}
window.onload=ini
function ini(){
var x=600;y=280
window.resizeTo(x,y)
document.title="中文链接转英文"
txtUrl.focus();
}
</script>
</body>
</hta>
很多人喜欢点别人发过来的链接，而不是复制，粘贴． 这本来也没什么，但很多地方，一碰到中文网址，链接就只到英文部分，从中文部分断开了． 这样点进去的话，链接肯定是不正确的．为了不让这种情况发生，我便想干脆把中文链接变成英文的． 用JS就可以实现．
<body>
this is my encoder
<br/>
<input type = "text" size = "100" id = "txtUrl" value = "" />
<br/>
<input type = "button" value = "convert" onclick = "convert()" />
<br/>
<textarea id = "txtAResult" rows = "3" cols = "100%"> result will be here </textarea>
<br/>
<input type = "button" value = "copy to clipboard" onclick = "url2Clip()" />
<br/>
<script>
function convert(){
url = "http://www.cjl520.com/免费下载/小曹影楼素材-SWF转VCD%20DVD工具（最好的FLASH转DVD工具）.rar"
if (txtUrl.value != ""){
url = txtUrl.value;
}
url = encodeURI(url);
url = url.replace("%25","%");
txtAResult.value = url;
}
function url2Clip(){
window.clipboardData.setData("text",txtAResult.value)
}
</script>
</body>
然后我把它存成 HTA 文件，昨天用了个HTA文件觉得很神奇，看看了里面的内容， 觉得就是JAVASCRIPT， 于是试着把我写的HTML存成HTA格式，居然就直接能用了．让我诧异的是，用HTML和HTA输出的结果居然不同，晕．后来我才发现，是OPERA和IE中的encodeuri 这个函数输出的结果不同，奇了怪了．网上查它们的区别，查了很久，无果． 最后我发现，原为是默认编码不同，晕炫． 因为没有标明网页的编码， OPERA默认是UTF-8，而IE默认是GB2312．．．所以结果就不同了． 把IE的编码改成UTF-8后，结果就一样了． JS引擎看来是差不多的．OEPRA可以打开HTA文件，就跟打开HTML一样． IE打不开，会下载．
window.clipboardData.setData("text",txtAResult.value) 这句在OPERA中无效， 用过OEPRA的人应该知道， 很多网页中，有一些＂点此复制＂的按钮在OPERA中都无效，也许可以设置成有效吧，只不过我不懂罢了．
--刚才做了个实验，发给HOTMAIL的邮件，可以被转发到我的MSN邮箱，但是MSN邮箱收到后，并不会再转发给我的GMAIL．
但如果是直接发给我的MSN邮箱的话，MSN邮箱就会给我转到GMAIL．
也就是说，我还是无法从GMAIL收到HOTMAIL的邮件．
一般的软件改变GIF的大小后就不会动了．随随便便就动用PS是没必要．用GIMP都显得大材小用．用Ulead GIF Animator 5倒是个好主意，只不过批量处理的话，那可麻烦了．
用 imagemagick 就简单多了．
就算要批量处理也很容易了．
[\dev\stingray\Libraries\Asl\Foundation\Src\DirectoryRegistry.cpp-174]
启动不了,打开的时候出现上面那个东西, 原因是因为pr 找不到 "我的文档" 的路径, 因为我的"我的文档" 移到别处去了, 而PR却还是在原来的地方找. 在原来的地方, 建立我的文档文件夹 My documents , 问题解决. 纳闷的是, 我之前用得好好的呀, 为什么今天才发病. 于是我又把 新建的那个"我的文档" 文件夹删除了, 再开PR, 这回又好了...晕死,都不懂为什么了.
设置临时变量 userprofile 为真的 "我的文档" 的目录应该也是可以解决问题的.
今天做了两件事
用OPERA显示迅雷链接
去霏凡广告
通过更改 webThunderDetect.js 这个文件， 我让浏览器在检测不到迅雷的时候，直接打出迅雷下载的地址，而不是弹出下载WEB迅雷，霏凡的广告还真有点难度，有一个特别的广告，把广告去掉后，居然下载地址也不显示了，没弄清为什么，最后我把存广告的变量ADLIST清空了，终于没有广告了。直接清JS文件会把下载地址也清了
第一个， 把这段代码替换成
if(!this.isIE && (client==0)){}else{this.showSetUpInfo(cid);}
这段
document.write("cid:" + cid);
document.write("<br/>");
document.write("url:" + url);
document.write("<br/>");
document.write("refer:" + refer);
document.write("<br/>");
document.write("name:" + name);
document.write("<br/>");
document.write("stat:" + stat);
第二个，MATCH 链接为有广告变量的JS链接，然后把* 替换成
var adlist="";
$STOP()
这里， $stop() 非常重要，否则死循环。
QQ2009 狂人版,在学校没有管理员权限的电脑上可以用, 带回家自己的电脑上反而不能用...晕了...于是便装了QQ英文版, 这个在学校装不了. 只能带回来装了.装好后,爽了,居然没有广告. 腾讯对老外就是厚道...不过也没有任何面板,很干净. 什么都得自己加, 正好我什么也不想加. 还有就是QQ2009的聊天记录和QQ2008还有TM2006不兼容了, 弄个JUNCTION后, 居然啥聊天记录也读不出来. 看来只好分开来存了.
比如查seguir 的所有形式，在google 搜索
seguir conjugations site:www.wordchamp.com inurl:languageid=45
然后点 I feel lucky 就可以了。
BABYLON的 Advanced Espa□l-Ingl□ VOX 这本字典也可以查到。
这两种方法都得用原形来搜索，否则不显示。
unlocker 在我的电脑上总是用不了,出现以下错误.
Unlocker 1.8.5
详细的常被问到的问题请参考http://ccollomb.free.fr/unlocker/链接
解决方法:
搞笑.UNLOCKER用管理员权限安装后,还是必需要管理员权限来运行... 但是UNLOCKER不能直接运行,而是在右键菜单里的,所以不能用运行方式来运行...解决的方法很多, 但是都是基于用管理员启动文件管理器后,再从管理器里调用UNLOCKER. 可以使用 total commander , speed commander 等. 更简单的,也可以使用任何IE内核的浏览器, 如 THE WORLD, MINI IE等. 我想FLASHFXP, CUTEFTP什么的也是可以的.
昨天又睡得很坏，早上八点多就起来了，洗个澡．搬到这里来后从来没有看过病，所以也不懂去哪里看病．在GOOGLE MAP上看好了两家疹所便出门了．先到学校去看看，学校的护士应该比较闲，应该不用排对吧． 可能是太早了，也搞不懂哪间的护士的房间，几乎每间都关着．想想大多是９点才开门吧． 现在才８点多．那就去别的疹所，到最近那家疹所，从学校开过去两分钟吧． 一看，８：３０开门，可是门却是关的，靠近门往里看，晕，里面乱七八糟，显示被遗弃很久了． 到第二家GOOGLE MAP上看好的疹所，也很近．几分钟便到． 可能是GOOGLE MAP的信息太旧了，跟本也没找到啥诊所．
想想，自己去药房买点非处方药吧， 进去后，左看看，右看看，也不懂要买啥呢，便又出来了．又看到药房附近有个家庭医生疹所， 进去看，看到不少人在等呢．又跑出来．往上走，又看到一个家庭医生诊所，是和刚才那家共一家的．这个人少，便问了问．说要先注册．．．哎，以前看病都是学校看护士，然后护士帮着预约医生的，啥麻烦没有．注册费４０元， 想想又不是常期住在这儿，马上又要毕业了，可能很快就要搬家了．注册干嘛． 现在也９点了，回学校看看．于是又把表单还了．
又到学校，这次每个门都看了过去，发现有个门上贴着个张纸，说要看医生的话，去主校区．．．这里９号才有人．．．没办法．．．．
脸皮厚，我又去那里要了注册表格，昨天把钱全都转到信用卡上了，偏偏昨天是星期天，转到钱要周二才会到帐．而我的帐户里只有１００块钱．注册费４０元，看医生还要钱呢，我怕钱不够．就问能不能用信用卡，反正可以透支．居然不收．可是前台的阿姨实在太善良了．她说她只收我２０元． 哇，想想医生再收个５０元左右．贵一点也不会超过８０元吧．应该够了．药房应该可以用信用卡付． 于是便安心等吧．
着实等了很久，有个医生把我叫进去，问一些有的没的，就是完善一下注册资料．还有来看啥病．量了身高体重，然后说我超重了．．．．汗．．．
又等了十几分钟，正角才出马．叫我进去．给我开了三种药．两种是涂的，一种是口服的．出来后，那个前台的阿姨总共才算我２０块钱．．．．太仁慈了．．．注册费免，护士费免（就是量体重身高的），医生的费用才２０元．．．我前世积德了吗？
去药房（药房和疹所是分开的，他们之间没有关系）把医生的药方给他们．．．等了好久．．．终于药准备好了．之前怕钱不够，还特意问能不能付信用卡．这里是可以的，所以我倒也放心．可是付钱的时候我眼睛都登大了．．．．９块钱．．．不是吧．．．没开过这么便宜的药．．．
药在手里，掂量一下，好像东西还不少．怎么会这么贱？先回家上药了．
到家后，打开药包，里面两个盒子，一个瓶子，料还不少呢．仔细看了看单价，才明白过了，好像是病人特慧价．三种药，全部都是三块钱．合成来９块钱．而真正的价钱则是：３.９３， ２０．３６，３.９４. 合计２８.２３元． 也不算贵．呵呵，医生如果三种药都给我开２０．３６元那种，我不是赚大了？
我不明白为什么我有特价．．．搞不懂他们的医疗机制．．．三种药分别是 Paraceta, locoid li, calamine.
本来我是要去报销的，我有保险．．不报浪费．．．可是这才９块钱．．．报啥呢．．．还真希望他给我开高点，我好报销呀．这么点钱报销起来太丢人了．．．注册费是不能报的，但没收钱．医生的疹费２０元． 合成来２９块钱．．．我真的要去报销吗？ 填个报销单还累死．
我原以为光学取景器的本质只是个洞而已．前边后边安了两块玻璃．事实在没这么简单，光盘取景器的两头也并不是一条直线，而是Z字形的吧．光学取景器一样可以显示光学变焦．拉近就放大．拉远就缩小，觉不只是一个两边通的洞而已．只是光学取景器很难对焦．我的解决方法是，把焦点调到画面中央．把要拍摄的物体放在取景器的中央，锁定．然后再来移动相机确定取景范围．
我认为相机的ISO值必须是在６４，１００，２００，４００．．．３２００这种数值．而实际上，当你调到自动的时候，你会发现ISO可能出现任何值，比如说我就看到了ISO１３３，１２１这样的数值．
顺便说一个PICASA3，因为PICASA3让我看到了这些ISO值，不得不赞的是，PICASA一如既往的快．没见过比他更快的．换照片觉得一点延时也没有．而新增的拼接功能也很有意思．
没体验到海水温泉，却换了周身的疼痛．还有皮肤的0.N 度灼伤． 温泉海滩的浪花却还是足够补偿这一却的． 浪很大，绝对是个冲浪的好地方．水很清，但在近处，你却感觉不到那种一望无际的碧绿．这里的水，自然是不适合游泳的，一波一波的浪将人冲得晕头转向． 当浪花扑面的时候，我或是闭眼不理，任浪花将我冲出几米远．或是跃起，当浪花触不到我的头部，偶尔估算错误，跃起后还是没有浪花高，便只好被冲得稀里糊涂，海水的味道也便偿了去． 碰到大浪的时候，我喜欢将头埋进水里，因为那样，可以壁过浪的攻击，但身体却依然要被冲出几米的．带在浪板后，努力的往海水中走去，几秒一次的浪使我的前进速度很慢．终于差不多远了，我便等着大浪来袭．一个大浪过来，我趴在浪板上，一下个便冲到岸边．走了那么久离岸边有一段乱离，一个浪，就被冲回来了．但是很爽．体力不支了，我便回岸上休息，快到岸时，我便总是走不动，任浪花打得我在沙滩上滚去．在海滩上晒太阳真是太笨蛋了．即使是涂了防晒霜，也要尽量少晒的，不然就像我一样．伤痕累累．
５点多便是最低潮，３点的时候，便有一大群人开始寻找热泉了．我们便跟了过去，但人实在太多，而有热水的地方又大多还在海水下面，我们挑了个地方，可是直到最低潮的时候，浪花还是能达到我们的巢穴，我们辛辛苦苦挖好的温泉坑，总是然一个浪花便填平了．小浪倒是不会冲到这么高，来个大浪，我们就啥都白干了．我们一边挖，海水一边填．周围的其它人也是一样，而在靠水远一点的地方挖却是挖不出热水的．我们的位置挖下去，沙很烫，烫得我屁股开花．可惜却怎么挖都是徒劳，待到低潮过后，海水依然可以没过我们的小坑．我们便放弃了．
我们离开温泉海滩．到TAIRUA镇上解决晚餐，这市镇离温泉海滩是最近的了，便是大多数人的必经之路，镇上热闹，而东西也是贵得出奇．我们享用了天价的汉堡，披萨，著条还有一瓶并不是那么天价的可乐后，便离开了这里．节假日１５％的加价和本来就比外面贵好多的物价真是让我无语．
路上，我们选择了和来时不同的路，我们来时的路要经过一个森林公园，山路颇多，弯弯曲曲，非常难开．来的时候我们大概用了２小时４０分．而回去时，我们挑另外一条路，希望这条路少一些山路，虽然这条路要远２０分钟．但该死的是，这条路不仅要远一些，山路却一点也没少，反而更多．绕着绕着，我们的书姐终于晕车呕吐了，我把车停在路旁，开启警示灯．便看着幸灾乐祸的车子往身旁一辆一辆经过，便有两辆车里在人向我们欢呼．．．我无语，我真想告诉他们，我的车没有坏，只是停下来，休息罢了．
继续前进，不久，终于穿出了那山．我们终于开上了像样的道路．之前的山路虽然多弯，常常有要２５码才能舒服通过的大弯，但是我不得不说，那路面，还是非常好走的．路面虽然没有换，但笔直的高速公路却让人笑逐颜开．
我没有想到的是，到家后，皮肤上的伤是这么的重．．．
