FSOからファイル値を抽出することを学び、ファイルに情報を入力することも学びました。次に、適用しましょう。
この習慣があるかどうかはわかりません。ファイルが表示されたとき、無意識のうちに右クリックして、メモ帳で開くことを選択します。ハハ、ほとんどファイルが不可能です。そのため、すべてのファイルがテキストであることがデフォルトである可能性がありますが、接尾辞名は異なります。つまり、ファイルのコンテンツ情報を抽出できるようになりました。わかりました、想像してみてください：
1.ファイルのパスを抽出します（ファイルボタンを使用して見つけて見つけます）
2。パスファイルを開き、すべての行を読み取ります
3.読み取り情報を表示します
1。viewcode.asp
| <％ 関数ショーコード（ファイル名） fso = server.createObject（ "scripting.filesystemObject"）を設定します cnrs = fso.opentextfile（filename、1）をset CNRS.AtendofStreamではありません rsline = cnrs.readline rsline = server.htmlencode（rsline） Response.write（rsline＆ "<br>"） ウェンド エンド関数 ％> <form action = "ViewCode.asp" Method = "POST"> ファイル名を入力<入力型= "ファイル" name = "filename"> <入力タイプ= "submit" value = "ソースプログラムを表示"> </form> <％ file = request.form（ "filename"） Response.write（次のようなファイルと「ソースプログラム<hr> "） if trim（file）<> "" then showcode（file）を呼び出す ifを終了します ％> |
上記のプログラムをデバッグするときは、HTMLとASPページを選択するか、アプリケーションなどを開くことができます。
定義されたショーコード関数は、主にファイル内のすべての情報コンテンツを開き、読み取り、表示するために使用されます。標準のHTMLコードを含むファイルには、server.htmlencode（rsline）が追加されていることに注意してください。
ディスプレイファイルのすべての行は、条件付きループで表示されます。
CNRS.AtendofStreamではありません
...
ウェンド
次に、次の例には、具体的にはオープンメソッドが含まれます。覚えて？通常の状況では、fso.opentextfile（ "c：/testfile.txt"、1）を使用してファイルを開き、パラメーター1の関数は次のとおりです。読み取り専用モードでファイルを開きます。このファイルを書き込むことはできません。ファイルが既に存在し、それに追加する必要がある場合はどうすればよいですか？単純に、パラメーターは8です。
PS：ここで読む方法もあります。
<％ whithfile = server.mappath（ "test.txt"） fso = createObject（ "Scripting.filesystemObject"） set txt = fso.opentextfile（file、1） rline = txt.readall rline = cheplage（server.htmlencode（rline）、chr（13）、 "<br>"） Response.write rline txt.close ％> |
これの使用は何ですか？ハハ、これがAmazonのオンラインストーリーラインです。もしできるなら、最初に元のストーリーを表示してから、ストーリーを追加してファイルに自分で書く必要があります。ファイルを作成する上で最も重要なことは、書き込みを追加することです。そのため、以下で達成できます。
2。Story.asp
<％ request.form（ "nextline"）= "" thenでない場合 fso = server.createObject（ "scripting.filesystemObject"）を設定します textfile1 = server.mappath（ "story.txt"） set cnrs = fso.opentextfile（textfile1,8） cnrs.writeline（request.form（ "nextline"）） cnrs.close ifを終了します ％> ストーリーは次のとおりです。 <％ fso = server.createObject（ "scripting.filesystemObject"）を設定します textfile1 = server.mappath（ "story.txt"） set cnrs = fso.opentextfile（textfile1,1） CNRS.AtendofStreamではありません respons.write ""＆cnrs.readline ウェンド cnrs.close ％> <hr> <form method = "post" action = "story.asp"> このストーリーの新しい行を入力してください。 <入力型= "submit" value = "submit"> </form>
|