reporting

[sparkash]

i don't have the crystal report add-in on my version of vb6, so is there another way outputting database data in a report format that i can print off.

If so is it possible to view it before i print it off?

Thank you in advance

[pvbangera]

use data report provided by visual basic. but unlike, crystal reports, its not so advanced and user friendly.

anyways, check it out

regards,

prakash

[jayakumar]

hi,

for small reports use rich text box control and print the data using window common dialog control.

[vwbug]

I have some issue here regarding data report. I have no problem previewing the report before printing it out. My issue here is after previewing the report I saw some mistakes and I would like to go back to my form to make some changes...and when I click the preview button again... I have this run time error '-2147418113 (800ffff)' Catastrophic failure. What do you mean by this...please help...thanks in advance..

[BryanJ]

When you go back to your form are you sure you are destroying your report object.


i.e Set objReport = nothing.

[vwbug]

Here is my coding..

Option Explicit
Public autoCann As Integer
---
---
---

Private Sub cmdPreview_Click()
UpdateRecord

ISOProject.cmdCanni_Grouping autoCann
'rptCannibalisation.Orientation = rptOrientLandscape
rptCannibalisation.Show
End Sub

---
---

Private Sub UpdateRecord()
Dim cnn As ADODB.Connection
Dim strCnn As String
Dim rst As ADODB.Recordset
Dim rst1 As ADODB.Recordset
Dim strSelect As String

Set cnn = New ADODB.Connection
cnn.Open "DSN=ISOmysql;UID=root;host=DALVINDERJIT;DATABASE=JJCM_ISO_DB"
'cnn.Open "DSN=ISOserver"

Set rst = New ADODB.Recordset
rst.CursorType = adOpenKeyset
rst.LockType = adLockOptimistic
rst.Open "Cannibalisation", cnn, , , adCmdTable

rst.AddNew
---
---
---
rst.Update

Set rst1 = New ADODB.Recordset
strSelect = "SELECT Cannid from Cannibalisation where Cannid = LAST_INSERT_ID();"
rst1.Open strSelect, cnn, , , adCmdText
autoCann = rst1!Cannid

End Sub

please advice....

[BryanJ]

My guess is that you should be closing your connection before exit the sub


Something like

conn.close
set cnn = nothing

[vwbug]

still not working mate..really stuck at this...damm..thanks for the advice though...