HTTPS/Authenticated: Difference between revisions

Content added Content deleted

Inline

@@ Line 30: / Line 30: @@
 password$ = "ignore"
-OPEN website$ & ":443" FOR NETWORK AS connection
+OPEN website$ & ":443" FOR NETWORK AS conn
+SEND "GET / HTTP/1.1\r\nHost: " & website$ & "\r\nAuthorization: Basic " & B64ENC$(username$ & ":" & password$) & "\r\n\r\n" TO conn
+WHILE WAIT(conn, 2000)
-SEND "GET / HTTP/1.1\r\nHost: " & website$ & "\r\nAuthorization: Basic " & B64ENC$(username$ & ":" & password$) & "\r\n\r\n" TO connection
+    RECEIVE data$ FROM conn
-WHILE WAIT(connection, 2000)
-    RECEIVE data$ FROM connection
     total$ = total$ & data$
     IF INSTR(data$, "</html>") THEN BREAK
 WEND
+CLOSE NETWORK conn
-CLOSE NETWORK connection
 PRINT total$</lang>