首页 / 编程脚本 / VBS版百度贴吧代码格式化调整工具

百度抽风，老是把吃掉行首空格，导致代码没有缩进。可以用以下方法来解决：
1、在百度贴吧切换到经典版
2、用以下脚本把代码中的制表符和空格替换成unicode编码格式
复制代码 代码如下:
"cscript //nologo C: est est.vbs C: est est.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: est est.vbs C: est est.bat