出来るのだASP Q&A掲示板(過去LOG)  訪問数 52046 昨日 889 今日 776
    【PR】 パソコン入門からIT専門書まで幅広く取り揃えています。セブン-イレブン受取り手数料無料のセブンアンドワイ。
Topに戻る 掲示板に戻る 検索 削除 管理者

イキナリですみません。   くっす〜さん [01/02/20 17:23:16] [32]
  Re:イキナリですみません。   管理人(YasNet)さん [01/02/20 17:24:16] [33]
    Re:イキナリですみません。   くっす〜さん [01/02/20 17:25:13] [34]

[32] イキナリですみません。
投稿者:くっす〜さん の <ホームページ> 01/02/20 17:23:16
はじめまして。最近、ASPを勉強し始めた「くっす〜」と申します。
初歩的な質問なのですが、
 date_1.txt 〜 date_10.txtというファイルを作りました。
 Set ts = fs.OpenTextFile(fs.BuildPath(Server.MapPath("."),"date_1.txt"),1,false)
で、ファイルを開けるのですが、ファイル名の数字の部分に変数を代入して、Do〜Loopで全てのファイルを開くにはどうしたらよいのでしょう?

[33] Re:イキナリですみません。
投稿者:管理人(YasNet)さん の <ホームページ> 01/02/20 17:24:16
> はじめまして。最近、ASPを勉強し始めた「くっす〜」と申します。
> 初歩的な質問なのですが、
>  date_1.txt 〜 date_10.txtというファイルを作りました。
>  Set ts = s.OpenTextFilefs.BuildPathServer.MapPath"."),"date_1.txt"),1,false)
> で、ファイルを開けるのですが、ファイル名の数字の部分に変数を代入して、
> Do〜Loopで全てのファイルを開くにはどうしたらよいのでしょう?
こんにちは YasNet です。
 
えー、注意点は 同時にファイルを開くなら Set ts = の 部分もファイル毎に
変更する必要がありますよ。
 
で、ファイル名は 文字連結を利用して
FName = "date_" & Ix1 & ".txt"
objFile.OpenTextFile(Server.MapPath(FName), 1, FALSE)
 
こんな感じでOK と 思いますよ 
ロジカル的な事は、一度考えて見てくださいね。(この情報でわからなければもう一度カキコしてね)
では では

[34] Re:イキナリですみません。
投稿者:くっす〜さん の <ホームページ> 01/02/20 17:25:13
わざわざ。すみません。
早速、試してみます。



TreeBBS For ASP V.0.1.3
Program By YasNet