Konuyu görüntüle
IUCODERS FORUM > Duyurular > Okul ile ilgili > Web Programlama odev 2
Yazar
eyevisol


avatar

Kayıt: 16.10.2008
20.04.2012-19:44 #77592
today.xml dosyasını online mı takip edeceğiz yoksa bilgisayara alıp da üzerinde mi işlem yapacağız bilgisis olan var mı?




TaYLaN
Yazar
eyevisol


avatar

Kayıt: 16.10.2008
20.04.2012-21:46 #77593
derse giden yok demi dürüst olun laughing




TaYLaN
Yazar
mstf


avatar
istanbul
Kayıt: 06.01.2012
20.04.2012-22:35 #77594
o derse girmiyorum ama mantıklı olanı webden çekmesi.çünkü anlık değişiyor veriler
bunu php ile yapmıştım örnek olması açısından yazayım 

<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN"
"http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html>
    <head>
        <meta http-equiv="Content-Type" content="text/html; charset=UTF-8">
        <title></title>
    </head>
    <body>
    
        <?php
        $i=1;
        
      $xml= 'http://www.tcmb.gov.tr/kurlar/today.xml');
      echo     ' <div style="width:50%;margin-left:auto;margin-right:auto;color:white;font-weight:bold">  <div style="padding-bottom:2px;width:100%;"><div style="width:49%;float:left;padding-bottom:4px;padding-top:4px;padding-left:3px;color:black">Para birimi</div>
<div style="width:24%;float:left;padding-bottom:4px;padding-top:4px;padding-left:3px;color:black">Alış</div>
     <div style="width:24%;float:left;padding-bottom:4px;padding-top:4px;padding-left:3px;color:black">Satış</div></div><div style="clear:both"></div>';
     $k=1;
     foreach($xml->Currency as $yaz){
     if($i!==3 && $i<18){
    $bg=($k%2==0)?'#408080':'#004040';
     ?>
         
    <div style="padding-bottom:2px;width:100%;background-color:">
       <div style="width:49%;float:left;padding-bottom:4px;padding-top:4px;background-color:<?php echo $bg; ?>;padding-left:3px">
     <?php echo $yaz->Isim ;?></div>
     <div style="width:24%;float:left;padding-bottom:4px;padding-top:4px;background-color:<?php echo $bg; ?>;padding-left:3px">
     <?php echo $yaz->ForexBuying; ?></div>
     <div style="width:24%;float:left;padding-bottom:4px;padding-top:4px;background-color:<?php echo $bg; ?>;padding-left:3px">
     <?php echo $yaz->ForexSelling;?></div>
<div style="clear:both"></div></div>
     
     <?php $k+=1;
     }
     $i++;
     }
     echo '<div style="clear:both"></div></div>';
        ?>
    </body>
</html>


http://bilisimturk.org/online/xmlread.php

yukarıda









Yazar
ylxxx


avatar

admin
Kayıt: 03.01.2010
20.04.2012-23:10 #77595
online olarak takip edicez sanırım çok bilgiye sahip değilim ama referans vereceksiniz dedi hoca




Yazar
eyevisol


avatar

Kayıt: 16.10.2008
20.04.2012-23:11 #77596
bide açıklama eklersen tadından yenmez diyeyim ben sana




TaYLaN
Yazar
ylxxx


avatar

admin
Kayıt: 03.01.2010
20.04.2012-23:20 #77598
today.xml deki verileri parse edicez ama normal parse işlemlerini kullanarak değil vbScripteki string fonksiyonlarını kullanarak yapacaz bunu hoca hangi verilerin parse edileceğini ödev dokumanında vermiş zaten




Yazar
eyevisol


avatar

Kayıt: 16.10.2008
20.04.2012-23:22 #77599
dokumandan anlaşılıyor o da nasıl olcak bu iş için bi rota verebilirmisiniz?





TaYLaN
Yazar
eyevisol


avatar

Kayıt: 16.10.2008
21.04.2012-19:05 #77606
ya hoca sadece string fonsiyonları kullanın demiş nedir bunun alametifarikası? xml.load () ile xml sayfasını aldıktan sonraki işlem ne olmalı?




TaYLaN
Yazar
eyevisol


avatar

Kayıt: 16.10.2008
21.04.2012-20:18 #77607
yok mu bi yardımcı olabilecek beyler bayanlar?




TaYLaN
Yazar
eyevisol


avatar

Kayıt: 16.10.2008
21.04.2012-23:24 #77614
yırttım kendimi esas da sanırım atladığım bişeyler var nasıl olacak bu iş?




TaYLaN
Yazar
eyevisol


avatar

Kayıt: 16.10.2008
22.04.2012-20:04 #77623
yav harbi vermem lazım bu ödevi bi bilen az yardım etsin gençler




TaYLaN
Yazar
glck


avatar
istanbul
Kayıt: 01.10.2010
24.04.2012-21:54 #77651
Acaba hocaya söylesek ödevin teslim tarihini ertelese olmaz mı.Çünkü böylece ödev ile ilgili daha geniş açıklma yapabilir yarın dersde.Bu konuda hoca ile konuşan oldumu?




Yazar
ylxxx


avatar

admin
Kayıt: 03.01.2010
25.04.2012-00:18 #77659
Arkadaş lar umarım yardımcı olur size
Server.CreateObject("MSXML2.ServerXMLHTTP.4.0") ile donen
xml de turkce karakterler bozuluyor 
Function karaktercevir(body) 
dim objstream 
set objstream = Server.CreateObject("adodb.stream") 
objstream.Type = 1 
objstream.Mode =3 
objstream.Open 
objstream.Write body 
objstream.Position = 0 
objstream.Type = 2 
objstream.Charset = "ISO-8859-9" 
karaktercevir = objstream.ReadText 
objstream.Close 
set objstream = nothing 
End Function

fonksiyonunu buldum nette
bununla gelen verideki karakterleri duzeltiyor
fonksiyonu da soyle kullanabilirsiniz
text = karaktercevir(xml.responseBody)





Yazar
eyevisol


avatar

Kayıt: 16.10.2008
25.04.2012-00:28 #77660
xml yi nasıl döndürdüğünüde gösterebilir misin?




TaYLaN
Yazar
ylxxx


avatar

admin
Kayıt: 03.01.2010
25.04.2012-00:56 #77661 
Response.Buffer = true


set xml = Server.CreateObject("MSXML2.ServerXMLHTTP")

Dim xml,text
xml.open "GET", "http://www.tcmb.gov.tr/kurlar/today.xml", false

xml.send
'text = xml.responseText
text = karaktercevir(xml.responseBody)
set xml=Nothing

umarım yardımcı olur




1 2
Del.icio.us
Digg
Facebook
Furl
Google
Blink
Simpy
Spurl
Y! MyWeb
iucoders ® 2005-2007
www.iucoders.com
site kuralları