پایگاه داده در ویژوال بیسیک - شروع تا پایان

[اوبالیت به بو]

در اين پست و اين پست و اين پست با نحوه بازيابي اطلاعات يك جدول آشنا شديم. هر سه روش يك كار رو انجام مي دن اما من از روش دوم يعني استفاده از Command رو پيشنهاد مي كنم. عرض كردم كه هيچ فرقي نمي كنه شما مي تونيد يك برنامه پايگاه داده رو به روش ها و شكل هاي مختلفي بنويسيد.
متد LoadAll من به اين شكل خواهد بود:

    Public Sub LoadAll()

        Set Cmd = New ADODB.Command

        Set Rst = New ADODB.Recordset

         

        Connect

                

        SQLQuery = "Select * From tblTest"

        

        Cmd.ActiveConnection = Conn

        Cmd.CommandType = adCmdText

        Cmd.CommandText = SQLQuery

        

        Rst.CursorType = adOpenKeyset

        Rst.CursorLocation = adUseClient

        Set Rst = Cmd.Execute

        

        Set frmMain.DataGrid1.DataSource = Rst

            frmMain.DataGrid1.Refresh

    End Sub

من از اين روش براي درج، حذف و ويرايش نيز استفاده خواهم كرد.