Weblogs Código

RecorteX

» 2005
73 usuarios y 244 recortes de código
Usuario

Contraseña
Crear cuenta
Estás viendo los recortes de la etiqueta 2005

RSS
Recortes: 2

Etiquetas relacionadas:
vbnet
ventana
forma
version
titulo
vb

Enviar mail (framework 2.0)

Este ejemplo usa el app.config

 
        Dim aConfig As Configuration.ConfigurationSettings
        Try
            Dim MailFrom As New MailAddress(aConfig.AppSettings("EmailFrom"))
            Dim MailTo As New MailAddress(aConfig.AppSettings("EmailTo"))
 
            Dim mailMsg As MailMessage = New MailMessage(MailFrom, MailTo)
 
            mailMsg.IsBodyHtml = True
            mailMsg.Priority = MailPriority.Normal
 
            mailMsg.Subject = "Subject for the mail"
            mailMsg.Body = ReadStringResource("Mail.htm")
 
            Dim SmtpMail As New Net.Mail.SmtpClient
            Dim theCredential As New Net.NetworkCredential("usuario", "contraseña")
            SmtpMail.Credentials = theCredential
            SmtpMail.Host = aConfig.AppSettings("EmailServer")
            SmtpMail.Send(mailMsg)
 
        Catch ex As Exception
            Console.WriteLine(ex.Message)
        End Try
 

Nombre Compañia y Version en la barra de titulo de aplicacion

Muchas veces tenemos tantas aplicaciones y en tantas versiones que no sabemos que o0nda con las que se estan correindo, asi que con este simple renglon podemos poner nombre compañia y version de nuestra aplicacion en el titulo de las forma que queramos. Espero les sea de utilidad.

 
     Me.Text = My.Application.Info.CompanyName & " - " & My.Application.Info.AssemblyName & " " & My.Application.Info.Version.ToString
 
Proyecto: Juanjo Navarro, 2006 - Diseño: Albin