;On ouvre un alias
alias site {
;On ferme la socket au cas où elle serai déjà ouverte
  sockclose site
;On ouvre la socket qui porte le nom "site" sur l'adresse "codyx.org" sur le port 80 (port des sites web)
  sockopen site codyx.org 80
}
;On réagis a l'evenement "sockopen", c'est a dire, quand la socket s'ouvre
on *:sockopen:site:{
;Si il y a une erreur, on le signale et on arrète la remote (halt)
  if ($sockerr) { echo -a IMPOSSIBLE DE CONNECTER LA SOCKET. | halt }
;On signale la connection de la socket
  echo -a Socket connecté.
;C'est ici qu'on récupère la source du site, grace au "GET"
;Ca c'est le protocole du web, ca vient pas du mirc
  sockwrite -nt $sockname GET http://codyx.org
;Le $crlf est un saut de ligne
  sockwrite -nt $sockname $crlf
  sockwrite -nt $sockname $crlf
}
;On "lit" les données récupérées
on *:sockread:site:{
;On stock dans une variable ce qui est récupéré
 sockread %a 
;On l'écrit dans le fichier codyx.txt
 write codyx.txt %a
;On efface la variable
 unset %a
}
;On préviens que le chargement est terminé, et donc que la socket est fermée
on *:sockclose:site:{
 echo -a Socket fermé. 
;On ouvre codyx.txt pour voir ce qu'on a récupéré
 run codyx.txt 
}

/// ---------------------------------------------------------------------
/// <summary>
/// Get the content of a web page.
/// </summary>
/// <param name="url"> The URL of the Web page. </param>
/// <returns> The content of the page. </returns>
/// ---------------------------------------------------------------------
public static string GetPageContent(string url) 
{
  HttpWebResponse httpWResponse = null; 
  StreamReader sr = null;
  string ans = null; 
  try

  {
    HttpWebRequest httpWRequest = (HttpWebRequest)WebRequest.Create(url); 
    httpWResponse = (HttpWebResponse)httpWRequest.GetResponse();    
    sr = new StreamReader(httpWResponse.GetResponseStream(), Encoding.GetEncoding("iso-8859-1")); 
    ans = sr.ReadToEnd();

   }

   catch


   {
     ans = null; 
   }

   finally

   {
     if (httpWResponse != null) httpWResponse.Close();     
     if (sr != null) sr.Close(); 
   }

   return ans; 
}

Dim contenuHTML As String
Private Sub Form_Load()
    WebBrowser1.Navigate2 "http://www.codes-sources.com"
End Sub
Private Sub WebBrowser1_DocumentComplete(ByVal  pDisp As  Object, URL As  Variant)
    contenuHTML = WB.Document.documentElement.innerHTML
End Sub

<?php
//fonction qui renvoie une chaine représentant le fichier situé à l'url
function get_document($url) {
    $file = fopen ($url,"r");
    if (!$file) {
        return null;
    }
    $doc = "";
    while (!feof ($file))
       $doc .= fgets ($file, 1024);
    fclose($file);
    return $doc;
}
?> 

//les imports qui vont bien
import java.net.URL;
import java.io.IOException;
import java.io.InputStream;
import java.io.BufferedReader;
import java.io.InputStreamReader;


public class Test {



        // la fonction
    public static String getDoc(String url) throws IOException{
        URL u = new URL(url);
        InputStream in = u.openStream();
        BufferedReader br = new BufferedReader(new InputStreamReader(in));
        String leDoc = "";String ligne;
        while (null != (ligne = br.readLine()))
            leDoc += ligne;
        return leDoc;
    }

}