I have never made a report in Access but am wishing to do so using an SQL statement. I understand how to set values from a report =[Forms]![frmreport]![textboxwhatever] but I am not sure how to do it using an SQL statement. If soemone can just nudge me in the right direction that would be awesome. Below is my code so far but I'm not sure if it will be helpful.
Option Compare Database
Option Explicit
Private Sub cmdreport_Click()
Dim strSQL As String
Dim dtmstart As Date
Dim dtmend As Date
dtmstart = Format(Me.dtmstart.Value, "mm/dd/yyyy")
dtmend = Format(Me.dtmend.Value, "mm/dd/yyyy")
'This is the information I need in a report.
strSQL = "SELECT [Employee Name],SUM[Hours Paid] AS [Hours Paid],Sum[Regular],SUM[Vacation]AS [Vacation],SUM[Regular]AS [Regular],SUM[Floating Holiday] AS [Floaters]" _
& " SUM[Sick] AS [Sick] AS [Sick],SUM[VTO]AS [VTO],SUM[Other] AS [Other] " _
& "FROM tblemployeehistory WHERE([Date Worked] BETWEEN #" & dtmstart & "# AND #" & dtmend & "#);"
Me.tbstart.Value = dtmstart 'From Date
Me.tbend.Value = dtmend 'To Date (Ending)
'Opens report.
DoCmd.OpenReport "rpthistory", acViewPreview
End Sub
Option Compare Database
Option Explicit
Private Sub cmdreport_Click()
Dim strSQL As String
Dim dtmstart As Date
Dim dtmend As Date
dtmstart = Format(Me.dtmstart.Value, "mm/dd/yyyy")
dtmend = Format(Me.dtmend.Value, "mm/dd/yyyy")
'This is the information I need in a report.
strSQL = "SELECT [Employee Name],SUM[Hours Paid] AS [Hours Paid],Sum[Regular],SUM[Vacation]AS [Vacation],SUM[Regular]AS [Regular],SUM[Floating Holiday] AS [Floaters]" _
& " SUM[Sick] AS [Sick] AS [Sick],SUM[VTO]AS [VTO],SUM[Other] AS [Other] " _
& "FROM tblemployeehistory WHERE([Date Worked] BETWEEN #" & dtmstart & "# AND #" & dtmend & "#);"
Me.tbstart.Value = dtmstart 'From Date
Me.tbend.Value = dtmend 'To Date (Ending)
'Opens report.
DoCmd.OpenReport "rpthistory", acViewPreview
End Sub