Récupérer une page web à travers une page asp.net
Soyez le premier à donner votre avis sur cette source.
Snippet vu 19 901 fois - Téléchargée 38 fois
Contenu du snippet
Cette fonction vous permet de récupérer une page HTML au travers d'une page ASP.Net
Cela ne m'a pas pris énormément de temps et vous avourez que c'est vraiment "simple" d'ouvrir des sockets désormais grâce à .Net (voir le code ci-dessous)
Exemple d'utilisation de cette fonction :
mettez ce code dans votre page .aspx
<%=RecupHTTP("http://www.google.fr/")%>
Cela ne m'a pas pris énormément de temps et vous avourez que c'est vraiment "simple" d'ouvrir des sockets désormais grâce à .Net (voir le code ci-dessous)
Source / Exemple :
Imports System.Net.Sockets Imports System.IO Public Function RecupHTTP(ByVal URL As String) As String ' Déclaration des variables Dim LeDomaine As Integer Dim LeURL As String = "" Dim LeHost As String = "" Dim LeChemin As String = "" Dim Resultat As String = "" Dim RecupHTTPChaine As String = "" Dim WebClient As New TcpClient() Dim WebStream As NetworkStream Dim WebWriter As StreamWriter Dim WebReader As StreamReader ' On découpe l'url envoyée en paramètre à la fonction LeDomaine = InStr(UCase(URL), "HTTP://") If LeDomaine > 0 Then LeURL = Mid(URL, LeDomaine + 7) Else LeURL = URL End If LeDomaine = InStr(LeURL, "/") If LeDomaine > 0 Then LeHost = Mid(LeURL, 1, LeDomaine - 1) LeChemin = Mid(LeURL, LeDomaine) Else LeHost = LeURL LeChemin = "/" End If ' On construit notre requete HTTP RecupHTTPChaine = "GET " & LeChemin & " HTTP/1.1" & vbCrLf & "Host: " & LeHost & vbCrLf & "Connection: Close" & vbCrLf & vbCrLf ' On ouvre une socket sur le port 80 WebClient.Connect(LeHost, 80) WebStream = WebClient.GetStream WebWriter = New StreamWriter(WebStream) WebWriter.Write(RecupHTTPChaine) WebWriter.Flush() WebReader = New StreamReader(WebStream) ' On stock la page html dans notre variable "Resultat" Resultat = WebReader.ReadToEnd() ' On ferme la socket WebStream.Close() WebClient.Close() ' On renvoi ce que l'on a récupéré RecupHTTP = Resultat End Function
Conclusion :
Exemple d'utilisation de cette fonction :
mettez ce code dans votre page .aspx
<%=RecupHTTP("http://www.google.fr/")%>
A voir également
- Asp net web pages
- Asp web pages - Meilleures réponses
- ASP / ASP.NET : Asp.net - ajouter un bloc de script javascript dans une page asp.net - CodeS Source - Guide
- ASP / ASP.NET : Ajout d'images et de boutons dynamiquement dans une page asp .net - CodeS SourceS - Guide
- ASP / ASP.NET : Protection de pages asp .net par mot de passe - asp .net protection by password - p - Guide
- Transformation xslt pour obtenir du code xtml valide à intégrer dans une page asp.net - Codes sources - ASP / ASP.NET (XML)
- Executer une application depuis page ASP.NET ✓ - Forum - ASP.NET
18 janv. 2006 à 11:50
é il ne me récupère pas le é ni le é mais me met un ? à la place as-tu une astuce pour palier à ce pb
encore merci pour le code
8 juil. 2003 à 19:20
@+
8 juil. 2003 à 17:43
8 juil. 2003 à 13:38
5 juin 2003 à 16:14
et sinon je voudrais l'utiliser dans une application professionnelle que je développe, question portabilité et simplicité j'aimerais me passer d'avoir à installer un composant et trouver une méthoque ASP pure, est ce que c'est possible ?
Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.