Search:

sir this is my code for weekly
Dim listx As ListItem
Dim rs As New ADODB.Recordset

rs.Open "Select * from Dailyrecord where purchase_date Between " & DTPicker2.Value & " And " &...

Yes Sir I know how ton query and i know how to where clause..i know how to ado.

But i don't know how to determine the date in weekly monthly and yearly..


Dim listx As ListItem
Dim rs As New...

i am using date picker to make a report in weekly sir. but i don't know to how to code for the weekly report.. help me sir iam trying to understand but i can't.. more example sir..

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

Dim Dbl1 As Double
Dim Dbl2 As Double
Dim Aux1 As String
Dim qtyadd As String
Dim subtotaladd As String
Dim itm As MSComctlLib.ListItem
Dim i As Integer
Set itm =...

Yes I did.

But

I don't know how to start sir, Please give some Idea, Thanks Sir.

Ive Already use code in post #4 instead of My code..
But still My Problem not Fixed.. My Code And your Code Same Output..

Scenario..
Customer Buy 3 Milk and 2 Nescafe then the Cashier Punch it...

Hello Sir,,
Sorry for My Mistake,,
This is what i mean if the Item is already in Listview Then there are two items in Listview like
Item--------------QTy
Milk--------------- 1...

This is what i mean if the Item is already in Listview Then there are two items in Listview like
Item--------------QTy
Milk--------------- 1
Sardines---------- 2
Then The Customer Decide a Buy...

Yes Does it. Sir Help me for that matter..

hello Guys,, I am Developing POS and I have A Code To Add An item into Listview Then Exactly Work.. Then My Problem is, what if the Customer Select two Similar Item let Say 3 Pack of Milk and 2...

sir thanks for the idea..
this is my code and run perfectly i am happy so much thank

Dim qtyadd As String
Dim subtotaladd As String
Dim itm As MSComctlLib.ListItem
Dim i As Integer


...

Hello Sir.. I am Using FindItem to Find item in listview but i dont how to Add the Qty of the same item in one..

Dim itm As MSComctlLib.ListItem

Set itm = ListView1.FindItem(txtCode.Text,...

Sir thanks.. This is my code..

Run Perfectly

Sub receipt()
Dim rsReport As New ADODB.Recordset
Dim reciept1 As String
Dim Purchase1 As String
Dim name1 As String

Sir It possible use the loop in listview? I am Saving Item in ListView Without Saving in DB,..

I Actually know to use loop if my item automatically Save in Db, But in My Problem, no I dont know...

How To iterate all the listview's rows What Should I do?

this is my Code..
What Should I Do? Doesnt Work

If txtCode.Text = ListView1.SelectedItem.ListSubItems.Add Then
ListView1.ListItems.Item(ListView1.ListItems.Count).ListSubItems.Add , ,...

In My Mind What if Customer Buy 3 Items of My Clothes then I forget to Enter the Qty into 3 , then I want ti enter Again the Barcode to Added the Another One, Then The Value of the One Item is...

Hello Guys.. I have a Code For Saving Item in ListView But My Problem is What If My First Column Same BarCode into Example:
Barcode QTY
001 5

And I add Another...

Hello Guys I have a DB using MSAccess 2003 and I have a Table DailyRecord which is DailyRecords Have and Every Record then I want to know how to Select the Daily Report, Weekly Report and Yearly...

Hello Guys,, I need Your help..
I Have A Code to Adding Item in Listview but I dont know how to update the Date.. Heres My Code
ListView1.ListItems.Add , , lblrp.Caption...

Hello Guys,, I am Trying Remove Item in ListView But my Code Does not Work..
heres my Code
Private Sub Command4_Click()
Dim choice As Integer
Dim str As String
Dim i As Integer


choice =...

Hello Sir But DataField not Allowed in Section 2.. What Should I Do? HElp me Sir

Hello Guys, I need Your help.. Because my Code not Working,, VB 6.0 Says: Type Mismatch.


Private Sub Command3_Click()
Dim update As Integer


update = "UPDATE [ProductInfo] SET Price = '" &...

Hello Guys.. I am Using Data Report an not using Data Environtment
This is My Code
Sub receipt()
Dim rsReport As New ADODB.Recordset

rsReport.Open "Select Receipt, ProductName, Quantity,...