elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.

 

 


Tema destacado: Tutorial básico de Quickjs


+  Foro de elhacker.net
|-+  Programación
| |-+  Programación General
| | |-+  .NET (C#, VB.NET, ASP)
| | | |-+  Programación Visual Basic (Moderadores: LeandroA, seba123neo)
| | | | |-+  Cualquier caracter en visual basic
0 Usuarios y 1 Visitante están viendo este tema.
Páginas: [1] Ir Abajo Respuesta Imprimir
Autor Tema: Cualquier caracter en visual basic  (Leído 2,078 veces)
UNFORMAT

Desconectado Desconectado

Mensajes: 40


Vaya torito ay torito guapo tiene botines y no v..


Ver Perfil
Cualquier caracter en visual basic
« en: 22 Agosto 2010, 12:23 pm »

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

Código
  1. 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!


En línea

Todos somos ignorantes, lo que pasa es que no todos ignoramos las mismas cosas...
Kasi

Desconectado Desconectado

Mensajes: 76



Ver Perfil
Re: Cualquier caracter en visual basic
« Respuesta #1 en: 22 Agosto 2010, 14:01 pm »

Pégale un vistazo a este enlace a ver si te sirve de algo.

http://msdn.microsoft.com/en-us/library/swf8kaxw.aspx

Un saludo


En línea

goldarg

Desconectado Desconectado

Mensajes: 13


Ver Perfil
Re: Cualquier caracter en visual basic
« Respuesta #2 en: 30 Agosto 2010, 16:00 pm »

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

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


saludos
En línea

79137913


Desconectado Desconectado

Mensajes: 1.169


4 Esquinas


Ver Perfil WWW
Re: Cualquier caracter en visual basic
« Respuesta #3 en: 30 Agosto 2010, 16:23 pm »

HOLA!!!

CODIGO:

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

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

GRACIAS POR LEER!!!
En línea

"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*
Páginas: [1] Ir Arriba Respuesta Imprimir 

Ir a:  
WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines