vbscript的骨灰级写法计算1到100的和
这篇日志完全是看了一篇日志后的启发，原文为：邪恶的eval和new Function。
很少使用new Array的方式来定义数组，没想到new Array有这么一个妙用，通过new Array(n)我们可以创建n个空元素，同时也就在n个元素中间存在n-1个空白，通过join,我们可以将一些东西放在这些空白中间从而组成我们需要的特殊串，这不禁启发了我的灵感，这个特点可以使我不通过循环就可以很容易的实现一个“有规律元素的连续运算”。比如计算1-100的数值的和。以往我们需要从1循环到100然后求和，但利用数组的这个特性我们可以通过简单的一行代码搞定，代码如下：
此外可以做很多类似的数学运算，比如以下几个
这些我们以往都通过循环进行的计算，现在都可以一行代码巧妙搞定，不得不叹服编程语言隐含的灵巧，编程的世界总有太多的东西等待我们去发现。
把上面的JavaScript代码改成VBS，就是VBS练习题所谓的骨灰级解法：
原文：http://demon.tw/programming/no-loop-calculate-1-100-sum.html
很少使用new Array的方式来定义数组，没想到new Array有这么一个妙用，通过new Array(n)我们可以创建n个空元素，同时也就在n个元素中间存在n-1个空白，通过join,我们可以将一些东西放在这些空白中间从而组成我们需要的特殊串，这不禁启发了我的灵感，这个特点可以使我不通过循环就可以很容易的实现一个“有规律元素的连续运算”。比如计算1-100的数值的和。以往我们需要从1循环到100然后求和，但利用数组的这个特性我们可以通过简单的一行代码搞定，代码如下：
var i=0,sum=eval('0'+new Array(101).join('+(++i)'));
此外可以做很多类似的数学运算，比如以下几个
eval('0'+new Array(11).join('+Math.pow(++i,2)')) //计算1-10的平方和
eval('0'+new Array(100/2).join('+(i+=2)')) //计算2+4+6+...100的和
这些我们以往都通过循环进行的计算，现在都可以一行代码巧妙搞定，不得不叹服编程语言隐含的灵巧，编程的世界总有太多的东西等待我们去发现。
把上面的JavaScript代码改成VBS，就是VBS练习题所谓的骨灰级解法：
Dim a(101)
Execute(Join(a,"s=s+i:i=i+1:"))
MsgBox s
原文：http://demon.tw/programming/no-loop-calculate-1-100-sum.html
获取远程机器共享目录的物理路径的代码
第一：依靠135端口，用wmi。像下边的脚本是得到共享目录ttt的物理目录。strPath="\192.168.1.55ttt"strPath=Replace(strPath,"\","")arrPath=Split(strPath,"")strComputer=arrPat
EXE2BAT(EXE转BAT)的vbs脚本
exe2bat的脚本fp=wscript.arguments(0)fn=right(fp,len(fp)-instrrev(fp,""))withcreateobject("adodb.stream").type=1:.open:.loadfromfilefp:str=.read:sl=lenb(str)endwithsll=slmod65536:slh=sl65536withcrea
VBS基础教程
VBScript(MicrosoftVisualBasicScriptEditon).，微软公司可视化BASIC脚本版).正如其字面所透露的信息,VBS(VBScript的进一步简写)是基于VisualBasic的脚本语言.MicrosoftVisualB
