Cita:
Iniciado por mortiprogramador 
<saludos>
Y porque no hacer lo siguiente?
Usar una función que busque la primera ocurrencia del punto,
luego realizar un substring desde el inicio de la cadena hasta
la posición que de la función de la ocurrencia del punto
Y finalmente, usar otra función que busque la primera ocurrencia del slash
buscando en la subcadena obtenida, pero buscando la posiciòn de adelante
para atrás (es decir, que empiece desde el final de esta nueva subcadena),
y con esto se realiza un substring final teniendo en cuenta esta posiciòn
y así se tendría el resultado incluso sin hacer uso del foreach, que tal te suena?
Prueba y nos cuentas!
</saludos>
Gracias! Se me hizo la idea y use: InStr para contar los caracteres y Substring para conseguir el dato.
Código:
Dim resi, resf, link, ressv As String
link = "http://int15.ejemplo.com"
resi = InStr(link, "//")
resf = InStr(link, ".")
ressv = link.Substring(resi + 1, resf - resi - 2)
MsgBox(ressv)
Basicamente el instr de "resi" me decia la cantidad de caracteres que habia desde el inicio del texto hasta EL PRIMER /, no los 2 solo el primero.
El resf me decia la cantidad de caracteres hasta el "."
ressv es la respuesta final, que usa substring para obtener "int15".
Resi + 1 (Debido al / faltante)
resf - resi - 2 (Restar el "/" y el "." para obtener el dato limpio "int15".
Luego el msgbox te dice el dato.
No se como explicarlo mejor pero bue :B
Bueno, ya esta funcionando el codigo. Muchas gracias por darme la idea, ya que ha funcionado correctamente.
Slds