Buongiorno a tutti
stò creando un sito in silverlight
e son rimasto bloccato per un errore strano nella risposta da parte del Webservice
relativamente al metodo di invio mail.
<WebMethod()> _
Public Function invia_mail(ByVal nome As String, ByVal oggetto As String, ByVal email As String, ByVal messaggio As String) As String
Dim smtp As New SmtpClient("smtp.xxxxxxxx.com")
Dim mail As New MailMessage
Dim inviato As String
Dim accesso As New System.Net.NetworkCredential("ordini@xxxxxxx.com", "yyyyy")
smtp.UseDefaultCredentials = False
smtp.Credentials = accesso
smtp.DeliveryMethod = SmtpDeliveryMethod.Network
mail.Subject = oggetto
mail.From = New MailAddress("info@xxxxxxx.com")
' mail.To.Add("ordini@xxxxxxx.com")
mail.To.Add("ordini@xxxxxxx.com")
mail.To.Add(email)
mail.Body = nome & vbCrLf & vbCrLf & messaggio
Try
smtp.SendAsync(mail, New Object)
inviato = "True"
Catch ex As Exception
inviato = "False"
End Try
Return inviato
End Function vi spiego:
Il metodo se eseguito direttamente restituisce True e la Mail arriva
se invece mando in esecuzioene il sito e richiamo il metodo con questo codice:
Dim servizio As New ServiceReference1.WebService1SoapClient
servizio.invia_mailAsync(TextBox1.Text, TextBox2.Text, TextBox3.Text, TextBox4.Text)
AddHandler servizio.invia_mailCompleted, AddressOf mail_response mi viene fuori un errore nella funzione del refence.vb:
Public Function Endinvia_mail(ByVal result As System.IAsyncResult) As ServiceReference1.invia_mailResponse Implements ServiceReference1.WebService1Soap.Endinvia_mail
Dim _args((0) - 1) As Object
Dim _result As ServiceReference1.invia_mailResponse = CType(MyBase.EndInvoke("invia_mail", _args, result), ServiceReference1.invia_mailResponse)
Return _result
End Function l'errore è
"Errore del server remoto: NotFound."
cosa può essere?
Modificato da darkeric il 28 gennaio 2012 10.01 -