Report Genterate

[sengmca]

H dears

this is senny, its my another module to developt the project for day to day production report, Here i am using one form to get the information of date between which date you want production report.For exampl if i want production report of 1-3-2007 to 5-3-2007, then i have to display the production report of five days.According to my project i decided to use Microsoft Excell sheet.But i have no knoledge abt Excell Design and codeing.In the report i have use the Four coloumns , the name like Ordinary,Studen t,Service,Amt.C an anyone tell the procudure for adding Excell sheet in project and How to check the number of days b/w dates.

regards.
senny

[ansumansahu]

H dears

this is senny, its my another module to developt the project for day to day production report, Here i am using one form to get the information of date between which date you want production report.For exampl if i want production report of 1-3-2007 to 5-3-2007, then i have to display the production report of five days.According to my project i decided to use Microsoft Excell sheet.But i have no knoledge abt Excell Design and codeing.In the report i have use the Four coloumns , the name like Ordinary,Studen t,Service,Amt.C an anyone tell the procudure for adding Excell sheet in project and How to check the number of days b/w dates.

regards.
senny

To start with you will have to Set a reference in you VB project to the Microsoft Excel Object Library.

Then you can create a new excel application, then a excel workbook and a excel worksheet etc.

thanks
ansuman sahu

[cmrhema]

Try out data reports if you can.
Put on the labels on the page header and textboxes on the details section in the datareport
Name the the textboxes in the datareport excatly similiar to your fields in database.
eg if your fields are empno,joindate, expdate then name it exactly the same.
Now go to vb
use dtpicker control for date and put down this code
'Here M2 is a recordset
M2.Open "select customer_id,ord erno,delivery_d ate,order_date " & _
"from emp where delivery_date>= #" & DTPicker1.Value & "# and delivery_date <=# " & DTPicker2.Value & "# order by delivery_date", _
Mycon, adOpenDynamic, adLockOptimisti c
Set DataReport2.Dat aSource = M2
DataReport2.Win dowState = vbMaximized
DataReport2.Sho w vbModal
M2.Close
Mycon.Close

'mycon is connection