StackOverflow2013

Note that there are some explanatory texts on larger screens.

plurals

POMultiple insert problem
primarykey
Id
1121972
data
AcceptedAnswerId
0
AnswerCount
5
ClosedDate
CommentCount
12
CommunityOwnedDate
CreationDate
2009-07-13T20:51:41.370
FavoriteCount
0
LastActivityDate
2009-09-21T17:48:25.607
LastEditDate
2009-09-21T17:46:30.337
LastEditorUserId
685
OwnerUserId
0
ParentId
0
PostTypeId
1
Score
0
ViewCount
401
LastEditorDisplayName
text
Body
I am doing a multiple insert in vba access query as below: <pre><code>Private Sub btnSubmit_Enter() DoCmd.RunSQL ("insert into tblAutonumber (Dummy)values ('DummyValue')") Dim lastAutonumber As Long lastAutonumber = DMax("Autonumber", "tblAutonumber") txtAutoNumber.Value = lastAutonumber DoCmd.RunSQL ("insert into tbltesting " & _ "(Empid, TestScenario, testid, owner, event, version, " & _ "expresult, variation, status, homestore) values ('" & _ Me.txtEmpNo.Value & "','" & _ Me.txtTestScenario.Value & "','" & _ Me.txtAutoNumber.Value & " ' ,'" & _ Me.txtOwner.Value & "','" & _ Me.txtEvent.Value & "', '" & _ Me.txtVersion.Value & "','" & _ Me.txtExpectedResult.Value & "', '" & _ Me.txtVariation.Value & "', '" & _ Me.txtStatus.Value & "','" & _ Me.txtHomeStore.Value & "')") DoCmd.RunSQL ("insert into tblContract " & _ "(Empid, testid, Day, Start1, Finish1, Store1," & _ "Start2, Finish2, Store2 ) values ('" & _ Me.txtEmpNo.Value & "','" & _ Me.txtAutoNumber.Value & "','Sunday ','" & _ Me.txtContSunStart1.Value & "', '" & _ Me.txtContSunFinish1.Value & "','" & _ Me.txtContSunStore1.Value & "','" & _ Me.txtContSunStart2.Value & "', '" & _ Me.txtContSunFinish2.Value & "','" & _ Me.txtContSunStore2.Value & "')") DoCmd.RunSQL ("insert into tblContract " & _ "(Empid, testid, Day, Start1, Finish1, Store1, " & _ "Start2, Finish2, Store2 ) values ('" & _ Me.txtEmpNo.Value & "','" & _ Me.txtAutoNumber.Value & "','Monday ','" & _ Me.txtContMonStart1.Value & "', '" & _ Me.txtContMonFinish1.Value & "','" & _ Me.txtContMonStore1.Value & "','" & _ Me.txtContMonStart2.Value & "', '" & _ Me.txtContMonFinish2.Value & "','" & _ Me.txtContMonStore2.Value & "')") DoCmd.RunSQL ("insert into tblContract " & _ "(Empid, testid, Day, Start1, Finish1, Store1," & _ "Start2, Finish2, Store2 ) values ('" & _ Me.txtEmpNo.Value & "','" & _ Me.txtAutoNumber.Value & "','Tuesday','" & _ Me.txtContTueStart1.Value & "', '" & _ Me.txtContTueFinish1.Value & "','" & _ Me.txtContTueStore1.Value & "','" & _ Me.txtContTueStart2.Value & "', '" & _ Me.txtContTueFinish2.Value & "','" & _ Me.txtContTueStore2.Value & "')") DoCmd.RunSQL ("insert into tblContract " & _ "(Empid, testid, Day, Start1, Finish1, Store1, " & _ "Start2, Finish2, Store2 ) values ('" & _ Me.txtEmpNo.Value & "','" & _ Me.txtAutoNumber.Value & "','Wednesday','" & _ Me.txtContWedStart1.Value & "', '" & _ Me.txtContWedFinish1.Value & "','" & _ Me.txtContWedStore1.Value & "','" & _ Me.txtContWedStart2.Value & "', '" & _ Me.txtContWedFinish2.Value & "','" & _ Me.txtContWedStore2.Value & "')") DoCmd.RunSQL ("insert into tblContract " & _ "(Empid, testid, Day, Start1, Finish1, Store1," & _ "Start2, Finish2, Store2 ) values ('" & _ Me.txtEmpNo.Value & "','" & _ Me.txtAutoNumber.Value & "','Thursday','" & _ Me.txtContThuStart1.Value & "', '" & _ Me.txtContThuFinish1.Value & "','" & _ Me.txtContThuStore1.Value & "','" & _ Me.txtContThuStart2.Value & "', '" & _ Me.txtContThuFinish2.Value & "','" & _ Me.txtContThuStore2.Value & "')") DoCmd.RunSQL ("insert into tblContract " & _ "(Empid, testid, Day, Start1, Finish1, Store1," & _ "Start2, Finish2, Store2 )values ('" & _ Me.txtEmpNo.Value & "','" & _ Me.txtAutoNumber.Value & "','Friday','" & _ Me.txtContFriStart1.Value & "', '" & _ Me.txtContFriFinish1.Value & "','" & _ Me.txtContFriStore1.Value & "','" & _ Me.txtContFriStart2.Value & "', '" & _ Me.txtContFriFinsh2.Value & "','" & _ Me.txtContFriStore2.Value & "')") DoCmd.RunSQL ("insert into tblContract " & _ "(Empid, testid, Day, Start1, Finish1, Store1," & _ "Start2, Finish2, Store2 )values ('" & _ Me.txtEmpNo.Value & "','" & _ Me.txtAutoNumber.Value & "','Saturday','" & _ Me.txtContSatStart1.Value & "', '" & _ Me.txtContSatFinish1.Value & "','" & _ Me.txtContSatiStore1.Value & "','" & _ Me.txtContSatStart2.Value & "', '" & _ Me.txtContSatFinish2.Value & "','" & _ Me.txtContSatStore2.Value & "')") End Sub </code></pre> First two queries works fine (i.e. till Sunday) But from Monday the execution breaks I checked all variable in the query , there is not nulls there 
Tags
<sql><sql-server><ms-access><vba><syntax>
Title
Multiple insert problem
singulars
PostAcceptedAnswerId
1. This table or related slice is empty.
PostParentId
1. This table or related slice is empty.
PostTypePostTypeId
1. PTQuestion
UserLastEditorUserId
1. USBIBD
UserOwnerUserId
1. This table or related slice is empty.
plurals
PostLinksPostIdRelatedPostId
1. This table or related slice is empty.
PostLinksRelatedPostIdPostId
1. This table or related slice is empty.
PostsAcceptedAnswerId
1. This table or related slice is empty.
PostsParentIdCreationDate
1. PO
 singulars
 PostTypePostTypeId
 PTAnswer
2. PO
 singulars
 PostTypePostTypeId
 PTAnswer
3. PO
 singulars
 PostTypePostTypeId
 PTAnswer
VotesPostIdCreationDate
1. This table or related slice is empty.
CommentsPostId
1. COHow does it "break"?
 singulars
 PostPostId
 POMultiple insert problem
 UserUserId
 USColin Mackay
2. COError message plz.
 singulars
 PostPostId
 POMultiple insert problem
 UserUserId
 USRemus Rusanu
3. COWhen i execute ; it will insert two row into two tables then it will say "microsoft access cant append all record in access query"
 singulars
 PostPostId
 POMultiple insert problem
 UserUserId
 This table or related slice is empty.

Querying!

Guidance

A row detail

Detail views are divided into sections. All the information in the data section comes from columns in the selected row. The other sections display data from other, related rows.

Related data can be related in a to-one or a to-many fashion. Captions of data related in a to-many fashion link to a list view showing a filtered view of the table.

Try moving around until you find a non-empty to-many entry and click on the label to get to one. You can move back to the root by clicking on the database name in the header.