Pytanie : składnia błąd wewnątrz OD klauzula

Intymny Okręt podwodny Calendar1_Click ()
Text1.Text = Calendar1.Value
End Sub

Private Okręt podwodny Calendar2_Click ()
Text2.Text = Calendar2.Value
End Sub

Intymny Okręt podwodny Command1_Click ()
Adodc1.RecordSource = "WYBRANY qryVAT.InvoiceNo, qryVAT.SumOfAmount, qryVAT.exVAT, [exVAT] *0.12 JAKO BEDNIA, qryVAT.DateDelivered Od qryVAT DOKĄD [(((qryVAT.DateDelivered) Między #" & Text1.Text & "# I #" & Text2.Text & "#)); "

Ustalony DataGrid1.DataSource = Adodc1
Wywoławczy Command2_Click


Ustalony rptVAT.DataSource = Adodc1
Z rptVAT

. Sekcja ("section1"). Controls. Rzecz ( " text1"). DataField = "InvoiceNo "
. Sekcja ("section1"). Controls. Rzecz ( " text2"). DataField = "SumofAmount "
. Sekcja ("section1"). Controls. Rzecz ( " text3"). DataField = "exVAT "
. Sekcja ("section1"). Controls. Rzecz ( " text4"). DataField = "KADZIOWY "



. Sekcja ("section5"). Controls. Rzecz ( " function1").DataField = "SumofAmount "
. Sekcja ("section5"). Controls. Rzecz ( " function2").DataField = "exVAT "
. Sekcja ("section5"). Controls. Rzecz ( " function3").DataField = "KADZIOWY "

Końcówka With

rptVAT.Show

End Sub




Private Okręt podwodny Command2_Click ()
Adodc1.Refresh
End Sub

Private Okręt podwodny Form_Load ()

Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source= D:\ROAInvent\databa se \ dbInvent.mdb; Persist Ochrona Info=False "
Adodc1.CursorLocation = adUseClient

Text1.Text = Date
Text2.Text = Date


text4.AddItem "Dla Zatwierdzenie "
text4.AddItem "Wydawać "
adoDepartment.Recordset.MoveFirst
While Nie adoDepartment.Recordset.EOF
Text3.AddItem adoDepartment.Recordset.Fields ((0))
adoDepartment.Recordset.MoveNext
Wend

End Sub




here być the error



runtime błąd '- 2147217900 (80040e14)
syntax błąd wewnątrz OD clause

Odpowiedź : składnia błąd wewnątrz OD klauzula

Twój dokąd klauzula mieć a [w ono. Tak daleko jak I móc musieć musieć tam.

uwzględnienie
Marco