ASPプログラミング入門ステップ(18):FPOコンポーネントのファイル操作(上)


FPOではドライバやフォルダの操作以外にも、ファイルの操作が一番強力です。記録、コンテンツ管理、検索にも使える動的HTMLページなどがあります。一、fso.OpenTextFileは多く言う必要はなくて、fso.OpenTextFileはあるファイルを開けました。普通はtxtテキストファイルを開けます。まずtxtファイルを作成して、FPOで内容を読み取ります。1,info.txt
name:cnbrucesex:maleはこのファイルを建立しました。次はASPページを作ります。もちろん一番いいのは二つのファイルは同じディレクトリの下にあります。2,opentxt.asp
%whichfile=server.mappath(info.txt)Set fso=CreateObject(「Script.FileSystemObject」)Set xxt=fso.OpenTextFile(whihifile,1)rline=txt.Readlinterininininininininininininininint= Retttttttlineを開いてもファイルを開く必要です。ininininininininininininininininininininininininininininininininininininininininininininininininttxtxtxttxtxtxtxtt今後触れるデータベースを開いて、絶対物理パスアドレスを開くしかないです。しかし、一般的には空間サービス業者にアップロードするので、自分のファイルの位置を直接知ることができません。だから、server.mappathを使用することを強く推奨します。CreateObject(「Script.FileSystemObject」)は、FPOコンポーネントの接続を確立し、fso.OpenTextFile(whichfile,1)はinfo.txtを開いています。パラメータ「1」は「ForReading」を表します。読み取り専用でファイルを開きます。この書類を書いてはいけません。他にもパラメータ「2」は「ForWriting:書き込みでファイルを開く」、パラメータ「8」は「ForApppending:ファイルを開いてファイルの最後から書き始める」という意味があります。このファイルを開けました。次にファイルの内容を表示しますか?txt.Readline方式でテキストの1ラインを読み、次の行を読み続ける必要があれば、txt.Readline方法を使い続けます。もちろん、ここでは、txt.Read(7)が指定された数の文字を読み出し、txt.ReadAllがテキストのすべての内容を返します。二、fso.reate TextFileはfso.reate Folderのようにフォルダを作成します。fso.reate TextFileはファイルを作成しました。3,creattxt.asp
■%whichfile=server.mappath Set fso=CreateObject(「Scrippting.FileSystemObject」)Set MyFile=fso.CareaTextFile(whifile,True)MyFile.WriteLine(MyInInInInInInInInInInIneeeeeBreeeeeeeeeeeeeeeeeeeeeeetttttttBBBBBjjjjjec))))MyFile.MyFile.MyFile.EFile.MyFile.EFile.EFile.EFile.EFile.EFile.EFile.EFile.Wasp">ビューの内容今回作成したファイルは前のinfo.txtファイルで、fso.reate TextFile(whichfile)True)のパラメータtrueは、既存のファイルを上書きできるということです。設立後は中にデータを追加する必要があります。「MyFile.WriteLine」を採用します。簡単なテキスト記録器を作ることができます。以前の記録を覚えていますか?1,appication、session、global.asaによる記数。2,カウンターコンポーネントによる記数を行います。しかし、両方とも共通の病気があります。保存できないです。サーバーが再起動したら、すべての記録が空になりますか?試験:テキストカウンタはまず、一記数のテキストファイルcounter.txtを作成し、初期値を「1」4、counter.txtと設定します。
1続いては記録のASPファイルで、機能はテキストの記録を表示し、本はプラス1の記数をして、さらに新しい記数をテキストファイルに書き込みます。5,txtcount.asp
<%whichfile=server.mappath("counter.txt")'ファイルを開いてその値を読み取り、最後に接続を閉じて資源set fso=createobject(Scrripting.FileSystemObject))set openfile=fso.opentextfile(whifile)をリリースします。1)visitors=openfile.readline openfile.close'ページは記数内容を表示して、1演算のrespnse.writeを追加します。「あなたはこのページの第1ページです。」と&visitors&「ビットゲスト」visitors=visitors+1'は新しい数値をテキストに追加して書きます。最後に、すべての接続をオフにして、リリースリソースset creatfile=fso.reat extfile(whichfile)creatfile.writeline(visitors)creatfile.closet fso=nothing%をオフにします。もちろん前提としては、0-9の10枚の記録画像が必要です。そして、この写真をファイルに置いてください。次は拡張されたtxtcount.aspコンテンツコードです。
<%whichfile=server.mappath(「counter.txt」)set fso=createobject(「Script.FileSystem Object」)set openfile=fso.opentextfile(whifile)1)visitors=openfile.readline openfile.closeCount Len=len(visitors)reponse.write「あなたはこのページの第」for i=1 to 6-countLen'は最大値99999 reponse.write"
を表します。1)「.gif」cn_string=「cnbruce love cnrose」
cn_start=9
cn_length=4
alert(mid(cn_)stringstart,cn_length)

[Ctrl+Aは全部選択してコピーして提示します。部分コードを先に修正してから実行をクリックしてもいいです。]効果ページはhttp://www.cnbruce.com/code/txtcount.aspの記数テキストを参照してください。http://www.cnbruce.com/code/counter.txt