Chilkat HOME .NET Core C# Android™ AutoIt C C# C++ Chilkat2-Python CkPython Classic ASP DataFlex Delphi ActiveX Delphi DLL Go Java Lianja Mono C# Node.js Objective-C PHP ActiveX PHP Extension Perl PowerBuilder PowerShell PureBasic Ruby SQL Server Swift 2 Swift 3,4,5... Tcl Unicode C Unicode C++ VB.NET VBScript Visual Basic 6.0 Visual FoxPro Xojo Plugin
(VB.NET) Duplicate TLS 1.2 SOAP Request that uses .NET HttpWebRequestThis example shows how to duplicate a SOAP request that uses .NET's HttpWebRequest and requires TLS 1.2. string xmlRequest = "...envelope..." System.Net.ServicePointManager.SecurityProtocol = (SecurityProtocolType)3072; string url = "https://www3.gsis.gr/webtax2/wsgsis/RgWsPublic/RgWsPublicPort?WSDL"; HttpWebRequest req = (HttpWebRequest)WebRequest.Create(url); req.Method = "POST"; req.ContentType = "text/xml;charset=UTF-8"; byte[] reqBytes = new System.Text.UTF8Encoding().GetBytes(xmlRequest); req.ContentLength = reqBytes.Length; try { using (System.IO.Stream reqStream = req.GetRequestStream()) { reqStream.Write(reqBytes, 0, reqBytes.Length); reqStream.Flush(); reqStream.Close(); } } catch (Exception ex) { actionLogger.AddError(ex.Message, null); actionLogger.Validate(); } string xmlResponse = null; using (HttpWebResponse resp = (HttpWebResponse)req.GetResponse()) { try { using (System.IO.StreamReader sr = new System.IO.StreamReader(resp.GetResponseStream())) { xmlResponse = sr.ReadToEnd(); sr.Close(); } } catch (Exception ex) { actionLogger.AddError(ex.Message, null); actionLogger.Validate(); } finally { resp.Close(); } }
' This example assumes Chilkat HTTP to have been previously unlocked. ' See Global Unlock Sample for sample code. Dim success As Boolean Dim http As New Chilkat.Http Dim req As New Chilkat.HttpRequest req.HttpVerb = "POST" req.ContentType = "text/xml" req.SendCharset = True req.Charset = "utf-8" req.Path = "/webtax2/wsgsis/RgWsPublic/RgWsPublicPort?WSDL" Dim xmlRequest As String = "...SOAP envelope..." req.LoadBodyFromString(xmlRequest) http.FollowRedirects = True ' Chilkat will automatically offer TLS 1.2. It is the server that ' chooses the TLS protocol version. Assuming the server wishes to use ' TLS 1.2, then that is what will be used. Dim resp As Chilkat.HttpResponse = http.SynchronousRequest("www3.gsis.gr",443,True,req) If (http.LastMethodSuccess <> True) Then Debug.WriteLine(http.LastErrorText) Exit Sub End If Dim xmlResponse As String = resp.BodyStr Debug.WriteLine(xmlResponse) |
© 2000-2024 Chilkat Software, Inc. All Rights Reserved.