人力検索はてな
モバイル版を表示しています。PC版はこちら
i-mobile

VBSの質問です
VBSが置かれたフォルダと同じフォルダに
shift_jisで書かれている a.htmlファイルがあるのですが
これの文字コードを変換して UTF-8で書かれた b.htmlに変換するコードを教えて下さい。
iphoneからだとUTF-8以外で書かれたページだと文字化けしてしまうので変換したいと思っています


●質問者: takanii
●カテゴリ:ウェブ制作
○ 状態 :終了
└ 回答数 : 1/1件

▽最新の回答へ

1 ● a-kuma3
●300ポイント ベストアンサー

前にこんなのを回答したことがありました。
同じような感じでいけますよ。

Set objStream = WScript.CreateObject("adodb.stream")
objStream.Type = 2
objStream.Charset = "Shift_JIS"
objStream.Open
objStream.LoadFromFile("a.html")  ' Shift-JIS のファイルを読み込み

txt = objStream.ReadText()

objStream.Close()


objStream.Open()
objStream.Position = 0
objStream.Charset = "UTF-8"  ' UTF-8 でファイルへ書き込み
objStream.WriteText txt

objStream.SaveToFile("b.html")

objStream.Close
Set objStream = Nothing

takaniiさんのコメント
ありがとうございました!
関連質問

●質問をもっと探す●



0.人力検索はてなトップ
8.このページを友達に紹介
9.このページの先頭へ
対応機種一覧
お問い合わせ
ヘルプ/お知らせ
ログイン
無料ユーザー登録
はてなトップ