| |
neptuneさん こんにちは
>エラーは発生しないんですよね？
If IsNull(Res.Fields(F_車台番号).Value)=False Then
TextBox1.Text=""
Else
TextBox1.Text=Res.Fields(F_車台番号).Value 'こちらに入ってきて、Nullを代入しようとしての
エラーにはなります。
End If
>Res.UpDate
>までの処理はどのような処理してますか？
すいません。みなさんに分かりやすくと思い出来るだけ抜粋して書いていたつもりですが
間違っていましたね。UpDateはEnd IF 前に、Nullを代入したすぐ後になっています。
他の処理は、間には一切入っていません。
If Not Res.EOF then
....
....
Res.Fields(F_車台番号).Value = Null
Res.Update
End If
>Call Control_Refresh(引数省略)
>>車検証データを表示するTextBox群のリフレッシュをするSubを呼んでいます。
>なんですが、このプロシージャで、SQLを投げるか、パラメータクエリ
>（作成しておいてですが）などをキックして再度取得しなおすとどうなりますか？
自宅のPCでしか起きない現象なので、帰ったら試してみます。
パラメータはまだ扱えないので、SQLの方で試してみたいと思います。
（今日は、クリスマスに長女の誕生日ときたもんで、ご報告が遅くなるかもしれません。
質問しておいてなんですが、私事で申し訳ありません）
>それと最初に全レコード取得してますが、必要なレコードだけは抽出出来ないので
>しょうか？無駄です。特にネットワークが噛んで来ると。
一応、あのSQLで取れるのは１レコードだけなんですけど全フィールドって言う意味合いでしたか？
16あるフィールドの内Nullにしないのは2個のフィールドだけなので、"*"で取ったほうが書く量が少なく
なると思い使用していました。意味合いを取り違っていたらすいません。
>recordsetはExcelで持っているんで、待ちなんか無いはずですが・・・？
なるほど、そういう事ですか。
excelの持ち物ということは、例えば
1 Set Wb = WorkBooks.Open("******") 多少時間がかかる処理でもSetされるまで次にいかない
2 UserForm1.Show(vbModeless) すぐ次の処理にいってしまう。
1のような考え方でよろしいでしょうか？（例えが悪かったですかね？）
>今なら、SQLServer2008Expressが無償でDLできますからそちらを使うことを
>お勧めします。2008ではやったこと無いですが、2005では可能でした。
明後日、我が家にもついにネット環境が工事が入って整います。
SQLサーバー非常に興味ありますね。整いしだいDLしてみたいと思います。
|
|
みそじのおじさん
- 08/12/24(水) 12:05 -
