6 Replies - 3285 Views - Last Post: 13 March 2013 - 09:22 PM Rate Topic: -----

#1 Jovel Mark  Icon User is offline

  • D.I.C Head

Reputation: -3
  • View blog
  • Posts: 81
  • Joined: 22-November 11

Generate Daily Weekly Monthly and Yearly Report using MS ACCESS 2003

Posted 10 March 2013 - 08:41 AM

Hello Guys.. I need Your Help.. To generate the report of the daily weekly monthly and yearly report of my database.

Can You Give me Example or Idea to Solve my Problem,

Thanks Guys
Is This A Good Question/Topic? 0
  • +

Replies To: Generate Daily Weekly Monthly and Yearly Report using MS ACCESS 2003

#2 modi123_1  Icon User is offline

  • Suitor #2
  • member icon



Reputation: 9572
  • View blog
  • Posts: 36,244
  • Joined: 12-June 08

Re: Generate Daily Weekly Monthly and Yearly Report using MS ACCESS 2003

Posted 10 March 2013 - 11:18 AM

There are hundreds of ways to generate reports, but it all depends on how you want to proceed. So more explanation on your part and also some effort on what you have looked into.
Was This Post Helpful? 0
  • +
  • -

#3 Jovel Mark  Icon User is offline

  • D.I.C Head

Reputation: -3
  • View blog
  • Posts: 81
  • Joined: 22-November 11

Re: Generate Daily Weekly Monthly and Yearly Report using MS ACCESS 2003

Posted 10 March 2013 - 03:29 PM

i want to generate the report in weekly, monthly, and annually.

the for mat of the date is mm/dd/2013. this is what i have done before but the error is always popup The Date you Select Does Not Exist!" .. even though the date already in db.
Dim listx As ListItem
Dim rs As New ADODB.Recordset

If DTPicker1.Value = "" Then
    MsgBox "The Date Field is Empty.", vbExclamation, "Details"
      Else
    rs.Open "Select * from Dailyrecord where purchase_date = " & DTPicker1.Value & "", acd, adOpenForwardOnly
If rs.RecordCount = 0 Then
        MsgBox "The Date you Select Does Not Exist!", vbExclamation, "Details"

Else
ListView1.ListItems.clear
While rs.EOF <> True
Set listx = ListView1.ListItems.Add(, , rs.Fields("Receipt"))

listx.SubItems(1) = rs.Fields("BarCode")
listx.SubItems(2) = rs.Fields("ProductName")
listx.SubItems(3) = rs.Fields("Quantity")
listx.SubItems(4) = rs.Fields("Price")
listx.SubItems(5) = rs.Fields("TotalPrice")
listx.SubItems(6) = rs.Fields("purchase_date")
rs.MoveNext

Wend
End If
ListView1.Enabled = True
End If

Was This Post Helpful? 0
  • +
  • -

#4 BobRodes  Icon User is offline

  • Your Friendly Local Curmudgeon
  • member icon

Reputation: 574
  • View blog
  • Posts: 2,989
  • Joined: 19-May 09

Re: Generate Daily Weekly Monthly and Yearly Report using MS ACCESS 2003

Posted 12 March 2013 - 09:37 PM

Probably because DTPicker1.value doesn't match the value in your purchase_date field. You might try using the CDate function on both of them and comparing the result.
Was This Post Helpful? 0
  • +
  • -

#5 Jovel Mark  Icon User is offline

  • D.I.C Head

Reputation: -3
  • View blog
  • Posts: 81
  • Joined: 22-November 11

Re: Generate Daily Weekly Monthly and Yearly Report using MS ACCESS 2003

Posted 12 March 2013 - 10:05 PM

View PostBobRodes, on 12 March 2013 - 09:37 PM, said:

Probably because DTPicker1.value doesn't match the value in your purchase_date field. You might try using the CDate function on both of them and comparing the result.


sir.
I didn't know how to use CDate Function. Can U give me an example of it..
Was This Post Helpful? 0
  • +
  • -

#6 maj3091  Icon User is offline

  • D.I.C Lover
  • member icon

Reputation: 303
  • View blog
  • Posts: 1,797
  • Joined: 26-March 09

Re: Generate Daily Weekly Monthly and Yearly Report using MS ACCESS 2003

Posted 13 March 2013 - 01:16 AM

Google VB6 CDate for an example, please don't expect people to do everything for you.

We're not here to your work, please at least put a little effort in yourself.
Was This Post Helpful? 0
  • +
  • -

#7 BobRodes  Icon User is offline

  • Your Friendly Local Curmudgeon
  • member icon

Reputation: 574
  • View blog
  • Posts: 2,989
  • Joined: 19-May 09

Re: Generate Daily Weekly Monthly and Yearly Report using MS ACCESS 2003

Posted 13 March 2013 - 09:22 PM

Also, I have a post pinned up top that gives a link to the VB6 reference. You can easily find it there.
Was This Post Helpful? 0
  • +
  • -

Page 1 of 1