MS Accessでselectクエリを使用している年の間のデータ

Question

VB.NETのMS Accessでselectクエリを使用して、年間のデータが必要です。

私のコードは次のとおりです。

Try 
    Cursor = Cursors.WaitCursor 
    Dim rpt As New rptLedger() 
    Dim myConnection As OleDbConnection 
    Dim MyCommand As New OleDbCommand() 
    Dim myDA As New OleDbDataAdapter() 
    Dim myDS As New DataSet 'The DataSet you created. 

    myConnection = New OleDbConnection(cnString) 
    MyCommand.Connection = myConnection 
    MyCommand.CommandText = "SELECT Ledger.rdate, Ledger.pDate, Ledger.receipttotal, Ledger.PaymentTotal, Ledger.PartyName, Ledger.CompCode, Ledger.Cmpcode, Ledger.rnarration, Ledger.pnarration FROM Ledger where pDate >= dateadd(year,-1,GETD())" 
    MsgBox(MyCommand.CommandText) 
    MyCommand.CommandType = CommandType.Text 
    myDA.SelectCommand = MyCommand 
    myDA.Fill(myDS, "Ledger") 


    CrystalReportViewer1.ReportSource = rpt 
    myConnection.Close() 


Catch ex As Exception 
    MessageBox.Show(ex.Message, "Error", MessageBoxButtons.OK, MessageBoxIcon.Error) 
End Try 

Answer 1

あなたがアクセス機能や構文が必要です

MyCommand.CommandText = "SELECT Ledger.rdate, Ledger.pDate, Ledger.receipttotal, Ledger.PaymentTotal, Ledger.PartyName, Ledger.CompCode, Ledger.Cmpcode, Ledger.rnarration, Ledger.pnarration FROM Ledger where pDate >= DateAdd('yyyy', -1, Date())"