EUC で LF 改行のデータを SHIFT_JIS として読む
Set Stream = CreateObject( "ADODB.Stream" ) Stream.Open Stream.Type = 2 ' テキスト Stream.Charset = "euc-jp" Stream.LoadFromFile "euc_lf.txt" Stream.Position = 0 Stream.LineSeparator = 10 ' LF Do While not Stream.EOS ' -2 は、ストリームから次の行を読み取ります strRet = Stream.ReadText( -2 ) Loop Stream.Close Set Stream = CreateObject( "ADODB.Stream" ) Set Stream2 = CreateObject( "ADODB.Stream" ) Stream.Open Stream.Type
ADODB.Streamオブジェクトを利用したUTF-8ファイルの読み書き - 小さい頃はエラ呼吸
はじめに VBScriptでファイルを扱う場合、通常はFileSystemObjectを利用します。しかしながら、FileSystemObjectはShift_JISあるいはUTF-16形式で保存されたファイルしか扱えません。このため、VBScriptでUTF-8のファイルを扱うにはADODB.Streamオブジェクトを利用します。 CreateTextFileの第3引数をtrueにするとUTF-16でファイルを作る。falseにするとShift_JIS。UTF-8で作ることはできない。UTF-8で作りたいときはFileSystemObjectではなくADODB.Streamを使う。 FileSystemObjectの使い方まとめ - 今日覚えたこと 最速攻略 VBScriptサンプル大全集 Windows7/Vista/XP/2000対応posted with amazlet at 13
二郎ペディア
ラーメン二郎のコピペをひたすら集めています。内容は随時追加中。特に若い連中に言いたいことなんだが。俺も古参と呼ばれる身分になって長い。 特に若い連中に言いたいことなんだが。 俺も古参と呼ばれる身分になって長い。 数年もファースト張ってると、二郎の未来についていろいろと思うところはあるわけで。 ……まぁなんだな。どうだろうか。そろそろ、素人さんたちとの共生の道を探ってみるっていうのは。 ひよったといわれちゃあそれまでなんだが……。 そりゃ俺だって若いころはがむしゃらにロットファイトやってたさ。 ロッター以外の客なんか屑だと思ってたしな。 まして血の気の多いお前らのことだ。ロット乱しを見ようものなら、そいつに二郎魂をぶつけちまうんだろう？ そういうどこまでもまっすぐで、ひたむきな馬鹿野郎ばっかりなんだよな。お前らは……。 だがな。もうそういう時代じゃないんだよ。もう二郎は俺た
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
処理を実行中です
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く
