none
como quitar los espacios de una palabra en una caja de texto? RRS feed

  • Pregunta

  • hola amigos tengo un sistema para consultas desde sql server y lo hago mediante un procedimiento alamcenado, lo que yo quiero es que si en una caja de texto ingreso una palabra o mas no me reconozca los espacios finales, supongamos que si realizo una búsqueda y en la caja de texto escribo "mecánica" si me hace la búsqueda, pero supongamos que si escribo la palabra asi "mecánica            " con algunos espacios ya no me realiza la búsqueda donde puedo implementar la herramienta en mi código les agradecería gracias amigos.

    Private Sub Button1_Click_1(sender As Object, e As EventArgs) Handles Button1.Click
            cn.Open()
            Me.Hide()
            Dim a As New Form2
            a.Show()
            Try
                Dim cmd As New SqlCommand("Busquedas", cn)
                cmd.CommandType = CommandType.StoredProcedure
                Dim para As New SqlParameter("@Busqueda", SqlDbType.VarChar)
                para.Size = 100
                para.Value = TextBox1.Text
                cmd.Parameters.Add(para)
                Dim da As New SqlDataAdapter
                da.SelectCommand = cmd
                da.SelectCommand.Connection = cn
                Dim ds As New DataSet
                da.Fill(ds, "Busquedas")
                a.DataGridView1.DataSource = ds.Tables("Busquedas")
                If ComboBox1.Text = "Título" Then
                    Dim titu As New SqlCommand("consul_titulo", cn)
                    titu.CommandType = CommandType.StoredProcedure
                    Dim titulo As New SqlParameter("@Titulo", SqlDbType.VarChar)
                    titulo.Size = 100
                    titulo.Value = TextBox1.Text
                    titu.Parameters.Add(titulo)
                    da.SelectCommand = titu
                    da.SelectCommand.Connection = cn
                    da.Fill(ds, "consul_titulo")
                    a.DataGridView1.DataSource = ds.Tables("consul_titulo")
                End If

    viernes, 27 de noviembre de 2015 20:08

Todas las respuestas

  • Hola amigo usa esto en tu procedimiento almacenado

    LTRIM(@string_to_trim);

    el LTRIM elimina los espacios evitando errores al hacer la consulta


    viernes, 27 de noviembre de 2015 20:16
  • En el Procedimiento Almacenado para eliminar posibles espacios antes y después seria:

    LTRIM(RTRIM(@STRING_A_VALIDAR))

    Si lo deseas hacer por código seria:

    para.Value = TextBox1.Text.Trim
    Saludos, espero te sirva.

    sábado, 28 de noviembre de 2015 23:28