エラー6 Access 2.0とAccess Basicを使用したオーバーフロー

私は1994年から同じプログラムを使用していましたが、これは最初から融資サービスを書いていました。約2ヶ月前にレコードを削除するときにエラー6が発生しました。私はGoogleマシンにエラーを入力し、このサイトを見つけました。私はまだエラー6スタックオーバーフローを取得していますエラー6 Access 2.0とAccess Basicを使用したオーバーフロー

Sub DeleteTransactions_Click() 

    Dim TransID As Long     'I just added this line 

    'On Error GoTo DeleteTransactionsError ' removed the on error so I could see  
    TransID = TransactionID    'added this  
    GlobalTransactionID = TransID   'modified from TransactionID to TransID 
    If MsgBox("Have the Transactions been Printed?", 4 + 48, "Confirm Printing") <> 6 Then Exit Sub 
    If MsgBox("Delete Transactions for Contract ID " & GlobalContractID & " ?", 4 + 48, "Confirm Contract") <> 6 Then Exit Sub 
    If MsgBox("Delete Transactions Starting with Transaction ID " & GlobalTransactionID & " ?", 4 + 48, "Confirm Transactions") <> 6 Then Exit Sub  
    DoCmd Hourglass True

：私も同じように長い変数を再寸法しようとしたので、我々は整数でトランザクション数の上限に達しているが分かりました。誰かがこれを働かせる方法についての考えを持っていますか？どうもありがとう！

出典

2017-03-27 MariposaLand

VB.NETは1994年に存在しなかったので、正しいタグはVB6のものです。また、[お問い合わせ]を読んで[ツアー]を受け、コードをフォーマットしてください。 – Plutonix

エラーが発生した行は何ですか？ –

「GlobalTransactionID」の定義は何ですか - 整数またはロング（長い必要があります） –

残りのコードは表示されませんが、これはわかりませんが、おそらくTransactionIDやGlobalTransactionIDをLongに変更する必要があります。また、必要に応じてdbのテーブルが変更されていると仮定しています。

出典

2017-03-28 05:59:22 MWS

ありがとうございます@MWS。 TransactionIDは、Access 2.0データベース内のテーブルのカウンタです。正しく覚えていれば、GlobalTransactionIDを設定して、Print Transactionsなどのフォーム上の他のボタンと共有することができます。ここでは、私が取り組んでいるレコードに関するSQLステートメントがあります： – MariposaLand

dim GlobalTransactionIDの問題を修正しました。 – MariposaLand

エラー6 Access 2.0とAccess Basicを使用したオーバーフロー

答えて

関連する問題