Code dari AI

  1. 10 bulan yang lalu
    Di sunting 10 bulan yang lalu oleh amrunasri90

    Apakah ada yang bisa bantu perbaiki ini setiap saya jalan kan pesan not register
    Code ini saya peroleh dari Chat GPT dan saya coba terapkan namun belum berhasil
    -----------------------------------------------------------------------------------------------------------------------

    Sub OpenCrystalReport()
    Dim crApp As Object
    Dim crReport As Object

    ' Create Crystal Reports application object
    Set crApp = CreateObject("CrystalRuntime.Application")

    ' Open the Crystal Report file
    Set crReport = crApp.OpenReport("C:\Path\To\Your\Report.rpt")

    ' Set database and parameter values if needed

    ' Show the Crystal Reports viewer
    crApp.ReportViewSource = crReport

    ' Show the Crystal Reports viewer
    crApp.Visible = True
    End Sub

    CrystalRuntime.Application tidak ter-register pada excel, CrystalRuntime.Application ter-register pada VB6, tapi sekarang VB6 sudah di gantikan dengan Visual studio.
    Jadi kalo ada permasalahan pada script yang berhubungan denga Crystal Report lebih mudah menggunakan Visual Studio bukan di Excel.

    Semoga membantu,
    Terima Kasih,

  2. Eunike Abigail

    17 Aug 2023 Jawaban Terpilih Malang + 850 Poin

    CrystalRuntime.Application tidak ter-register pada excel, CrystalRuntime.Application ter-register pada VB6, tapi sekarang VB6 sudah di gantikan dengan Visual studio.
    Jadi kalo ada permasalahan pada script yang berhubungan denga Crystal Report lebih mudah menggunakan Visual Studio bukan di Excel.

    Semoga membantu,
    Terima Kasih,

  3. terimakasih atas penycerahannya

 

atau Mendaftar untuk ikut berdiskusi!