| 過去の桐井戸端ＢＢＳ （桐ver.９） |
| 26493 | 不定数のテキストデータを読み込むときの一括処理の書き方がわかりません | オケイ | 2004/05/27-19:39 |
|
困ったときの神頼み...にしてしまって申し訳ありません。 一括処理で任意データ(TXT)の読込から作業を開始しています。 最初は、決められたデータ数の任意データ（ディレクトリやデータ名を任意に指定）でしたので、 その数分だけ設定してあればＯＫだったのですが．．．。 読込必要データの数が毎回変化するようになってしまいました。 下記のような設定を繰り返しているのですが、設定よりデータ数が少なくて、 読込を"キャンセル"すると一括自体が終了させられてしまいます。 --メッセージボックス 読込ファイルを選んでください。 --ファイル名入力 初期値="A:\*.*",プロンプト="処理ファイルを選択して下さい",＆ＯＤ --読み込み テキスト，＆ＯＤ データの数が増減しても対応できる方法がサッパリわかりません。 --ケース--？ いやいや... 真っ暗闇です。 今更いちいち手作業するのは悲しくて... 教えてください。 | |||
| 26494 | Re:不定数の読込処理 | 悲しげ | 2004/05/27-20:23 |
| 記事番号26493へのコメント ところで、ここで云う「データの数」とは何を意味しているのでしょう？ 読み込むテキストファイルの「ファイル数」でしょうか？ とすれば、次のような方法はどうでしょう？ 〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜 繰り返し ファイル名入力 初期値="A:\*.*"\ ,プロンプト="読み込むファイルを選択して下さい",＆ＯＤ 条件（＆ＯＤ=""） 繰り返し中止 ジャンプ 行番号=終端 読み込み テキスト，＆ＯＤ，・・・・・ ・・・・・ 繰り返し終了 〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜 もし拡張子が "*.txt" のように決まっているようだったら、 事前に「#ファイル検索」関数を駆使して読み込み対象ファイルをリストアップして 順繰りに読み込ませることもできそうな気もしますが。 | |||
| 26503 | Re:不定数の読込処理 | オケイ | 2004/05/28-11:50 |
| 記事番号26494へのコメント ありがとうございます。 できましたぁ!! これで咽喉に詰まっていたものが取れたみたいにスッキリしました。 >ところで、ここで云う「データの数」とは何を意味しているのでしょう？ >読み込むテキストファイルの「ファイル数」でしょうか？ >とすれば、次のような方法はどうでしょう？ まさにご推理の通りです。 皆さんに伝わる文章を書くことの難しさ・自分の非力さを痛感いたします。 >〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜 >もし拡張子が "*.txt" のように決まっているようだったら、事前に >「#ファイル検索」関数を駆使して読み込み対象ファイルをリストア >ップして順繰りに読み込ませることもできそうな気もしますが。 >〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜 ん〜〜〜 イメージはできるのですが意味がさっぱりわかりません。 いったい何で勉強したらいいのかも不明です。 いいテキストがあったら教えてください。 | |||
| 26515 | *.txtファイルの連続読み込み | 悲しげ | 2004/05/28-18:40 |
| 記事番号26503へのコメント 読み込み対象ファイルの拡張子が "*.txt" に決まっているのなら 〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜 変数宣言 長整数{&i=1,&確認},文字列{&TXT,&TXTs} 繰り返し &TXT=#ファイル検索("*.txt",&i) 条件(&TXT="") 繰り返し中止 &TXTs=&TXTs+","+&TXT &i=&i+1 繰り返し終了 &TXTs=#sstr(&TXTs,2) /*先頭の半角カンマを除去*/ *---これで全txtファイル名がカンマ区切りで取得できた筈 表 "読み込む表.tbl" 表表示 &i=1 繰り返し &TXT=#対応文字列(&TXTs,&i) 条件(&TXT="") 繰り返し中止 メッセージボックス "確 認"\ ,"「"+&TXT+"」を読み込みますか？" ,・・・・,&確認 if(&確認=1) ジャンプ 行番号=終端 読み込み テキスト,&TXT,・・・・・ end &i=&i+1 繰り返し終了 表形式編集 ガイド="結果を確認して下さい。" 〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜 ただし挙動未確認。(^^;) | |||