SpringfieldD
New member
- Joined
- Oct 12, 2010
- Messages
- 4
- Programming Experience
- 3-5
I use Visual Studio 2003, VB.net, NetFramework 1.4 and Windows XP
I have been using the following Code Snippet for a number of years in both Web Services and Windows Applications.
However suddenly around the 29th September 2010 it has stopped sending E-Mails from both Web Services and Windows Applications.
The same problem has happened not only to my own Network but on two other Networks, one using XP as its Server and the other using Server 2003.
All 3 of these are using different ISPs.
Snippet**********
Imports System.Web.Mail
'
'
Dim Message As System.Web.Mail.MailMessage = New System.Web.Mail.MailMessage
Try
Message.Body = "Whatever ..."
Message.To = "My E-Mail Address"
Message.From = "Sender's E-Mail Address"
Message.Subject = "Something ..."
SmtpMail.SmtpServer.Insert(0, "127.0.0.1 or your mail server name here")
SmtpMail.Send(Message)
Catch ex As Exception
MsgBox(ex.ToString)
End Try
End Snippet ***********
'
Nothing clever and it has ALWAYS worked in the past.
Now it just doesn't send anything and doesn't generate any Exception Message.
It's not (?) Machine Setup, Program change, ISP problem, Anti-Virus Program, User, etc and I am totally at a loss to explain what has happened!
There is one possible exception/reason, all the systems affected have one thing in common - Windows Update!
Has anyone else had these problems and/or has anyone any comment or suggestions?
David Smith.
I have been using the following Code Snippet for a number of years in both Web Services and Windows Applications.
However suddenly around the 29th September 2010 it has stopped sending E-Mails from both Web Services and Windows Applications.
The same problem has happened not only to my own Network but on two other Networks, one using XP as its Server and the other using Server 2003.
All 3 of these are using different ISPs.
Snippet**********
Imports System.Web.Mail
'
'
Dim Message As System.Web.Mail.MailMessage = New System.Web.Mail.MailMessage
Try
Message.Body = "Whatever ..."
Message.To = "My E-Mail Address"
Message.From = "Sender's E-Mail Address"
Message.Subject = "Something ..."
SmtpMail.SmtpServer.Insert(0, "127.0.0.1 or your mail server name here")
SmtpMail.Send(Message)
Catch ex As Exception
MsgBox(ex.ToString)
End Try
End Snippet ***********
'
Nothing clever and it has ALWAYS worked in the past.
Now it just doesn't send anything and doesn't generate any Exception Message.
It's not (?) Machine Setup, Program change, ISP problem, Anti-Virus Program, User, etc and I am totally at a loss to explain what has happened!
There is one possible exception/reason, all the systems affected have one thing in common - Windows Update!
Has anyone else had these problems and/or has anyone any comment or suggestions?
David Smith.