Results 1 to 4 of 4

Thread: cr8 and vb6 question :)

  1. #1

    Thread Starter
    Junior Member
    Join Date
    Aug 2008
    Posts
    31

    cr8 and vb6 question :)

    hi guyz i really need your help...

    i made a program and a report here in my pc. it works fine and it print good. but the problem s, when i'm going to install to another computer.. it will not print... i dont know what's the problem... hope u can help me... thanks n advance and God bless

    here s my coding:

    'at the top of my coding
    Option Explicit

    Private crystal As CRAXDRT.Application
    Private report As CRAXDRT.report

    'my code in print button

    Set crystal = New CRAXDRT.Application
    Set report = crystal.OpenReport(App.Path & "\listreport.rpt")
    report.DiscardSavedData
    report.PrintOut False
    Set crystal = Nothing

  2. #2
    I'm about to be a PowerPoster! Hack's Avatar
    Join Date
    Aug 2001
    Location
    Searching for mendhak
    Posts
    58,333

    Re: cr8 and vb6 question :)

    It probably has nothing to do with your coding and everything to do with your installing.

    What installation and setup package are you using?
    What errors, if any, on the target machine are you getting?

  3. #3

    Thread Starter
    Junior Member
    Join Date
    Aug 2008
    Posts
    31

    Re: cr8 and vb6 question :)

    hi hack i'm using the easy installer for vb6. not the package and diployment wizard of vb6. i dont get any error from my program. actually when i click print it will show that it is printing because there is a message that printing page 1 of page 1. but suddenly, gone... do you think much better if im going to use the package and deployment wizard of vb6? or what would you suggets? thanks and God bless

  4. #4

    Thread Starter
    Junior Member
    Join Date
    Aug 2008
    Posts
    31

    Re: cr8 and vb6 question :)

    i can now print. but the problem is when i print again, still the previous report will print... example: first print "Atz". when i print "Zat", still "Atz" will appear. i already put report.DiscardSavedData.
    plz help thanks and God bless

    here's my code:

    Set crystal = New CRAXDRT.Application
    Set report = crystal.OpenReport(App.Path & "\listreport.rpt")
    report.DiscardSavedData
    Set report = Nothing
    Set crystal = Nothing

    Set crystal = New CRAXDRT.Application
    Set report = crystal.OpenReport(App.Path & "\listreport.rpt")
    report.PrintOut False
    Set crystal = Nothing

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •  



Click Here to Expand Forum to Full Width