Recomendamos: Directorio páginas móviles - Wikipedia PDA Desde 2000 ofrecemos los mejores contenidos sobre movilidad

PDA

 
RSS de noticias  · RSS Noticias
· Otros RSS
Versiones PDA y AvantGo. Foro móvil. Versiones PDA y móviles
Noticias
Artículos
Tutoriales
Análisis
Modelos de PDAs
Comparador de PDAs
Programas PDA

Canales para PDA
Enlaces

Enviar Noticias
Recomendados
Más votados

Regístrate
Tu cuenta
Miembros
Foros
Chat
Eventos
Galería de Fotos

Principal
Crónicas de kedadas
Fotos de las kedadas
Foro específico

Buscar
Versión PDA-wireless
Revista PDAUser
Para empresas

Colaboradores
Nosotros
Enlázanos

EN TU BOLSILLO

Edición PDA para AvantGo

Más sobre edición móvil
  

FEEDS RSS
Noticias                   







Más feeds...

LINKS RECOMENDADOS


     


Palm España

FOROS

Regístrate !!Regístrate !!     EntrarEntrar     PerfilPerfil     Mensajes FavoritosMensajes Favoritos
Mensajes privadosMensajes privados     BuscarBuscar     FAQFAQ

¡Antes de publicar una pregunta usa el buscador y
lee las Normas del Foro!

Enviar correos VB.net 2008 para WinCE

Publicar nuevo tema   Responder al tema   Foros de discusión » Programación Móvil Hilo Anterior | Siguiente
Añadir a Mensajes Favoritos
Autor Mensaje
Escorpion_Negro
[Mis primeros pasitos]



Registrado: 10 Feb 2016
Mensajes: 1


 
MensajeMie 10 Feb 2016 21:25 | Enviar correos VB.net 2008 para WinCE Responder citando

Hola estimada Gente.

Es mi primera vez en el foro ya que no tengo experiencia con desarrollo de aplicaciones para PDA con Vb.net 2008 en sistema operativo WinCE, dentro de la rutina de aplicación necesito enviar un correo con la PDA. Tengo dos rutinas para enviar correo pero no puedo hacer que la DPA me envié el correo.


Código:
Imports Microsoft.WindowsMobile.PocketOutlook
Public Class Form1
    Private HQPhoneNo As String



    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        EnviarCorreo("", "Envio de Correo", "enviando correo de prueba")
        EnviarCorreo2()

    End Sub

    Sub EnviarCorreo2()

        Dim Sesion As OutlookSession = New OutlookSession
        Dim eMail As EmailMessage = New EmailMessage
        Dim Recipiente As New Recipient("micrreo@gmail.com")
        'eMail.Attachments.Add(New Attachment(ruta y nombre del fichero a adjuntar))
        eMail.To.Add(Recipiente)
        eMail.Subject = "Texto del Asunto del Mensaje"
        eMail.BodyText = "Cuerpo del Mensaje"
        eMail.Send("correo.destino@gmail.com")
        'Enviar el correo
        Sesion.Dispose()
        MessagingApplication.Synchronize("correo.destino@gmail.com")
    End Sub
    Sub EnviarCorreo(ByVal ficheroAdjunto As String, ByVal Asunto As String, ByVal Cuerpo As String)
        Dim Sesion As Microsoft.WindowsMobile.PocketOutlook.OutlookSession = New Microsoft.WindowsMobile.PocketOutlook.OutlookSession
        Dim eMail As Microsoft.WindowsMobile.PocketOutlook.EmailMessage = New Microsoft.WindowsMobile.PocketOutlook.EmailMessage
        Dim Recipiente As Microsoft.WindowsMobile.PocketOutlook.Recipient = New Microsoft.WindowsMobile.PocketOutlook.Recipient("micorreo@gmail.com")

        Try
            ' eMail.Attachments.Add(New Attachment(ficheroAdjunto))
            eMail.To.Add(Recipiente)

            eMail.Subject = Asunto
            eMail.BodyText = Cuerpo
            eMail.Send("correo.destino@gmail.com")
            MessagingApplication.Synchronize()
            MsgBox("correo.destino@gmail.com")
        Catch ex As Exception
            MsgBox("Error: " & ex.Message, MsgBoxStyle.OkOnly, "Aviso")
        End Try
    End Sub
End Class



[Firma sólo visible para usuarios registrados]
scooter
[Inventaste Palm OS?]



Registrado: 02 Sep 2005
Mensajes: 22145
Ubicación: Aquí


 
MensajeJue 11 Feb 2016 17:24 | Responder citando

Mmmmmm.
Desde 2008 han pasado 8 años. Yo iría pensando en usar algo "un poco" más actual.
¿O es para alguna pda ruguetizada de uso industrial que aún use esos sistemas de hace una década?


[Firma sólo visible para usuarios registrados]
Mostrar mensajes de anteriores:   
Publicar nuevo tema   Responder al tema    Foros de discusión » Programación Móvil
Todas las horas son GMT + 2 Horas
  Publicidad
 
 


Hilo Anterior | Siguiente
Añadir a Mensajes Favoritos



Cambiar a:  
Puedes publicar nuevos temas en el Foro
No puedes responder a temas en el Foro
No puedes editar sus mensajes en el Foro
No puedes borrar sus mensajes en el Foro
No puedes votar en encuestas en el Foro

más noticias...

 

más reportajes...

   
Información legal   PublicidadColabora con nosotrosEn tu web (RSS)  Contacta con nosotros | Sitemap 
Dirección y Producción: José Julio Ruiz
Todas las marcas registradas y copyrights que aparecen en este sitio web pertenecen a sus respectivos dueños Keide Advanced Solutions:
movilidad e Internet
    

| Modelos de Palm | Wikipedia para PDA | Páginas móviles |
 © Año 2000-2013    v 5.1