You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
29 lines
919 B
29 lines
919 B
Public Class Mailatest
|
|
Inherits System.Web.UI.Page
|
|
|
|
Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
|
|
|
|
End Sub
|
|
|
|
'Protected Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
|
|
' Dim mailer As Object
|
|
' Mailer = Server.CreateObject("SMTPsvg.Mailer")
|
|
' mailer.FromName = "BWP Bülach"
|
|
' mailer.FromAddress = Me.txtfrom.Text
|
|
' mailer.RemoteHost = Me.txtmailserver.Text
|
|
' mailer.AddRecipient(Me.txtto.Text)
|
|
' mailer.Subject = Me.txtSubject.Text
|
|
' mailer.BodyText = Me.txtbody
|
|
' If Mailer.SendMail Then
|
|
' Response.Write("Mail sent...")
|
|
' Else
|
|
' Response.Write("Mail send failure. Error was " & Mailer.Response)
|
|
' End If
|
|
|
|
'End Sub
|
|
|
|
'Protected Sub btnclick(sender As Object, e As EventArgs) Handles Button1.Click
|
|
|
|
'End Sub
|
|
|
|
End Class |