出来るのだＡＳＰ Ｑ＆Ａ掲示板（過去ＬＯＧ） 　訪問数 52046 昨日 889 今日 776
     【PR】 パソコン入門からIT専門書まで幅広く取り揃えています。セブン-イレブン受取り手数料無料のセブンアンドワイ。
Topに戻る 掲示板に戻る 検索 削除 管理者
[4249] Re:最終レコードのField1の値を取得する方法
投稿者：kaneさん 2004/04/27 17:06:30
お役に立てて光栄です。
解決できてよかったですね。
うまくできてなかったプログラムが希望通りに動いた瞬間は、
悩んでた時間が長いほど感動しますよね(笑)。

さて、最終レコードと現在の日付の違いですが、
レコードの取得をした後、レコードは連番も含んでいるので
日付だけを抽出します。
取得したレコードをfiled1とすると、
w_filed1 = left(filed1,8)
で20040427と言う具合に日付だけ取得できるので
後は、新しいレコードを書き込む途中にIf文を挿入すれば
よいかと思います。
**現在の日付をfiled2とした場合・・・**
rs.open "select * from #####"rs,3,3,1
rs.addnew
If w_filed1 = filed2 then
rs(Filed1).value = CInt(filed1) + 1
Else
rs(Filed1).value = CStr(filed2) + "001"
End If
rs.update
rs.close
で、どうでしょうか？
少しでも参考になれば幸いです。
お互い、がんばりましょう！！

> ありがとうございました。
> kaneさんのプログラムを参考にして自分の作ったプログラムに追加しました。
> なんとか最終レコードの値は取得できました。
> だいぶ悩んだことが嘘のようです。
> 日付＋連番（001…）ですが、日付が変わったら連番をまた001からやり直したいです。
> if文で最終レコードの日付と現在の日付を比較してやればよいのでしょうか？
> if文は、
> if 条件 Then　←こんな文法でいいんですよね？
> （内容）
> end if
> こんどはコレについて考えなければ。。。
最終レコードのField1の値を取得する方法 　 su-さん [2004/04/26 16:34:38] [4242]
　 Re:最終レコードのField1の値を取得する方法 　 kaneさん [2004/04/26 18:21:55] [4243]
　 　 Re:最終レコードのField1の値を取得する方法 　 su-さん [2004/04/27 10:35:24] [4245]
　 　 　 Re:最終レコードのField1の値を取得する方法 　 kaneさん [2004/04/27 17:06:30] [4249]
　 　 　 　 Re:最終レコードのField1の値を取得する方法 　 su-さん [2004/04/28 10:02:26] [4250]

TreeBBS For ASP V.0.1.3
Program By ＹａｓＮｅｔ