 Autor
|
Tema: Extraer direcciones de correo de un txt vb.net (Leído 5,328 veces)
|
|
usuario oculto
|
Alguien tiene el source para hacer esto? de exta expresión: [^,;\s]+@[^,;\s]+ extraer todas la plabras que la contengan desde un txt donde están las palabras , a otro en el que estan las que solo la contienen. Muchas gracias de antemano, lo necesito para añadirlo a un programa no para spammear.. he conseguido:
Dim r As Regex
Dim s As String
Dim m As Match
'
' para extraer links:
s = textbox5.text
r = New Regex("[^,;\s]+@[^,;\s]+")
Dim mc As MatchCollection = r.Matches(s)
If mc.Count > 0 Then
MsgBox("¡BINGO! hay {0} coincidencias", mc.Count)
Else
MsgBox("¡Sin coincidencias!")
End If
pero me falta que guarde en un txt las coincidencias saludos aqui en vb6 http://www.recursosvisualbasic.com.ar/htm/trucos-codigofuente-visual-basic/166-expresiones-regulares.htm
|
|
|
|
« Última modificación: 9 Julio 2011, 17:59 pm por mansan[a] »
|
En línea
|
Que le jodan a la salud mental! Fecha de registro: 16 Noviembre 2008, 17:38 años atrás users baneados  |
|
|
|
seba123neo
|
te falta hacer el For Each para recorrer las coincidencias, ahi solo haces el .Count para chequear que hay mas de 0 aca tenes un ejemplo: Expresiones Regularessaludos.
|
|
|
|
|
En línea
|
|
|
|
|
usuario oculto
|
Dim r As Regex
Dim s As String
Dim m As Match
'
' para extraer links:
s = TextBox5.Text
r = New Regex("[^,;\s]+@[^,;\s]+")
Dim mc As MatchCollection = r.Matches(s)
If mc.Count > 0 Then
For Each m In mc
Next
End If
y ahora después de for each, qué pongo para que se escriba en un textbox multínea o se escriba en un txt? Gracias de antemano, con que consiga esto ya finalizo mi herramienta.
|
|
|
|
|
En línea
|
Que le jodan a la salud mental! Fecha de registro: 16 Noviembre 2008, 17:38 años atrás users baneados |
|
|
|
seba123neo
|
busca un poco, busca como escribir en un archivo de texto desde vb .net, es mas facil que respirar, busca en internet y vas a encontrar mucho.
|
|
|
|
|
En línea
|
|
|
|
|
usuario oculto
|
me refiero a qué pongo aquí If mc.Count > 0 Then
For Each m In mc
'(supongo que algo por aki)
Next
para que se ponga en un textbox , lo que tu dices si se que hacerlo  gracias pro tu ayuda, espero que me respondas ^^ |
|
|
|
|
En línea
|
Que le jodan a la salud mental! Fecha de registro: 16 Noviembre 2008, 17:38 años atrás users baneados |
|
|
|
| Mensajes similares |
|
Asunto |
Iniciado por |
Respuestas |
Vistas |
Último mensaje |
|
|
|
Hotmail permite vincular 5 direcciones de correo “alias” a la cuenta principal
Noticias
|
wolfbcn
|
1
|
2,927
|
4 Febrero 2011, 18:30 pm
por Nakp
|
|
|
|
Los errores tipográficos en las direcciones de correo mal escritas abren ....
Noticias
|
wolfbcn
|
0
|
1,196
|
19 Septiembre 2011, 13:56 pm
por wolfbcn
|
|
|
|
Listado de direcciones de correo que no son contactos
Dudas Generales
|
alexrodriguez
|
0
|
1,431
|
15 Enero 2013, 00:38 am
por alexrodriguez
|
|
|
|
Direcciones de correo en LinkedIn expuestas con un simple complemento en el ...
Noticias
|
wolfbcn
|
0
|
1,022
|
2 Abril 2014, 13:16 pm
por wolfbcn
|
|
|
|
AYUDA Como extraer direcciones de streaming de una radio
Multimedia
|
jonatjan18
|
4
|
5,235
|
1 Diciembre 2015, 15:37 pm
por jonatjan18
|
 |
