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

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

时间2024-02-11 14:48:03发布访客分类脚本浏览653
导读:收集整理的这篇文章主要介绍了VBS版百度贴吧代码格式化调整工具,觉得挺不错的,现在分享给大家,也给大家做个参考。 百度抽风,老是把吃掉行首空格,导致代码没有缩进。可以用以下方法来解决:...
收集整理的这篇文章主要介绍了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

声明:本文内容由网友自发贡献,本站不承担相应法律责任。对本内容有异议或投诉,请联系2913721942#qq.com核实处理,我们将尽快回复您,谢谢合作!


若转载请注明出处: VBS版百度贴吧代码格式化调整工具
本文地址: https://pptw.com/jishu/609939.html
VBS正则表达式对象的MultiLine属性 ASP/VBScript中CHR(0)的由来以及带来的安全问题分析

游客 回复需填写必要信息