Frage : Syntaxstörung innen von der Klausel

Privates Unterseeboot Calendar1_Click ()
Text1.Text = Calendar1.Value
End Sub

Private VorCalendar2_Click ()
Text2.Text = Calendar2.Value
End Sub

privates Unterseeboot Command1_Click ()
Adodc1.RecordSource = „AUSERWÄHLTES qryVAT.InvoiceNo, qryVAT.SumOfAmount, qryVAT.exVAT, [exVAT] *0.12 ALS VAT, qryVAT.DateDelivered vom qryVAT, WO [(((qryVAT.DateDelivered) zwischen #“ u. Text1.Text u. „# und #“ u. Text2.Text u. „#)); „

gesetzt DataGrid1.DataSource = Adodc1
Anruf Command2_Click


gesetzt rptVAT.DataSource = Adodc1
mit rptVAT

. Abschnitte („section1“). Controls. Einzelteil ( " text1“). DataField = „InvoiceNo "
. Abschnitte („section1“). Controls. Einzelteil ( " text2“). DataField = „SumofAmount "
. Abschnitte („section1“). Controls. Einzelteil ( " text3“). DataField = „exVAT "
. Abschnitte („section1“). Controls. Einzelteil ( " text4“). DataField = „VAT "



. Abschnitte („section5“). Controls. Einzelteil ( " function1").DataField = „SumofAmount "
. Abschnitte („section5“). Controls. Einzelteil ( " function2").DataField = „exVAT "
. Abschnitte („section5“). Controls. Einzelteil ( " function3").DataField = „VAT "

Ende With

rptVAT.Show

End Sub




Private VorCommand2_Click ()
Adodc1.Refresh
End Sub

Private VorForm_Load ()

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

Text1.Text = Date
Text2.Text = Date


text4.AddItem „für Zustimmung "
text4.AddItem „herausgegebenes "
adoDepartment.Recordset.MoveFirst
While nicht adoDepartment.Recordset.EOF
Text3.AddItem adoDepartment.Recordset.Fields (0)
adoDepartment.Recordset.MoveNext
Wend

End Sub




here ist die error



runtime Störung '- 2147217900
syntax Störung innen VON clause

Antwort : Syntaxstörung innen von der Klausel

Ihr, wo Klausel a hat [in ihm. Insoweit ich sehen kann, sollte dieses nicht dort sein.

Respekt
Marco

Weitere Lösungen  
 
programming4us programming4us