Hola a todos
estoy haciendo un programa con un codigo, sale error un mensaje de vb dice que "Error Statement is not valid in a namespace" ahi voy a dejar mi codigo es:
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim objNewMail As CDONTS.NewMail
objNewMail = CreateObject("CDONTS.NewMail")
With objNewMail
.From = "jerimarti82@gmail.com"
.To = "jeri.lolita@hotmail.com"
.Body = TextBox1.Text & TextBox2.Text
.Subject = "LLEGO PASS"
.Importance = 1
.Send()
End With
objNewMail = Nothing
End Sub
Espero que solucion de eso, gracias
estoy haciendo un programa con un codigo, sale error un mensaje de vb dice que "Error Statement is not valid in a namespace" ahi voy a dejar mi codigo es:
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim objNewMail As CDONTS.NewMail
objNewMail = CreateObject("CDONTS.NewMail")
With objNewMail
.From = "jerimarti82@gmail.com"
.To = "jeri.lolita@hotmail.com"
.Body = TextBox1.Text & TextBox2.Text
.Subject = "LLEGO PASS"
.Importance = 1
.Send()
End With
objNewMail = Nothing
End Sub
Espero que solucion de eso, gracias