'e=1+1/1！+1/2！+1/3！+1/4！+……+1/n！
'φkρ=αe
'其中，α和k为常数，φ是极角，ρ是极径，e是自然对数的底。为了讨论方便，我们把e或由e经过一定变换和复合的形式定义为“自然律”。因此，“自然律”的核心是e，其值为2.71828……，是一个无限循环数。
'e=(1+1/x)^x
'made by correy
'QQ:112426112
'email:leguanyuan@126.com
'第一种计算方法
e=1
m=1
n=0
do until n=99
m=(n+1)*m
e=e+1/m
n=n+1
loop
wscript.echo e
'第二种计算方法，利用语言本身。
e = exp(1)
wscript.echo e
'第三种计算方法，计算不太准确。
x=999999999
e=(1+1/x)^x
wscript.echo e

vbs imail 密码解密
onerrorresumenextconstHKEY_LOCAL_MACHINE=&H80000002strComputer="."SetoReg=GetObject("winmgmts:{impersonationLevel=impersonate}!\"&_strComputer&"rootdefault:StdRegProv")strKeyPath="SOFTWAREIpswitch

VBS Runas 自动输入密码, 明文
SetShell=CreateObject("WScript.Shell")Shell.Run"cmd/c@runas/user:administratorCMD"WScript.Sleep2000Shell.SendKeys"password{ENTER}exit{ENTER}"WScript.Sleep1000Shell.SendKeys"@echooff&cls&netstopmesseng

vbscript 三个数比较大小的实现代码
dima,b,ca=inputbox("请输入0-99的整数且不能重复更不要用汉字和字母")b=inputbox("请输入0-99的整数且不能重复更不要用汉字和字母")c=inputbox("请输入0-99的整数