Fråga : syntaxfel in FRÅN sats

Privat
Text1.Text = underCalendar2_Click ()
End Sub

Private
för Sub Command1_Click för/>Text2.Text = för Calendar2.Value
End Sub

privat () Adodc1.RecordSource = ”VALD qryVAT.InvoiceNo, qryVAT.SumOfAmount, qryVAT.exVAT, [exVAT] *0.12 SOM MERVÄRDESKATTEN, qryVAT.DateDelivered från qryVAT VAR [(((qryVAT.DateDelivered) mellan nr.” & Text1.Text & ”nr. och nr.” & Text2.Text & ”nr.)); ”uppsättning för

uppsättning för
för
för DataGrid1.DataSource- = för Adodc1
appell Command2_Click
rptVAT.DataSource = Adodc1
med
för rptVAT
. Delar upp (”section1”). Controls. Objekt ( " text1”). DataField = ”InvoiceNo "
. Delar upp (”section1”). Controls. Objekt ( " text2”). DataField = ”SumofAmount "
. Delar upp (”section1”). Controls. Objekt ( " text3”). DataField = ”exVAT"
. Delar upp (”section1”). Controls. Objekt ( " text4”). DataField =
för
för
”för MERVÄRDESKATT"
. Delar upp (”section5”). Controls. Objekt
" function1”)/>ld = ”SumofAmount "/>. Delar upp (”section5”). Controls. Objekt exVAT"
" function2”)/>ld = ”/>. Delar upp (”section5”). Controls. Objektet ( " function3”) .DataField = ”MERVÄRDESKATTEN "
för
avslutar
för
Adodc1.Refresh
End Sub

Private underForm_Load för



Private underCommand2_Click för
End Sub
för With

rptVAT.Show
() ()/>Adodc1.ConnectionString = ”Provider=Microsoft.Jet.OLEDB.4.0; Data Source= D:\ROAInvent\databa se \ dbInvent.mdb; Persist säkerhet Info=False "
Adodc1.CursorLocation = adUseClient

Text1.Text = Date
Text2.Text = Date


text4.AddItem ”för
adoDepartment.Recordset.MoveNext
Wend

End Sub




here " för
adoDepartment.Recordset.MoveFirst
While inte adoDepartment.Recordset.EOF
Text3.AddItem adoDepartment.Recordset.Fields för godkännande"
text4.AddItem ”utfärdad 0) (är felet för error



runtime '- 2147217900 felet för
syntax in FRÅN clause " klar "

Svar : syntaxfel in FRÅN sats

Ditt var satsen har a [i det. Så långt, som jag kan se, detta bör inte vara där.

hälsningar
Marco