ASPのテキストファイルとデータベースファイル間のデータ交換
ネットワークデータベースの適用は、wwwの非常に重要なコンポーネントです。データベースが欠落している場合、ネットワークはその魂を失うと言えます。 YahooやSohuなどの検索エンジンなしでオンラインで目標を見つけることがどれほど難しいか想像できます。誰もが混乱し、インターネットの広大な海で道を失います。実際、これらの検索エンジンは、ネットワークデータベースの最も典型的なアプリケーションです。 ASP（Active Serverページ）テクノロジーのデータベースには多くの直接的な操作があります。以下は、テキストファイルからデータベースファイルにデータを渡す方法について説明します。
このテキストフォームは収集され、端末によってサーバーの固定ディレクトリに送信されます。サーバーはデータを読み取り、ローカルデータベースに保存します。変換後、テキストファイルが削除されます。このようにして、端末はデータを収集し、指定されたサーバーの指定ディレクトリに特定の形式でアップロードする責任があります。サーバー側のデータベースは端末に完全に不透明であり、サーバーのセキュリティを保証し、現在のネットワークデータベースアプリケーションに多少役立つ可能性があります。
txttolib.asp
<html>
<head>
<Meta http-equiv = reffress content = 30; url = deltext.asp>
<メタhttp-equiv = content-type
content = text/html; charset = gb_2312-80>
<メタ名=ジェネレーターコンテンツ= Microsoft FrontPage Express 2.0>
<title> [テキストファイルをデータベースファイルに変換] </title>
</head>
<body bgcolor =＃ffffff>
<align = center>
<p align = center> <font color =＃ff0000>データが処理されています。待ってください！
<br>
</font> <font color =＃000000> <align = center> <％
str = server.mappath（/） 'サーバーのルートディレクトリを取得します
fso = createObject（scripting.filesystemObject）をset
f = fso.getfolder（str＆ /thetext）を設定します
fc = f.filesを設定します
k = 1
FCの各F1
file（k）= f1.name 'このパスの下ですべてのファイル名を取得します
k = k+1
次
％> <％II = 1％> <％
set fs = createObject（scripting.filesystemObject）％> <％
while ii <k
Response.Writeファイル（ii）＆<br>
set textinstance = fs.opentextfile（str＆ / thetext /＆＆＆file（ii）、1、false、false） 'ファイルを開いてデータを読み取る
textinstance.atendofStream <> true 'ファイルが終了しない場合
visitornum = textinstance.readline 'データの行を読む
j = 0
cd = len（visitornum）
i = 1からCDへ
mid（visitornum、i、1）=、 'データは "、"によって区切られています。
j = j+1
それ以外
ケースJを選択します '各データ値は個別に取得します
ケース0
me1 = me1+mid（visitornum、i、1）
ケース1
me2 = me2+mid（visitornum、i、1）
ケース2
me3 = me3+mid（visitornum、i、1）
ケース3
me4 = me4+mid（visitornum、i、1）
ケース4
me5 = me5+mid（visitornum、i、1）
ケース5
me6 = me6+mid（visitornum、i、1）
[選択]を終了します
ifを終了します