ใครมีตัวอย่างการสร้างรายงานจาก Crystal Report แล้วไม่ติด รหัสผ่านข้อมูลบ้างคับ

Imports System.Text
Imports System.Data
Imports System.Data.OleDb
Module Mconn
    Public sql As String
    Public Conn As New OleDbConnection
    Public Cmd As New OleDbCommand
    Public ds As New DataSet
    Public dtAdapter As New OleDbDataAdapter
    Public strreprotname As String
    Public strConn As String
    Public sb As New StringBuilder()
    Sub Connnect()
        strConn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source= " & Application.StartupPath & "\db_wshop.mdb"
        Conn = New OleDbConnection()
        With Conn
            If .State = ConnectionState.Open Then .Close()
            .ConnectionString = strConn
            .Open()
        End With
    End Sub
End Module