Monthly Archives: Desember 2011

Threading Menggunakan Delegates

Threading satu cara menjalankan beberapa bagian program secara pararel. Tujuannya adalah agar aplikasi bisa lebih responsif.
Sebagai contoh:

Public Class AdmPropinsi
     ....
     Public Delegate Function GetDataDelegate() As System.Data.DataSet
	
     Public Function GetData() As System.Data.DataSet
     Dim ds As New DataSet
     Try
          Using conn
               If conn.State = ConnectionState.Closed Then conn.Open()
               Using cmd
                    cmd.Connection = conn
                    cmd.CommandText = "Q_Select_Propinsi"
                    cmd.CommandType = CommandType.StoredProcedure

                    da = New OleDbDataAdapter()
                    da.SelectCommand = cmd
                    da.TableMappings.Add("TBR_PROV", "pro")
                    da.Fill(ds, "pro")
                End Using
            End Using
        Catch ex As OleDb.OleDbException
            Throw Exception
	End Try
        Return ds
    End Function
End Class

Di Class diatas ada method GetData() yang akan mengambil informasi dari database dan disimpan ke dataset. Selain method juga didefinisikan delegate function yang juga bertipe sama, DataSet (Baris 3).
Untuk memanggil method diatas dan diproses secara paralel di thread yang lain,
Read the rest of this entry

Iklan