1

私は2つのテーブルを持っています:

tblInvoice (InvoiceID (pk)、請求書)

tblLineItem (LineItemID (pk), InvoiceID)

「メインメニュー」と「ショップ」の2つのフォームがあります。「メイン メニュー」フォームで btnNext をクリックすると、tblInvoice の InvoiceID の自動番号が生成され、「ショップ」フォームに移動します。「Shop」フォームには、txtLineItem というテキスト ボックスがあり、そこに項目を入力します。btnRecord をクリックすると、tblInvoice の最新の InvoiceID を使用するようにします。btnRecord を機能させることができず、tblInvoice で最新の自動番号を取得する方法がよくわかりません。どんな助けやアドバイスも素晴らしいでしょう。前もって感謝します。

btnRecord のコードは次のとおりです。

Private Sub btnRecord_Click()
    DoCmd.SetWarnings False
    Set Recordset = CurrentDb.OpenRecordset(Invoice)
    InvoiceID = CLng(Recordset(InvoiceID))

    DoCOmd.RunSQL "INSERT INTO [tblLineItem] (InvoiceID) VALUES (' & Now(InvoiceID) & ')"
    DoCmd.RunSQL "INSERT INTO [tblLineItem] (LineItemID) VALUES ('" & txtLineItem & "')"
    DoCmd.SetWarnings True
End Sub

次のリンクでデータベースも提供しました: https://drive.google.com/file/d/0Bye-M8FI1tRUdHU3QkxsUFhNNnc/view?usp=sharing

4

1 に答える 1

1

使えるMAX機能があります。自動番号を持つフィールドの名前が ID であると仮定します。

SELECT Max([ID]) FROM [Table]
于 2015-08-18T19:15:12.773 に答える