Le sous-marin privé Button1_Click (expéditeur de ByVal comme System.Object, ByVal e comme System.EventArgs) manipule Button1.Click
Faible client en tant que nouveau web client ()
Faible résultat comme corde
Faible xdoc en tant que nouveau XmlDocument
Faible mgr en tant que nouveau XmlNamespaceManager (xdoc.NameTable)
Essai
résultat = Encoding.UTF8.GetString (client.DownloadData (« http://maps.google.com/maps/geo?q=austin,+tx+78730&output=xml&key=abcdefg "))
xdoc.LoadXml (résultat)
mgr.AddNamespace (« anyPrefix », « http://earth.google.com/kml/2.0 ")
Me.TextBox1.Text = xdoc.SelectSingleNode (« /anyPrefix : kml/anyPrefix : Réponse/anyPrefix : Statut/anyPrefix : code », mgr) .InnerText
Me.TextBox2.Text = xdoc.SelectSingleNode (« /anyPrefix : kml/anyPrefix : Réponse/anyPrefix : Statut/anyPrefix : demande », mgr) .InnerText
Crochet
MsgBox (« incapable de télécharger des données ! ")
Essai de fin
Sous-marin d'extrémité
|