Public Class SQLQuery
    Inherits System.Web.UI.Page

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

    End Sub

    Protected Sub RadButton1_Click(sender As Object, e As EventArgs) Handles RadButton1.Click

        Me.RadGrid1.Rebind()
    End Sub

    Private Sub RadGrid1_NeedDataSource(sender As Object, e As Telerik.Web.UI.GridNeedDataSourceEventArgs) Handles RadGrid1.NeedDataSource
        Try
            Dim dh As New clsDatahandling
            Dim dt As New DataSet
            dt = dh.Get_Tabledata(Me.RadTextBox1.Text, False, True)
            Me.RadGrid1.DataSource = dt.Tables(0)
        Catch ex As Exception
            Me.Label1.Text = ex.Message
        End Try

    End Sub
End Class