How do you establish a TLS 1.2 connectionRSS

• • Reply
  Jackxxx

  Member

  269 Points

  2866 Posts

  How do you establish a TLS 1.2 connection

  Jun 18, 2018 10:32 PM|Jackxxx|LINK

  Can anyone please explain how to establish a TLS 1.2 connection using VB.NET? My site is on a Win 2012 R2 server and is targeting .Net 4.5.

  Where does this code get added (web.config/global.asax or other or set to use TLS 1.2

  System.Net.ServicePointManager.SecurityProtocol = SecurityProtocolType.Tls12;

  Thank you
  
  Jackxxx
• • Reply
  Brando ZWZ

  Star

  9241 Points

  2845 Posts

  Re: How do you establish a TLS 1.2 connection

  Jun 20, 2018 06:59 AM|Brando ZWZ|LINK

  Hi Jackxxx,

  According to your description, I suggest you could add this line inside the gloal.asax file or ure it in a function, at the starting line.

  Liket this:

  Imports System.Net
  Imports System.Web.Optimization
  
  Public Class MvcApplication
      Inherits System.Web.HttpApplication
  
      Protected Sub Application_Start()
          ServicePointManager.SecurityProtocol = SecurityProtocolType.Tls12
          AreaRegistration.RegisterAllAreas()
          FilterConfig.RegisterGlobalFilters(GlobalFilters.Filters)
          RouteConfig.RegisterRoutes(RouteTable.Routes)
          BundleConfig.RegisterBundles(BundleTable.Bundles)
      End Sub
  End Class
  

  Best Regards,

  Brando

• • Reply
  Rahil Saxena

  Member

  10 Points

  8 Posts

  Re: How do you establish a TLS 1.2 connection

  Dec 18, 2018 05:35 AM|Rahil Saxena|LINK

  You may try this code:
  
  Public Shared Function processCCRequest(ByVal strRequest As String) As String
      'declare the web request object and set its path to the PayTrace API
  
      Dim ThisRequest As WebRequest = WebRequest.Create("https://beta.paytrace.com/api/default.pay")
      'configure web request object attributes
      ThisRequest.ContentType = "application/x-www-form-urlencoded"
      ThisRequest.Method = "POST"
  
      'encode the request
      Dim Encoder As New System.Text.ASCIIEncoding
      Dim BytesToSend As Byte() = Encoder.GetBytes(strRequest)
  
      'declare the text stream and send the request to PayTrace's API
      Dim StreamToSend As Stream = ThisRequest.GetRequestStream
      StreamToSend.Write(BytesToSend, 0, BytesToSend.Length)
      StreamToSend.Close()
  
      ServicePointManager.SecurityProtocol = (SecurityProtocolType)3072;
      ServicePointManager.SecurityProtocol = SecurityProtocolType.Tls
      System.Net.ServicePointManager.SecurityProtocol = SecurityProtocolType.Tls
      Dim TheirResponse As HttpWebResponse = ThisRequest.GetResponse
  
      Dim sr As New StreamReader(TheirResponse.GetResponseStream)
      Dim strResponse As String = sr.ReadToEnd
  
      sr.Close()
      Return strResponse
  End Function

  .Net Programming