HAMLOG プログラム開発室

こんにちは。お世話になります。
先日の　idx_search　の続きですが、

例えば　Hamlog.hdb に 日付が　"20010203" のデータが
レコード番号　１００から１０４までだったとして下記で最初の　１００　は求まります。
キー　"20010203" の最後の　１０４　を求めるにはどうすれば良いでしょうか？
１００から順番にｈｄｂを読み込み、 Date を求めて行き、"20010203" ではなくなるレコードまで
順次判定して行くしかありませんか？

MakeIndex(hamlogpath, "DATE", "C:\thw2adi\Date.Ndx")
Dim str As String = "20010203"
途中省略
rec_no_1st = idx_search(THindx, search_date, 0)


下記関数の使い方が分かっていないからかも知れませんが。
idx_top()　　　： ｈｄｂの最初のレコード番号　１　
idx_bottom()　 ： ｈｄｂの最終レコード番号
上記では単純過ぎるので、正しい使い方が他にあるのかも？

idx_next()　　 ：　　キーで検索されたレコード番号の次。

> 例えば　Hamlog.hdb に 日付が　"20010203" のデータが

日付を１日づつ加算して行きレコード番号が求められたらそのー１を求める手もありますね。

idx_next()　を使い、日付が変わるまでループします。

こんばんは、ありがとうございます。

> idx_next()　を使い、日付が変わるまでループします。

dbf_read() や THW_read() でｈｄｂを読み込み日付を取得して
変わったかを確認すると言う事でしょうか？

こんばんは、度々お世話になります。

> idx_next()　を使い、日付が変わるまでループします。

Idx_ReadKey(）　および　ＶＢでは Vidx_ReadKey()　ですが
この関数では直接インデックスキー文字列が取れるようですが　Call と Code しかないようです。
Date もあるとＦＢかと思いますが。

> Idx_ReadKey(）　および　ＶＢでは Vidx_ReadKey()　ですが
> この関数では直接インデックスキー文字列が取れるようですが　Call と Code しかないようです。
> Date もあるとＦＢかと思いますが。

2000年、0時、0分など、ゼロは文字列の終端となってしまうので、
ＶＢで扱えるのでしょうか？
Ｃ言語でもゼロを途中に含む文字列コピーはできません。
ブロックコピーなら可能ですが。。。

こんにちは、お世話になります。

> 2000年、0時、0分など、ゼロは文字列の終端となってしまうので、
> ＶＢで扱えるのでしょうか？
> Ｃ言語でもゼロを途中に含む文字列コピーはできません。
> ブロックコピーなら可能ですが。。。

「ブロックコピー」とは下記のような例でしょうか。
buf1 = "20000000"
buf2 = buf1

ブロックコピーでは無いゼロを途中に含む文字列コピーと言うと
ＶＢではどんな場合の事でしょうか。

idx_next()　　はキーで検索されたレコード番号の次が取れる。
ここで例えば、上記で取ったレコード番号のキー文字列を取得できる
idx_next_ReadKeyStr() とかがあると便利かと思いました。
　　　　

> 「ブロックコピー」とは下記のような例でしょうか。

Win32APIの、CopyMemory()や　MoveMemory()です。
構造体などのメモリブロックをコピーします。

> idx_next()　　はキーで検索されたレコード番号の次が取れる。
> ここで例えば、上記で取ったレコード番号のキー文字列を取得できる
> idx_next_ReadKeyStr() とかがあると便利かと思いました。

日付時間は文字列で保存していないので、VB用に作るのは私には
よくわかりません。

こんばんは。
お手数をお掛けしました。

先に書いた日付けを＋１して探すや、　THW_read() で目的の
処理は出来ましたので、この方法で利用させて頂きます。
大変ありがとうございました。

> 2000年、0時、0分など、ゼロは文字列の終端となってしまうので、
> ＶＢで扱えるのでしょうか？
> Ｃ言語でもゼロを途中に含む文字列コピーはできません。
> ブロックコピーなら可能ですが。。。

受け渡しは文字列ですよね？

バイナリーの &H00 は文字列の終端ですが，&H30 は問題ないです．

JP7CZE 川辺さん、こんばんは。お久しぶりです。
コメントありがとうございます。

> 受け渡しは文字列ですよね？

そうです。

> バイナリーの &H00 は文字列の終端ですが，&H30 は問題ないです．

何か希望した機能実現は面倒な雰囲気ですし、先に書いた案で処理出来ましたので良しとしています。

キーのレコード番号が分かり、次のレコード番号のキー文字列が分かる
関数があれば当然楽なのですが。

訂正です。
年月日、時刻は１６進数ですので　00 もありえます。

> 受け渡しは文字列ですよね？
>
> バイナリーの &H00 は文字列の終端ですが，&H30 は問題ないです．

日付時間の実データは文字列ではありません。数値です。
00:00は &H00 &H00　となってしまいますので、C言語ならCopyMemory()
などでコピーできますが、ＶＢの場合はやり方が分からない、という
話でした。