<pre> Sub YEN() Dim ds As New DataSet Dim da As New OleDbDataAdapter Dim dt As New System.Data.DataTable CN_AC() sorgu = "SELECT * FROM PERTTPDKS" End If da = New OleDb.OleDbDataAdapter(sorgu, cn_oracle) da.Fill(dt) .DataSource = dt.DefaultView ' ds = New DataSet() 'da.Fill(ds, "ST") ' .DataSource = ds.Tables("ST").DefaultView End With CN_KAPA() End Sub
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)