BlackHalt writeln (by me or from manual) PHP source Codes ...
BlackHalt Latvijas Bankas valūtu kursi:
<?php
// sBBhXML - Valūtas
// autors BlackHalt 2004 @ http://neb.ija.lv
header('content-type: text/html; charset=utf-8');
$datums=date('Ymd');
$xmlf=file('http://www.bank.lv/vk/xml.xml?date='.$datums.'');
$daudz=sizeof($xmlf);
$saakf=$xmlf[0];
$vaigf='';
$ciki=$daudz-1;
for($i=1;$i<$ciki;$i++){
$vaigf.=$xmlf[$i];
}
$galaf=$saakf.$vaigf;
$saakums=array(
'CRATES'=>'<h1 class="crates">Latvijas Bankas valūtu kursi</h1>',
'DATE'=>'<p class="datums">Datums ',
'CURRENCIES'=>'<div class="currencies">Valūtas',
'CURRENCY'=>'<p class="currency">Valūta:',
'ID'=>'',
'UNITS'=>'',
'RATE'=>'<strong>');
$beigas=array(
'DATE'=>'</p>',
'CURRENCIES'=>'</div>',
'CURRENCY'=>'</p>',
'ID'=>'',
'UNITS'=>'',
'RATE'=>'</strong>');
function saaktxml($parseris,$nos,$tagi){
global $saakums;
if($saakums[$nos]){
echo $saakums[$nos];
}}
function beiguxml($parseris,$nos){
global $beigas;
if($beigas[$nos]){
echo $beigas[$nos];
}}
function simbdati($parseris,$galaf){
echo $galaf;
}
$xml=xml_parser_create();
xml_set_element_handler($xml,'saaktxml','beiguxml');
xml_set_character_data_handler($xml,'simbdati');
xml_parse($xml,$galaf);
xml_parser_free($xml);
?>