How Can I Return Data From A Database And Fill A Data Grid View?

Hi ! I have a textbox and a Search button. When the user inputs a value and press the button, i  want a datagrid to be filled.

The following code runs:

Dim connect As New Data.SqlClient.SqlConnection( _

"Server=SrvnameSQLEXPRESS;Integrated Security=True; UID= ;password= ; database=dtbsname")

connect.Open()

Dim cmd As New SqlCommand

Dim valor As New SqlParameter("@valor", SqlDbType.VarChar, 50)

cmd.CommandText = "Ver_Contactos_Reducido"

cmd.CommandType = CommandType.StoredProcedure

cmd.Connection = connect

cmd.Parameters.Add(valor)

cmd.Parameters("@valor").Value = texto

Dim adapter As New SqlDataAdapter(cmd)

Dim ds As New System.Data.DataSet()

adapter.Fill(ds)

GridViewContactos.DataSource = ds

GridViewContactos.DataBind()

connect.Close()

I drag a datagrid on the page and only changed its Id.

Into the SQL database the stored procedure is the following:

ALTER PROCEDURE [dbo].[Ver_Contactos_Reducido]

(@Valor VARCHAR(100))

AS

BEGIN

SET NOCOUNT ON;

SELECT NombreRazonSocial, Nombre, Apellido,TelefonoLaboral,

Interno, TelefonoCelular, Email1, Organizacion

FROM CONTACTOS

WHERE NombreRazonSocial = @Valor OR Nombre = @Valor OR Apellido = @Valor OR  TelefonoLaboral = @Valor OR Interno = @Valor OR

TelefonoCelular =@Valor OR Email1 = @Valor OR Organizacion= @Valor

END

When i run the page i can't see the datagrid, and after i enter a text and press the button, nothing happens. What am i doing wrong??

Thks!!