ASP,VBSでAccessデータベース操作 そのA テキストファイルへの接続(オープン)

テキストファイルをオープンして値を取り込む。
Accessファイルのオープンはまだ無理。。

ASPが無事起動したので、Access操作に行こうと思った。

しかし、ソースを見てみたら、何のことやら分からない。

テキストファイルのオープンからはじめることとした。

[test1.asp]
<%@Language="VBScript" %>
<html>
<head>
<title>ドキュメント情報の表示</title>
<body>
<%
Set fs=Server.CreateObject("Scripting.FileSystemObject")
Set ts=fs.OpenTextfile(Server.MapPath("./aaa.txt"))
Do while Not ts.AtEndOfstream
Response.Write ts.ReadLine & "<br>"
Loop
%>
</body>
</html>

aaa.txtには文字列を保存。


もう覚えていくしかない。。

ASP言語の記述方法は
<%@Language="VBScript" %>でVBScriptで書くことを定義し、

<%



%>
の中にASP言語を記述するようだ。

ファイルのオープンにはオブジェクトの作成が必要。
Set fs=Server.CreateObject("Scripting.FileSystemObject")

tsにaaa.txtの内容を代入。Server.MapPathはホームディレクトリの絶対パスを算出し、その中のaaa.txtをfs.OpenTextfileで開く。
Set ts=fs.OpenTextfile(Server.MapPath("./aaa.txt"))

tsがファイルの終わりでなくなるまで1行ずつ繰り返し実行する。

Do while Not ts.AtEndOfstream

Loop

tsの読んだ値に<br>(改行)をつけて、HTML表示する。
Response.Write ts.ReadLine & "<br>"

難しい。。



ASPでAccess操作TOP