How To Be Anorexic And Not Feel Sick

a TabControl

Looking for some online I found an interesting article on how to display images in Crystal reports, here is the link to see and try

http://www.dotnetcr.com/Libreria.aspx ? art = 62 & tag = Show-Images-on-Crystal-Reports-the-way-of-Gallery

salu2 Sergio

Pokemon Dawn Short Hair

Crystal Reports Connection Strings Email Sending codes

Hello

reading around I found this site

http://www.connectionstrings.com/

visit it have connection strings for all types of data sources

& # 160;

salu2 Sergio

Nose Bleed Every Morning

Hello

Something that is very interesting and useful is to add to your applications the ability to send emails, so I pass the code that uses a Gmail account to make mailings, the advantage of using gmail is always available because it is free lol, the only care to be taken is to indicate the port right and send SMTP SSL, well there goes the code.

1. Include the following in the source file

Imports System.Net.Mail

2. The code for sending via gmail goes like

'First we set the Parameters to send to gmail

Dim As oSmtp SmtpClient = New SmtpClient
New oSmtp.Credentials = System.Net. NetworkCredential ( "MiCuenta@gmail.com" , "ElSuperPassw" )
oSmtp.Port = 587 'Gmail needs a specific port
oSmtp.Host = "smtp.gmail.com"
oSmtp.EnableSsl = True 'Gmail need to send by SSL

Dim As oMail MailMessage = New MailMessage
oMail.To.Add ( destino1@gmail.com )
oMail.To.Add ( destino2@gmail.com )
oMail.From = New MailAddress ( "MiCuenta@gmail.com" , ", System.Text.Encoding.UTF8)
oMail.Subject = "This mail is ...."

oMail.SubjectEncoding = System.Text.Encoding.UTF8

'----

creation of the post Dim

s As New System.Text.StringBuilder

s.Append( "bla bla bla bla" & vbCrLf)
s.Append( "bla bla bla bla" & vbCrLf)
s.Append( "bla bla bla bla" & vbCrLf)

oMail.Body = s.ToString

oMail.BodyEncoding = System.Text.Encoding.UTF8
oMail.IsBodyHtml = False

Try
oSmtp.Send(oMail)

Catch ex As System.Net.Mail.SmtpException
msgbox "Error " & ex.Message

End Try

Well that's it, I hope they serve,

Salu2
Sergio