UTF-8でテキストファイルを読み込む

サンプルソース

Set objStream = CreateObject("ADODB.Stream")

' 文字コードを設定
objStream.Charset = "UTF-8"
' ファイルオープン
objStream.Open

' 入力ファイルを読み込む
objStream.LoadFromFile "c:\a.txt"
' データを変数に格納する
strData = objStream.ReadText(-2)

' ファイルクローズ
objStream.Close

Set objStream = Nothing

解説

UTF-8でテキストファイルを読み書きする場合、ADODB.Streamを使用します。

Charsetで文字コードを指定します。既定値は "Unicode"です。
"Shift_JIS"や"EUC"などの文字コードが指定できます。

ReadText(-2)でテキスト全文を、ReadText(-1)でテキスト1行を読み込むことができます。

※FileSystemObjectのCreateTextFileの第3引数をtrueにするとUTF-16のファイルが作成できます。



ファイル操作




WSH(Windows Script Host) 講座




アクセスランキング


基本操作
日付操作
文字列操作
配列操作
システム操作
XML操作
ファイル操作
ディクショナリ操作
データベース操作


Copyright (C) WSH@Workshop All rights reserved.