Data update
This commit is contained in:
parent
5150844a7d
commit
4bb20c9b71
7735 changed files with 38060 additions and 199180 deletions
|
|
@ -1,8 +0,0 @@
|
|||
with AWS.Client;
|
||||
with AWS.Response;
|
||||
with Ada.Text_IO; use Ada.Text_IO;
|
||||
procedure GetHttps is
|
||||
begin
|
||||
Put_Line (AWS.Response.Message_Body (AWS.Client.Get (
|
||||
URL => "https://sourceforge.net/")));
|
||||
end GetHttps;
|
||||
|
|
@ -1,7 +1,7 @@
|
|||
import net'http;
|
||||
import mbedtls'registration;
|
||||
import mbedtls'client'registration;
|
||||
|
||||
public program()
|
||||
public Program()
|
||||
{
|
||||
using(HttpClient client := HttpClient.open("https://www.google.com"))
|
||||
{
|
||||
|
|
|
|||
|
|
@ -1 +0,0 @@
|
|||
Invoke-WebRequest 'https://www.rosettacode.org'
|
||||
|
|
@ -1,2 +0,0 @@
|
|||
$wc = New-Object Net.WebClient
|
||||
$wc.DownloadString('https://sourceforge.net')
|
||||
|
|
@ -1,17 +0,0 @@
|
|||
Option Explicit
|
||||
|
||||
Const sURL="https://sourceforge.net/"
|
||||
|
||||
Dim oHTTP
|
||||
Set oHTTP = CreateObject("Microsoft.XmlHTTP")
|
||||
|
||||
On Error Resume Next
|
||||
oHTTP.Open "GET", sURL, False
|
||||
oHTTP.Send ""
|
||||
If Err.Number = 0 Then
|
||||
WScript.Echo oHTTP.responseText
|
||||
Else
|
||||
Wscript.Echo "error " & Err.Number & ": " & Err.Description
|
||||
End If
|
||||
|
||||
Set oHTTP = Nothing
|
||||
Loading…
Add table
Add a link
Reference in a new issue