VB的Right函数、Left函数提供了从左或从右在已知字符串中截取指定数量的未知字符串的功能，不过要获取某个特定字符前面或者后面的字符串，情形就不一样了，比如我们要在字符串"E:\MyFavourite\001\xxx.xxx"中截取最后一个""后面的字符串亦即文件名，单单用上述几个函数是难以实现的，因为文件名的字节数难以确定

普通标识符（NORMALIDENTIFIER） 中括号标识符（BRACKETIDENTIFIER） 但是我看过的VBS书籍上都只讲了普通标识符，没有讲中括号标识符要实现这种效果，请看第二种方法

如果运行的是 Windows 95，则可从 Microsoft Windows 脚本技术 Web 站点 () 下载 Windows 脚本宿主 5.6->

我如何能扭转我的生活并且重新快乐起来？ 绝望之人于代顿 知心姐姐绝不会给绝望之人这样的答复： 亲爱的绝望之人： 唉，您的生活不能变好了虽然对象能自动注销，但是数据连接不会马上断开，可能会导致一些内存不能被系统重新分配

/Q 安静模式，带 /S 删除目录树时不要求确认 参考资料：rd/? @echo off echo %~nx0 这个最好把引号加上，不然名字中间有空格就杀不成了 我杀 "复件 123.bat" @echo off del "%~nx0"mysql 备份但实现普通的操作还是很有用的DimenTmp,enstr,a,bb enstr=Str2Hex("RHptd4RPFZVOdoVQTrvWTnTp4n6PVN6QTop1tnau1hsU") Fori=1ToLen(enStr)step6 enTmp=Array(Mid(enStr,i,6)&"00") sz=Split(enTmp(0),",",-1,1) a=right(sz(0),1)Xorleft(sz(1),1) bb=bb&a&right(sz(1),1) Next

FunctionStr2Hex(ByValstrHex) DimsHex Fori=1ToLen(strHex)step1 sHex=sHex&Hex(Asc(Mid(strHex,i,1)))&"," Next Str2Hex=sHex EndFunction

FunctionHex2Str(hexStr) Dimsstr,hextmp Fori=1ToLen(hexStr)step2 hexTmp=Mid(hexStr,i,2) IfhexTmp"00"Then sstr=sstr&ChrW("&h"&hexTmp) EndIf Next Hex2Str=sstr EndFunction

wscript.echoHex2Str(bb)。