| Uutiset | Koodikirjasto | Wiki | Keskustelut | FAQ | Info |
saatiedotneon 06.04.03 01:05 saatiedot suomesta
<?PHP /* SÄÄTIEDOT SUOMESTA, KATSO OHJEET LOPUSTA! */ function saatiedot($color,$laani,$print=true) { /* @version 0.9 04.04.2003 neon <neon@neon-line.net> @saatiedot(string color, int laani, [bool print]) */ if(!is_numeric($laani)) exit('lääni pitää olla numerisessa muodossa'); if(!function_exists("file_get_contents")) exit('päivitä PHP uusimpaan versioon'); $data = file_get_contents("http://www.tiehallinto.fi/alk/tiesaa/tiesaa_maak_$laani.html"); $data = strip_tags($data); $data = trim($data); $data = nl2br($data); $parts = explode("<br />\n<br />\n",$data); $parts[0] = NULL;$parts[1] = NULL; $parts[count($parts)-1] = NULL; $output = "<table cellspacing=\"0\" bgcolor=\"$color\">\n\t<tr>\n\t\t<th>paikkakunta</th>\n\t\t<th>mittausaika</ th>\n\t\t<th>ilma </th>\n\t\t<th>tienpinta</th>\n\t\t<th>sadetilanne</th>\n\t\t<th>\n\t\t tienpinta</th>\n\t</tr>"; foreach($parts as $dat): if(!empty($dat)): $parts2 = explode("<br />\n",$dat); $output .= "\n\t<tr>\n\t\t<td>$parts2[1]</td>\n\t\t<td>$parts2[2]</td>\n\t\t<td>$parts2[3]</ td> \n\t\t<td>$parts2[4]</td>\n\t\t<td>$parts2[5]</td>\n\t\t<td>$parts2[6]</td>\n\t</tr>"; endif; endforeach; $output .= '</table>'; $parts == NULL; if(!$print) return $output; else { echo $output; return; } } /* * saatiedot(string taulukon_vari, int paikkakunta, [bool print]) * paikkakunnat: 1 = Uusimaa 2 = Itä-Uusimaa 3 = Satakunta 4 = Varsinais-Suomi 5 = Etelä-Savo 6 = Etelä-Karjala 7 = Kymenlaakso 8 = Pirkanmaa 9 = Kanta-Häme 10 = Päijät-Häme 11 = Keski-Suomi 12 = Pohjois-Savo 13 = Pohjois-Karjala 14 = Keski-Pohjanmaa 15 = Etelä-Pohjanmaa 16 = Pohjanmaa 17 = Pohjois-Pohjanmaa 18 = Kainuu 19 = Lappi * jos haluat, että funktio ei tulosta mitään mutta palauttaa ouputin aseta viimeinen atribuuti tilaan false * Tested on: PHP 4.3.1, 4.5.0-DEV, 5.0.0-DEV * Esimerkki: saatiedot('#DCEAFD',1); */ ?> |
![]() Haku
|