Anonymous user
HTTPS/Authenticated: Difference between revisions
m
→{{header|BaCon}}
Line 30:
password$ = "ignore"
OPEN website$ & ":443" FOR NETWORK AS
SEND "GET / HTTP/1.1\r\nHost: " & website$ & "\r\nAuthorization: Basic " & B64ENC$(username$ & ":" & password$) & "\r\n\r\n" TO
▲SEND "GET / HTTP/1.1\r\nHost: " & website$ & "\r\nAuthorization: Basic " & B64ENC$(username$ & ":" & password$) & "\r\n\r\n" TO connection
▲WHILE WAIT(connection, 2000)
▲ RECEIVE data$ FROM connection
total$ = total$ & data$
IF INSTR(data$, "</html>") THEN BREAK
WEND
▲CLOSE NETWORK connection
PRINT total$</lang>
| |||