Hello world!

| 未分類 | | 1件のコメント

WordPress へようこそ。これは最初の投稿です。

てすとてすと


//tmpは書き込みたい内容
Dim cr as String
cr=EndOfLine.Windows //crにWindowsの改行コード(CR+LF)を代入
Dim tmp as string //tmpは書き込み内容
tmp="test"+cr+"test"
tmp=ReplaceLineEndings(tmp, EndOfLine.Unix) //tmpの改行コードをUnix(LF)に変換あああああああああああああああ

//上記でWindowsを指定した意味がなくなるが、メモとしてあえて。
tmp=ConvertEncoding(tmp, Encodings.UTF8) //tmpの文字コードをUTF8に変換
Dim f As FolderItem
Dim t as TextOutputStream
f = GetFolderItem("settings") //settingsフォルダを指定
if not f.Exists then //もし存在しなければフォルダ作成
f.CreateAsFolder
end if

f = GetFolderItem("").Child("settings").Child("test.txt")

//現在のディレクトリからsettings子フォルダ→test.txtファイルを指定
t = f.CreateTextFile
t.Write tmp

//テキストファイルとしてtmpの内容を書き込み
t.Close

てsてsつぇt

続きを読む »

プロフィール

    PJと申します。
    実験好きの高校生です。
    詳細はHTLAB.NETへ。

Twitter

Follow @pcjpnet (589 followers)

カテゴリー

アーカイブ