エントリーの編集
エントリーの編集は全ユーザーに共通の機能です。
必ずガイドラインを一読の上ご利用ください。
ADODB.Streamを使って、UTF-8 の BOM を除去する。 - Windows Script Programming
記事へのコメント0件
- 注目コメント
- 新着コメント
このエントリーにコメントしてみましょう。
注目コメント算出アルゴリズムの一部にLINEヤフー株式会社の「建設的コメント順位付けモデルAPI」を使用しています
- バナー広告なし
- ミュート機能あり
- ダークモード搭載
関連記事
ADODB.Streamを使って、UTF-8 の BOM を除去する。 - Windows Script Programming
UTF-8 に BOM があれば、削除して、書き戻します。 utf8-bom.vbs ファイル... Option Explicit Const ad... UTF-8 に BOM があれば、削除して、書き戻します。 utf8-bom.vbs ファイル... Option Explicit Const adTypeBinary=1 Const adTypeText=2 Const adSaveCreateOverWrite=2 Dim Path Dim Src Dim BOM Dim Buf Set Src=CreateObject("ADODB.Stream") Src.Open Src.Type=adTypeText Src.Charset="utf-8" Src.WriteText "" Src.Position=0 Src.Type=adTypeBinary BOM=CStr(Src.Read(3)) For Each Path In WScript.Arguments Src.LoadFromFile Path Buf=CStr(Sr