Visual Basic - Consultas sql

Life is soft - evento anual de software empresarial
 
Vista:

Consultas sql

Publicado por Wacho (2 intervenciones) el 05/11/2002 16:34:54
Hola agradezco a quien me pueda ayudar me inicio en la programacion y estoy desarrollando un pequeña aplicacion, con un bd en sql.
¿COMO PUEDO REALIZAR UN CONSULTA A UN CAMPO DEFINIDO COMO CARACTER Q CONTIENE UN MUNERO DE 14 DIGITOS. SI DESEO Q AL DIGITAR LOS TRES PRIMEROS ME LISTE TODOS LOS REGISTRO Q CUMPLAN ESA CONDICION. UTILIZANDO DAO 3.51

Gracias
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Consultas sql

Publicado por Rodolfo del Peru (454 intervenciones) el 05/11/2002 17:34:35
Creo haberte entendido que esto es lo que deseas?

SELECT * FROM TABLA WHERE
NRO_STRING >= '" & txtNumero & "00000000000'" &
AND NRO_STRING <= '" & txtNumero & "99999999999'"

Si pones como busqueda "123" esto te mostrara todos los "numeros" comprendidos en este rango "12300000000000 y 12399999999999"

Ojala te sirva.

Saludos desde Lima
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

SOLUCION MAS COMPLETA

Publicado por Jaime Enriquez (37 intervenciones) el 05/11/2002 19:00:11
ME PERMITO COMPLETAR LA RESPUESTA DE RODOLFO
SELECT * FROM TABLA WHERE NRO_STRING LIKE ' '" & txtNumero & "*' "

ESTO HACE QUE CUALQUIER REGISTRO QUE COINCIDA CON EL CRITERIO TECLEADO SE MOSTRARA SIN IMPORTAR RANGOS O DELIMITACIONES ADICIONALES SERIAN TODOS LOS QUE SU PARTE INICIAL COINCIDA CON LO QUE LE DICES

SI PONES EL ASTERISTO ANTES DE LA CADENA LO QUE HARA ES REUNIR LOS REGISTROS QUE CONTENGAN LA CADENA NO IMPORTANDO LA POSICION QUE GUARDE.

ESPERO TE SIRVA.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:SOLUCION MAS COMPLETA

Publicado por Wacho (2 intervenciones) el 07/11/2002 12:22:58
Hola jaime

De antemano agradezco tu colaboracion.
efectivamente he realizada la consulta como me explicas pero no tengo resultado en mi datagrid aparece un registro en blanco incluso si digito el numero completo.

te envio parte del codigo para q me ayudes a resolverlo GRACIAS.

Private Sub Command1_Click()
If Trim(numero_cuenta) <> "" Then
Dim reg_cuentas As Recordset
Set reg_cuentas = New Recordset
With reg_cuentas
.Source = "SELECT * FROM AMODISCO WHERE CUENTA LIKE ' " & numero_cuenta & "*' "
.ActiveConnection = conexion
.CursorType = adOpenStatic
.CursorLocation = adUseClient
.LockType = adLockOptimistic
End With
reg_cuentas.Open
Set Form1.DataGrid1.DataSource = reg_cuentas
Form1.Show
Else
MsgBox "Debe Indicar el Numero de Cuenta"
End If
End Sub

Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar