C# と VB.NET の質問掲示板

ASP.NET、C++/CLI、Java 何でもどうぞ

掲示板トップ C# と VB.NET 入門 新規作成 利用方法 ツリー表示 トピック表示 ランキング 記事検索 過去ログ
ログ内検索
  • キーワードを複数指定する場合は 半角スペース で区切ってください。
  • 検索条件は、(AND)=[A かつ B] (OR)=[A または B] となっています。
  • [返信]をクリックすると返信ページへ移動します。
キーワード/ 検索条件 /
検索範囲/ 強調表示/ ON (自動リンクOFF)
結果表示件数/ 記事No検索/ ON
大文字と小文字を区別する

No.77941 の関連記事表示

<< 0 >>
■77941 　帳票フォームの反映時間が遅い
□投稿者/ たろう -(2015/12/02(Wed) 16:00:55)

    分類:[Microsoft Office 全般]　

    Access2013
    サブフォームを帳票フォームにしてレコードを表示しているのですが、
    更新した後の反映に時間がかかります。
    SQLのUpdate文などで更新した後に下記の処理を行っています。

    sql = "select * from T_OrderList"

    With Me
    With .subform_OrderList
    .Form.RecordSource = sql
    .Form.Requery
    .Requery
    End With
    End With

    状況としてレコードが10個あるとすると、更新は全てのレコードで全て表示させ、初回の表示が３レコードくらい反映された状態で表示されます。
    Requeryだけ行うボタンを作成して、何度か押すと全て反映されます。

    直ぐ反映させるか、全てのレコードが反映された状態で表示できるまで待機する方法はあるでしょうか？

親記事 /過去ログ132より / 関連記事表示
削除チェック/

■77942 　Re[1]: 帳票フォームの反映時間が遅い
□投稿者/ 魔界の仮面弁士 -(2015/12/02(Wed) 16:49:09)
記事No.77941 のレス /過去ログ132より / 関連記事表示
削除チェック/

■77943 　Re[2]: 帳票フォームの反映時間が遅い
□投稿者/ たろう -(2015/12/02(Wed) 16:57:26)
    更新処理のところにCommitTransを入れてみたのですが同じでした。
    RefreshやRepaintなども入れて試したのですが、反映に時間がかかっているのか？表示上の反映だけおかしいのか？という感じです。
    直接テーブルを開いて更新の状態を確認すると、すぐに反映されているようなので。

記事No.77941 のレス /過去ログ132より / 関連記事表示
削除チェック/

■77944 　Re[3]: 帳票フォームの反映時間が遅い
□投稿者/ 魔界の仮面弁士 -(2015/12/02(Wed) 18:34:26)
    ■No77943 (たろう さん) に返信
    > 更新処理のところにCommitTransを入れてみたのですが同じでした。

    どのオブジェクトの BeginTrans / CommitTrans を呼んでいますか?

    レポートのバインドを RecordSource 指定で行っている場合は、
    （ADODB のトランザクションではなく）デフォルトワークスペースでの
    明示的トランザクションに含めるようにし、dbForceOSFlush 指定で
    CommitTrans してみてください。


    > RefreshやRepaintなども入れて試したのですが、反映に時間がかかっているのか？
    Refrsh や Repaint では、遅延参照を解決できないと思います。
    どちらかといえば、Report.Requery メソッドでは無いでしょうか。
    それで駄目なら、効率は落ちますが、再クエリマクロ もしくは DoCmd.Reqery で。



    > 直接テーブルを開いて更新の状態を確認すると、すぐに反映されているようなので。
    リードキャッシュのフラッシュは行っていますか?
    http://www.ruriplus.com/msaccess/bbscbrwb.asp?root=11829
記事No.77941 のレス /過去ログ132より / 関連記事表示
削除チェック/

■77953 　Re[4]: 帳票フォームの反映時間が遅い
□投稿者/ たろう -(2015/12/03(Thu) 13:38:45)
    処理としては、チェックボックスの全選択と全解除だけなのですが、ソースは

    更新処理（arg_flg：true, false）

    Set ws = CreateWorkspace(vbNullString, "Admin", "", dbUseJet)
    Set db = ws.OpenDatabase(CurrentProject.FullName)

    On Error Resume Next

    ws.BeginTrans

    sql = "update T_List_Order set 選択 = " & arg_flg
    Call db.Execute(sql)

    ws.CommitTrans dbForceOSFlush


    参照処理
    sql = "select * from T_List_Order"

    With Me
    With .subform_OrderList
    .Form.RecordSource = sql
    .Form.Requery
    DBEngine.Idle dbRefreshCache
    .Requery
    End With
    End With

    上記、dbForceOSFlush も試してみて同じでしたが、.Form.Requery の下に DBEngine.Idle dbRefreshCache を入れたらできました。
    .Requery の下でも大丈夫なようです。
    End With の下に入れた方が処理としてはよいでしょうか？
    ありがとうございます。
記事No.77941 のレス /過去ログ132より / 関連記事表示
削除チェック/



<< 0 >>
パスワード/

- Child Tree -