Advertisement
Guest User

Untitled

a guest
Mar 27th, 2017
44
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.21 KB | None | 0 0
  1. Option Compare Database
  2. Private Sub New_Record_Click()
  3. DoCmd.RunSQL "INSERT INTO [Order items] ([Order ID], [Menu Item ID], [Quantity ID]) VALUES (Me.Text43.Value, Me.Combo16.Value, Me.Quantity.Value)"
  4. End Sub
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement