Microsoft Access VBA INSERT SQLステートメント

Question

私はMicrosoft Access内でデータベースを作成しました。
フォームにボタンが付いています。クリックしたときにテーブルcustomerHeaderに新しいレコードを挿入します。
このテーブルには、オートナンバーである4つのフィールドがあります。私のSQLステートメントでは、autofieldなのでorderNumberは含めません。
ボタンをクリックしようとしたときにクリックイベントが実行されると、Microsoft Accessで追加クエリのレコードを追加できないというエラーが表示されます。

私はあらゆるところを見てきましたが、私は解決策を見つけることができませんでした。

Private Sub addOrder_Click() 
    Dim mySql As String 
    Dim rowNum As Integer 
    Dim recCount As Long 
    Dim orderNumber As Long 
    Dim myBool As Boolean 


    Dim todayDate As Date 

    todayDate = CDate(Date) 

    myBool = False 


    MsgBox todayDate 

    rowNum = Form.CurrentRecord 
    rowNum = CInt(rowNum - 1) 



    'DoCmd.GoToRecord , , acNewRec 
    mySql = "INSERT INTO orderHeader (orderDate,custNumber,printed) VALUES (" & todayDate & "," & rowNum & "," & myBool & ")" 

    DoCmd.RunSQL mySql 

    Me!orderNum.Requery 

Answer 1

あなたはあまり周りにはありません - ちょうど日付値の文字列表現の形式のためのISO・シーケンスを使用します。

mySql = "INSERT INTO orderHeader (orderDate,custNumber,printed) VALUES (#" & Format(todayDate, "yyyy\/mm\/dd") & "#," & rowNum & "," & myBool & ")" 

しかし、それはそれの今日、単純に使用します。