SQL command and vb6

[abu taher]

In my access file I write code in query

SELECT AccountInfo.incategory, Sum(AccountInfo.InAmount) AS TotalAmount
FROM AccountInfo
WHERE (((AccountInfo.Date)>=#1/1/2009# And (AccountInfo.Date)<=#12/31/2009#))
GROUP BY AccountInfo.incategory;

It show the total amount between 01-01-09 to 31-12-09 and it show in report. but in vb6 I want I select this two date and the total amount will show in report. what I need to do?

[vb5prgrmr]

where date = thisdate or date = thatdate



Good Luck

[abu taher]

another thing in this query date is not show. cause if I show the date then it not work. if I use your code in vb6 then how it find out the amount and category by date. cause date not show. please details.

[si_the_geek]

Thread moved to 'Database Development' forum (the 'VB6' forum is only meant for questions which don't fit in more specific forums)

I think you should be the one to give more details - because I don't actually know what you are trying to do, or which part(s) of it you are having a problem with.

[abu taher]

I made a query in access. here three field. Incategory, INamount, date. and I write code what I write above. here I write date. so the data show between this date. I want I select this date from vb6 not from access and the data show in vb6.

[abu taher]

I write in data environment:

SELECT AccountInfo.incategory, Sum(AccountInfo.InAmount) AS SumOfInAmount FROM AccountInfo where Date and Date between DTFr.value and DTTo.vlaue GROUP BY AccountInfo.incategory;

DTFr and DTTo is dtpicker. and I write code in a button for show the report is

     Load DataEnvironment1
    With DataEnvironment1
    If .Command3.State <> 0 Then .Command3.Close
     .Command3 Format(DTFr.Value, "dd/mm/yyyy"), Format(DTTo.Value, "dd/mm/yyyy")
     End With
datareport1.Show

but a error msg show:
"compile error:
argument not optional"
and then select this word

    If .Command3.State <> 0 Then .Command3.Close

now what I need to do?

[FunkyDexter]

I think you're saying that you want a user to be able to select their own dates, rather than hard coding them into your sql string, is that right?

If so you just need to put a pair of datepickers onto a form and use their values as parameters when issuing your sql statement. The ADO tutorials at the top of the forum will show you exactly how to do this.

[abu taher]

why show this msg:
"compile error:
argument not optional"

[si_the_geek]

That is one of the errors covered by the article What does this error mean, and how do I fix it? from our Classic VB FAQs (in the FAQ forum)

If you want more help than that, you'll need to give us more details - such as which line the error occurred on, etc.