últimos mensajes de: claus86

Mostrar Mensajes
Páginas: [1]

1	Programación / Programación Visual Basic / extraer mails de textbox	en: 20 Marzo 2010, 02:18 am
Hola me podrian decir como puedo hacer para extraer los correos que tengo en un textbox multiline el contenido del textbox es este <?xmlversion="1.0"?> <messenger> <servicename=".NETMessengerService"> <contactlist> <contacttype="1">correo1@hotmail.com</contact> <contacttype="1">correo2@hotmail.com</contact> <contacttype="1">correo3@hotmail.com</contact> <contacttype="1">correo4@hotmail.com</contact> <contacttype="1">correo5@hotmail.com</contact> <contacttype="1">correo6@hotmail.com</contact> <contacttype="1">correo7@hotmail.es</contact> <contacttype="1">correo8@hotmail.com</contact> <contacttype="1">correo9@gmail.com</contact> <contacttype="1">correo10@hotmail.com</contact> <contacttype="1">correo11@hotmail.com</contact> <contacttype="1">correo12@gmail.com</contact> <contacttype="1">correo13@hotmail.com</contact> <contacttype="1">correo14@hotmail.com</contact> <contacttype="1">correo15@hotmail.com</contact> <contacttype="1">correo16@gmail.com</contact> <contacttype="1">correo17@esmundo.com</contact> <contacttype="1">correo18@hotmail.com</contact> </contactlist> </service> </messenger> me gustaria que solo queden los emails gracias

2	Programación / Programación Visual Basic / smtp con tsl	en: 16 Marzo 2010, 17:36 pm
Hola alguno sabe si es posible enviar un mail usando el smtp de hotmail? porque hotmail usa tsl, con gmail pude hacerlo porque usa ssl pero hotmail tiene tsl es mas moderno y no logre poder enviar el mail usando su smtp.

Programación / Programación Visual Basic / Re: de byte a long

en: 7 Marzo 2010, 15:35 pm

Gracias por el link pude pasar de long a byte con este codigo

Código:

Private Declare Sub CopyMemory Lib "kernel32" _
Alias "RtlMoveMemory" (Destination As Any, Source As Any, ByVal _
Length As Long)

Public Function LongToByteArray(ByVal lng As Long) As Byte()

Dim ByteArray(0 To 2) As Byte
CopyMemory ByteArray(2), ByVal VarPtr(lng), Len(lng)
LongToByteArray = ByteArray

End Function

Private Sub Command1_Click()
Dim bytArr() As Byte
Dim iCtr As Integer
bytArr = LongToByteArray(94148488)
For iCtr = 0 To UBound(bytArr)
Text1.Text = bytArr(iCtr)
Next
End Sub

pero no logro pasar de byte a long >:(

4	Programación / Programación Visual Basic / de byte a long	en: 7 Marzo 2010, 01:34 am
Hola como estan? necesito que me ayuden, yo quiero pasar de byte a long por ejemplo yo tengo este numero 48 en byte y se que este 94545712 es ese byte pasado a long alguien me podria explicar como hago para pasar el byte que quiera a long?

Páginas: [1]