「Openステートメントでファイル入出力」の編集履歴(バックアップ)一覧はこちら
Openステートメントでファイル入出力 - (2008/02/04 (月) 14:45:06) の最新版との変更点
追加された行は緑色になります。
削除された行は赤色になります。
// 現在のページ名
*&this_page()
**概要
タイトルのまんま。
**前提条件
-[[新しいwebサイトの作成]]
**手順
default.aspx を以下のようにすると実現できる。
#highlight(vb.net){
Partial Class _Default
Inherits System.Web.UI.Page
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim fileno As Integer
fileno = FreeFile()
FileOpen(fileno, "c:\test.txt", OpenMode.Output)
Print(fileno, "Test")
PrintLine(fileno, " Data")
PrintLine(fileno, "テストデータ")
PrintLine(fileno, "ファイル番号は", fileno)
PrintLine(fileno, "A", SPC(1), "B", TAB(8), "C")
PrintLine(fileno, True, False)
WriteLine(fileno, True, False)
PrintLine(fileno, Today)
WriteLine(fileno, Today)
FileClose(fileno)
Dim s As String
FileOpen(fileno, "c:\test.txt", OpenMode.Input)
While Not EOF(fileno)
s = LineInput(fileno)
Response.Write(s)
End While
FileClose(fileno)
End Sub
End Class
}
img(画像.jpg)
// 現在のページ名
*&this_page()
**概要
タイトルのまんま。
元ネタ:
-[[@IT総合トップ / テクノロジー / Insider.NET / 連載:VB.NETプログラミング / 第7回 ファイル入出力(前編)>>http://www.atmarkit.co.jp/fdotnet/vb6tonet/vb6tonet07/vb6tonet07_01.html]]
**前提条件
-[[新しいwebサイトの作成]]
**手順
default.aspx を以下のようにすると実現できる。
#highlight(vb.net){
Partial Class _Default
Inherits System.Web.UI.Page
Private Sub Form1_Load(ByVal sender As System.Object _
, ByVal e As System.EventArgs) Handles MyBase.Load
Dim fileno As Integer
fileno = FreeFile()
' ファイルに書き込み
FileOpen(fileno, "c:\test.txt", OpenMode.Output)
Print(fileno, "Test")
PrintLine(fileno, " Data")
PrintLine(fileno, "テストデータ")
PrintLine(fileno, "ファイル番号は", fileno)
PrintLine(fileno, "A", SPC(1), "B", TAB(8), "C")
PrintLine(fileno, True, False)
WriteLine(fileno, True, False)
PrintLine(fileno, Today)
WriteLine(fileno, Today)
FileClose(fileno)
' ファイルから読み込み
Dim s As String
FileOpen(fileno, "c:\test.txt", OpenMode.Input)
While Not EOF(fileno)
s = LineInput(fileno)
Response.Write(s)
End While
FileClose(fileno)
End Sub
End Class
}
実行するとCドライブの中に、"test.txt" というファイルが作成される。
かつ、その中身が読み出され、以下のように表示される。
&img(230.jpg)
表示オプション
横に並べて表示:
変化行の前後のみ表示: