Asp. net ile hava durumu vb alma - Papatyam Forum

Papatyam Forum

Go Back   Papatyam Forum > ..::.BİLGİSAYAR & TEKNOLOJİ.::. > Web Master > asp.net

Yeni Konu aç  Cevapla
 
Seçenekler
Alt 29 March 2008, 13:00   Mesaj No:1

tamerr89

Papatyam Paylaşımcı Üyesi
Avatar Otomotik
Durumu:tamerr89 isimli Üye şimdilik offline konumundadır
Papatyam No : 1196
Üyelik T.: 09 December 2007
Arkadaşları:0
Cinsiyet:
Yaş:34
Mesaj: 212
Konular:
Beğenildi:
Beğendi:
Takdirleri:10
Takdir Et:
Konu Bu  Üyemize Aittir!
Standart Asp. net ile hava durumu vb alma

Asp. net ile hava durumu vb alma

Gethtml fonksiyonuyla html sayfasi veya xml dosyanin içerigini getirir

<%@ page language="VB" %>
<%@ Import Namespace="System.Data" %>
<%@ Import Namespace="System.Net" %>
<%@ Import Namespace="System.IO" %>
<script language="VB" runat="server">
Private Sub downloadButton_OnClick(ByVal sender As Object, ByVal e As System.EventArgs)
Dim url As String = "http://xml.progen.com.tr/havadurumu....istanbul"
Dim bilgicek As String = GetHTML(url)
Dim ds As String = InStr(1, bilgicek, "<durum>&quot
Dim de As String = InStr(1, bilgicek, "</durum>&quot
Dim durum As String = Mid(bilgicek, ds, de - ds)
Dim ss As String = InStr(1, bilgicek, "<sicaklik>&quot
Dim se As String = InStr(1, bilgicek, "</sicaklik>&quot
Dim sicaklik As String = Mid(bilgicek, ss, se - ss)
Response.Write("Durum: " & durum & "<br>Sycaklyk: " & sicaklik)
End Sub
Private Function GetHTML(ByVal strURL As String) As String
Dim objResponse As WebResponse = Nothing
Dim strHTML As String
Try
Dim objUri As Uri = New Uri(strURL)
Dim objRequest As WebRequest = WebRequest.Create(objUri)
objResponse = objRequest.GetResponse
Dim objStream As Stream = objResponse.GetResponseStream

Dim encode As Encoding = System.Text.Encoding.UTF8
Dim objReader As StreamReader = New StreamReader(objStream, encode)
strHTML = objReader.ReadToEnd
Catch ex As Exception
Return ex.ToString
Finally
objResponse.Close()
End Try
Return strHTML
End Function
</script>
<form id="Form1" runat="server">
<asp:button id="downloadButton" runat="server" text="Download" tabindex="2" onclick = "downloadButton_OnClick"></asp:button>
</form>



Alıntı ile Cevapla
Cevapla

Bookmarks

Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)
 

Benzer Konular
Konu Başlıkları Konuyu Başlatan

Papatyam Forum Ana Kategori Başlıkları

Cevaplar Son Mesajlar
Şu anda Forum'un durumu agasar Serbest Atış 0 15 January 2009 17:39
KAFİRLERİN,BULUĞ ÇAĞINDAN ÖNCE VEFAT EDEN ÇOCUKLARIN AHİRETTEKİ DURUMU umut Haşir 0 12 June 2008 14:36
Sayinin kübünü alma tamerr89 C++ 0 29 March 2008 18:39
3 gunluk hava durumu tamerr89 WML 0 08 February 2008 14:52
TIRNAKLARINI OJE İLE BOYAYAN BİR KADININ DURUMU NASILDIR. mevlutgunes Hadis ve Ayetler 0 27 March 2006 09:58

Yeni Sayfa 1

www.papatyam.org Ana Sayfa

Tefekküre Davet Köşesi

Papatyam Sosyal Medya Guruplarımıza Katılın

                       Instagram         

Papatyam alemdarhost.com sunucularında barındırılmaktadır.