or
Dim
oConn
As
OdbcConnection<br>
Dim
connectionString
As
String
<br>
connectionString = ConfigurationManager.ConnectionStrings(
"ODBCConnection"
).ToString<br>
oConn =
New
OdbcConnection(connectionString)<br>
commandString =
"SELECT sCode as Κωδικός, sName as Περιγραφή,sUnitOM as ΜΜ,sWhsalePr as Λιανική From smast where sCode like '"
+ TextBox1.Text +
"%' or sSuplCode like '"
+ TextBox1.Text +
"%' order by scode"
<br>
Dim
myAdapter
As
New
OdbcDataAdapter(commandString, oConn)<br>
Dim
productDataSet
As
DataSet =
New
DataSet<br>
myAdapter.Fill(productDataSet)<br>
RadGrid1.DataSource = productDataSet<br>
RadGrid1.DataBind()