Busqueda Sensitiva con SQL

[jvegae]

Buen dia, por favor ayudenme con un tema ..
Necesito realizar una consulta a una empresa por su RUC,
quiero saber como realizar una busqueda sensitiva..

Gracias.

[DexterGlue]

si pudieras aclarar un poco mejor lo que necesitas... por que por ejemplo te podria decir que si ese dato esta almacenado en un campo de la base de datos solo tienes que hacer los filtros correspondientes a la hora de hacer la consulta

Saludos

[jvegae]

Hola, bueno tengo una base de datos SQL SERVER 2008 .
Mi tabla se llama.. TB_EMPRESA
En mi Tabla tengo. los siguientes campos
ID-NOMBRE-DIRECCIÓN-GIRO DE NEGOCIO

En Vb.net 2008, tengo un Formulario CONSULTA. que me pide el nombre de la empresa como parametro.

Lo que quiero conseguir es.. cuando escriba la primera letra que inicie con un nombre de la empresa. me aparezca y muestra en un Gridview y asi sucesivamente, seguir escribiendo el nombre completo de la empresa y muestre el resultado final en la Grilla.
Cualquier pregunta adicional me lo haces llegar. Gracias

[DexterGlue]

En VB6 habia una forma de hacerlo, y es filtrando la consulta a medida que se daba el evento keydown (up)

En este caso una vez que cargues el datatable puedes filtrar los resultados a partir del datable igual en dependencia del tipo de grid que ocupes puedes usar las opciones de filtrado (al menos en VB6 recuerdo que eso se podia).

Espero te sirva de ayuda..

[edbc92]

mm...Haber, tus 2 objetos: 1 textbox y tu grilla /opcional un boton.

Ahora, hay varias formas en que podrías hacer esa consulta (como ya te dijeron por ahi sobre el keydown). En este caso te diria que lo hagas mejor en el evento TextChanged del textbox y la linea de codigo seria algo asi:

Código vb:

dim cn as new sqlconnection(strcn)
try
cn.open
 
sql="select*from empresa where nombre like @nom+'%'"
 
dim cmd as new sqlcommand(sql,cn)
cmd.parameters.addwithvalue("@nom",txtnombre.text)
 
'Ya luego solo lo metes en una datatable
 
dim dt as new datatable
dt.load(cmd.executereader)
 
dgvDatos.datasource=dt
 
catch ex as exception
msgbox("Error")
End try