martes, 27 de junio de 2023

Server certificates should be verified during SSL/TLS connections VB.NET

Si llegaste hasta aqui, es porque ya navegaste medio internet y te pasaste horas buscando esta solucion, recalco que esta solucion lo realice hace muchos años, pero por motivos laborales me lo solicto un compañero, lo vuelvo ha agregar para ti que llegasta hasta aqui ha buscar esta solucion.Saludos 


Sub EnviarCorreoNew(Byval pMensajeHTML as String,Byval pAsunto as String)

Try

Dim _Message As New System.Net.Mail.MailMessage()

Dim _SMTP As New System.Net.Mail.SmtpClient

'CONFIGURACIÓN DEL STMP

_SMTP.Credentials = New System.Net.NetworkCredential("bserti@bserti.com", "bserti2023")

_SMTP.Host = "smtp.gmail.com"

_SMTP.Port = 587

_SMTP.EnableSsl = True

' CONFIGURACION DEL MENSAJE

_Message.[To].Add("ccarrasco@bserti.com") 'Cuenta de Correo al que se le quiere enviar el e-mail

_Message.From = New System.Net.Mail.MailAddress("elvergonzales@bserti.com", "Confirmación de registro de feria", System.Text.Encoding.UTF8) 'Quien lo envía

_Message.Subject = pAsunto'Me.txtAsunto.Text.ToString 'Sujeto del e-mail

'_Message.SubjectEncoding = System.Text.Encoding.UTF8 'Codificacion

_Message.Body =pMensajeHTML 'Me.txtMensaje.Text.ToString 'contenido del mail

'_Message.BodyEncoding = System.Text.Encoding.UTF8

'_Message.Priority = System.Net.Mail.MailPriority.Normal

_Message.IsBodyHtml = True

'ENVIO

 '           AddHandler(ServicePointManager.ServerCertificateValidationCallback, AddressOf ValidateRemoteCertificate)


  'ServicePointManager.SecurityProtocol = SecurityProtocolType.Tls Or SecurityProtocolType.Tls11 Or SecurityProtocolType.Tls12


System.Net.ServicePointManager.ServerCertificateValidationCallback =

Function(se As Object,

  cert As System.Security.Cryptography.X509Certificates.X509Certificate,

  chain As System.Security.Cryptography.X509Certificates.X509Chain,

  sslerror As System.Net.Security.SslPolicyErrors) True

  

_SMTP.Send(_Message)

'MessageBox.Show("Mensaje enviado correctamene", "Exito!", MessageBoxButtons.OK)

Catch ex As System.Net.Mail.SmtpException

'MessageBox.Show(ex.ToString, "Error!", MessageBoxButtons.OK)

Response.Write(ex.ToString)



End Try


End Sub

domingo, 26 de marzo de 2023

martes, 14 de marzo de 2023

GRIDVIEW FORMATO TEXTO A COLUMNA EN ESPECIFICO

Estimados , de hecho si llegaste aqui, es porque no has encontrado este codigo facilmente por internet, pues aqui te lo paso.


  int columnIndex = 0;

                    foreach (GridViewRow row in oGridView.Rows)

                    {

                        foreach (DataControlFieldCell cell in row.Cells)

                        {

                            if (cell.ContainingField is BoundField)

                                if (((BoundField)cell.ContainingField).DataField.Equals("Cantidad"))

                                {


                                }

                                else

                                {

                                    //cell.CssClass = "text";

                                    cell.Attributes.Add("style", "mso-number-format:\\@");


                                }



                            columnIndex++; // keep adding 1 while we don't have the correct name

                        }


                    }

                 

domingo, 19 de febrero de 2023

PROBLEMA AL FIRMAR "Algoritmo especificado no es valido"

 Cuando tengamos este mensake PROBLEMA AL FIRMAR "Algoritmo especificado no es valido" 

sábado, 18 de febrero de 2023

SUNAT - DECLARACION DE NOTA DE CREDITO EMITIDA A FACTURA CON PERIODO DISTINTO - DECLARA FACIL

Si tenemos una nota de credito por ejemplo 01/03 y tu factura relacionada es del periodo anterior por ejemplo 31/12 entonces debes de declararlo en la casilla 102, si fuera del mismo periodo declararlo en la casilla 100.



Slds