Cualquier caracter en visual basic

Iniciado por UNFORMAT, 22 Agosto 2010, 12:23 PM

0 Miembros y 1 Visitante están viendo este tema.

UNFORMAT

Hola, tengo un pequeño problema que no se como solucionar en VB6
El siguiente código:

Código (vb) [Seleccionar]
ElseIf saludo(list1.ListIndex) = "http://bit.ly/" & "NOSESABE" Then


lo que quiero es alguna funcion o algo... para poder hacer una "especie" de asterisco * en las consultas de access, ya que no se sabe que viene detrás, ¿como puedo hacerlo?

he probado con %, *.... y nada... saludos y gracias!
Todos somos ignorantes, lo que pasa es que no todos ignoramos las mismas cosas...

Kasi


goldarg

si utilizas consultas sql para traer los datos al recorset seria asi

"Select * from TuTabla Where TuCampo like 'http://bit.ly/*'"

este intrucion te va a traer todos los registros que empiecen con "http://bit.ly/"

si tiene varios registros tenes que recorrer el recorset

do while not rs.eof()
     if saludo(list1.ListIndex) =rs("TuCampo").value then
         exit do
     endif
     rs.movenext
loop



saludos

79137913

HOLA!!!

CODIGO:

Código (vb) [Seleccionar]

ElseIf Mid(saludo(list1.ListIndex), 1, Len("http://bit.ly/")) = "http://bit.ly/" Then


Anda perfecto, si necesitas alguna explicacion sobre el cambio que aplique avisame y lo explico mas detalladamente.

GRACIAS POR LEER!!!
"Como no se puede igualar a Dios, ya he decidido que hacer, ¡SUPERARLO!"
"La peor de las ignorancias es no saber corregirlas"

79137913                          *Shadow Scouts Team*