VBS版百度贴吧代码格式化调整工具

百度抽风，老是把吃掉行首空格，导致代码没有缩进。可以用以下方法来解决：
1、在百度贴吧切换到经典版
2、用以下脚本把代码中的制表符和空格替换成unicode编码格式

'cscript //nologo c:\test\test.vbs c:\test\test.bat
set objfso = createobject("scripting.filesystemobject")
set objfile = objfso.opentextfile(wscript.arguments(0),1,true)
strall = objfile.readall()

strtab = replace (strall,chr(9)," ")
strblank = replace (strtab," ","" & "160;")
call setclipboardtext(strblank)

sub setclipboardtext(strtext)
set objie = createobject("internetexplorer.application")
objie.navigate("about:blank")
objie.document.parentwindow.clipboarddata.setdata "text", strtext
objie.quit
end sub

使用方法: 'cscript //nologo c:\test\test.vbs c:\test\test.bat