テキストカウンター

2007年3月には、 2009年のASPの管理者で第4回投稿

今ではカウンタと呼ばれるフォルダを作成するかを覚えて、何か他の場合は、上記のコードを変更するに呼び出すことができます。 今ではテキストcounter1.txtと呼ばれるファイルとどんな場合では、カウントを開始する希望を入力して作成してください。

言語@ < ％ =のVBScript ％ >
< ％
薄暗いFSOを
設定FSOを=にServer.CreateObject （ " Scripting.FileSystemObject " ）
/ /これはあなたのcounter1.txtファイルへのパスです。
カウンター= Server.MapPathの（ " /カウンタ" ） ＆ " \ counter1.txt "
/ /テキストファイルを開く
設定InStream = fso.OpenTextFile （ 、 1 、偽）カウンタ
oldCount =トリム（ InStream.ReadLine ）
/ /インクリメントの1店舗でoldcount newcount
newCount = oldCount + 1
設定OutStream = fso.CreateTextFile （カウンタ、真）
/ /テキストにファイルをコピーnewcount
OutStream.WriteLine （ newCount ）
％ >

これで、 folllowingがお客様のサイトに表示されるカウンタを配置する

< ％ = newCount ％ >

関連記事：

  1. より正確なテキストこれが私たちの 前の例よりも、より正確なカウンタですカウンタ...
  2. ディスプレイの表示をCSV 形式のCSVファイルに共通している CSV ファイルをファイルには...
  3. CSVファイルを保存するデータベースへの アクセスでstock.mdbと呼ばれるデータベースを作成します。 今すぐ作成...
  4. rndimage1 これは理想的ですが簡単なランダムイメージスクリプトです...
  5. ここにテキストは、この例のファイルへのファイルにテキストを作成しストリームを使用しています...

関連する記事はまだもう1つの関連するプラグインを投稿しました 。

コメントの投稿

）

） ）