データーベースの抽出法なんですが・・・。

質問

2つのmdbファイルから読み取り表示
2つのmdbファイルから読み取り昇順に表示させたいんです。
<ファイル１.mdb> | <ファイル2.mdb>
11111 　　　　　　　| 22222
33333 　　　　　　　| 44444
55555 　　　　　　　| 66666
77777 　　　　　　　| 88888
99999 　　　　　　　|

上記のような2つのファイルがあるとします。
両方を読み込み下記の様にcsvヘ出力したいんです。
<出力.csv>
11111
22222
33333
44444
55555
66666
77777
88888
99999
///////////////////////////////////////////////////////////////
この場合、
if(ファイル１.mdb < ファイル２.mdb)
if(ファイル１.mdb ＞ ファイル２.mdb)
if(ファイル１.mdb ＝＝ ファイル２.mdb)
により判別しフェッチで1行ずつ読み取り出力していくという形をとっています。しかし、ファイル１とファイル2のレコード数が違い、先にファイル2がEOFになってしまいファイル１の最後の数字"99999"が出力されません。
この最後の行を表示するプログラムを教えていただけませんか？
VCにて作成中です。
上記ののif分、フェッチの後に
if(ファイル1.mdb == EOF){
fput(ファイル2.mdb,fout);
}
if(ファイル2.mdb == EOF){
fput(ファイル1.mdb,fout);
}
としております。
よろしくお願いします。

回答No.2

Hardking · ベストアンサー

結局やりたいことは２つのmdbファイルを
データが昇順に並んだ状態で、１つのＣＳＶファイルとして併合
したいんですよね。
ファイルのレコード件数は、気にせず
段階を決め、処理しましょう。
(1)．ファイル１.mdbを作業ファイルへ全件書き込む
(2)．ファイル２.mdbを作業ファイルへ全件書き込む
上記(1)(2)で１つの作業ファイルへ併合しました。
(3)．作業ファイルのレコード件数分
文字列型の配列変数をメモリー確保する。
(4)．作業ファイルの全レコードデータを
文字列型の配列変数へ格納する。
(5)．文字列型の配列変数を昇順に並び替える。（バブルソート）
(6)．並び替えた配列変数をＣＳＶファイルへ出力する。
(7)．配列変数のメモリー開放を行い、作業ファイルを物理削除する。