Teman-teman mohon bantuannya.

Saya menggunakan script dibawah ini untuk menampilkan Report.

Pada design Report saya hanya masukkan satu field yaitu: Field *Nama*.

Kalau saya menggunakan query seperti teks yang diberi warna biru dibawah,
kenapa Reportnya kosong/ blank.
Tapi kalau query menggunakan tanda bintang (***)  seperti ini:     *rs.Open
"select * from tbmasterretrib", cnn, adOpenStatic, adLockOptimistic

Reportnya menampilkan nama-nama yang ada pada field table di database.
*Kenapa bisa begitu. Yang saya inginkan menggunakan code query seperti
dibawah. Tidak perlu menggunakan Select *

Option Explicit
Dim Rpt As New cr3
Dim cnn As New ADODB.Connection
Dim rs As New ADODB.Recordset

Private Sub Form_Load()
    cnn.Open "Driver={MySQL ODBC 3.51 Driver};Server=
localhost;Database=db1; User=root;Password=sayalupa;Option=3;"
    cnn.CursorLocation = adUseClient

    *rs.Open "select Nama from tbmasterretrib", cnn, adOpenStatic,
adLockOptimistic*
    Rpt.DiscardSavedData
    Rpt.Database.SetDataSource rs

    CRViewer1.ReportSource = Rpt
    CRViewer1.ViewReport
    CRViewer1.Zoom 100
    Set Rpt = Nothing
End Sub

Private Sub Form_Resize()
    CRViewer1.Top = 0
    CRViewer1.Left = 0
    CRViewer1.Height = ScaleHeight
    CRViewer1.Width = ScaleWidth
End Sub

Kirim email ke