Pradinis
Pagalba
Užsisakyk!
- Reklamą
- Hostingą
- El. pašto dėžutę
Užsisakyk!
Įrankiai
Pasidalink
- Visos temos
Forumas | PHP-Fusion, WordPress, Shopify, PHP ir MySQL (PROGRAMAVIMAS) | Bendri PHP-F klausimai |
Autorius: Peacemaker | Peržiūrų: 3056 |
Peacemaker Narys Ekspertas Pranešimai: 3085 Įstojęs: 2007 Lie. 31 17:07:59 | |
Isidedu kalendoriu , jo kodas: openside("Jūsų laisvalaikiui"); ?> <?php /** * CodeRS - Atviras kodas Lietuvai * Copyright (C) 2007 CodeRS www.coders.lt info@coders.lt * * This program is free software; you can redistribute it and/or * modify it under the terms of the GNU General Public License * as published by the Free Software Foundation; either version 2 * of the License, or (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program; if not, write to the Free Software * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. * * * Ši programa yra laisva. Jūs galite ją platinti ir/arba modifikuoti * remdamiesi Free Software Foundation paskelbtomis GNU Bendrosios * Viešosios licencijos sąlygomis: 2 licencijos versija, arba (savo * nuožiūra) bet kuria vėlesne versija. * * Ši programa platinama su viltimi, kad ji bus naudinga, bet BE JOKIOS * GARANTIJOS; be jokios numanomos PERKAMUMO ar TINKAMUMO KONKRETIEMS * TIKSLAMS garantijos. Žiūrėkite GNU Bendrąją Viešąją licenciją norėdami * sužinoti smulkmenas. * * Jūs turėjote kartu su šia programa gauti ir GNU Bendrosios Viešosios * licencijos kopija; jei ne - rašykite Free Software Foundation, Inc., 59 * Temple Place - Suite 330, Boston, MA 02111-1307, USA. **/ //Surašome šventes, jos bus paryškintos kalendoriuje. //Datas rasykite be nuliu pvz: 3-8 (kovo devinta) $sventes = array( //Valstybinės šventės "1-1" => array("Naujųjų metų diena"), "2-16" => array("Lietuvos valstybės atkūrimo diena"), "3-11" => array("Lietuvos nepriklausomybės atkūrimo diena"), "5-1" => array("Tarptautinė darbo diena"), "5-4" => array("Motinos diena"), "6-24" => array("Rasos diena","Jonininės"), "7-6" => array("Valstybės diena","Lietuvos karaliaus Mindaugo karūnavimo diena"), "8-15" => array("Žolinės"), //Lietuvos Respublikos atmintinos dienos "8-23" => array("Juodojo kaspino diena","Baltijos kelio diena"), "8-31" => array("Laisvės diena"), "9-1" => array("Mokslo ir žinių diena"), "9-8" => array("Šilinė (Švč. Mergelės Marijos gimimo diena)","Vytauto Didžiojo karūnavimo diena"), //Kitos šventės "3-18" => array("FDisk gimtadienis") ); //gaunam dabartinę datą ir laiką $time_dabar = getdate(time()); //kada prasideda pirma mėnesio diena $time_pradzia = getdate(mktime(0,0,0, $time_dabar['mon'], 1, $time_dabar['year'])); //Kiek šiame mėnesyje yra dienų $time_dienu = date("t"); //Verciam menesio pavadinimus $ieskom = array("December","January","February","March","April","June","July","August","September","October","November"); $keiciam = array("Gruodis","Sausis","Vasaris","Kovas","Balandis","Birželis","Liepa","Rugpjūtis","Rugsėjis","Spalis","Lapkritis"); $time_dabar['month'] = str_replace($ieskom,$keiciam,$time_dabar['month']); //Verciam savaitės dienas $ieskom = array("Monday","Tuesday","Wednesday","Thursday","Friday","Saturday","Sunday"); $keiciam = array("Pirmadienis","Antradienis","Trečiadienis","Ketvirtadienis","Penktadienis","Šeštadienis","Sekmadienis"); $time_dabar['weekday'] = str_replace($ieskom,$keiciam,$time_dabar['weekday']); //Formuojame kalendoriaus lentele $return = '<table width="100%" border="0" cellpadding="2" cellspacing="0" style="border:1px solid black; font-family:Arial"> <tr> <th colspan="7">'.$time_dabar['year']. " ".$time_dabar['month'].' '.$time_dabar['mday'].'d. '.$time_dabar['hours'].':'.$time_dabar['minutes'].'<br/>'.$time_dabar['weekday'].' - '.$time_dabar['yday'].' Metų diena</th> </tr> <tr bgcolor="#CCCCCC"> <th>P</th> <th>A</th> <th>T</th> <th>K</th> <th>P</th> <th>Š</th> <th>S</th> </tr> '; for ($i = 0;$i <= 4; $i++) { //Sukam tiek kartu kiek savaiciu menesyje = max 5 $return .= " <tr align='center'>n"; //Sukam ciklą tiek kartų kiek dienų savaitėje = 7 for ($j = 1; $j <= 7; $j++) { //Skaiciuojam kiek kartu prasisuko visi ciklai $a++; //Jei priejom šio mėnesio pirmą dieną pradedam braižyti kalendoriaus dienas $time_num = ($a >= $time_pradzia['wday']?++$b:false); $return .= "t<td style='border-top:1px solid #999999;"; //Jei diena yra šiandiena if ($time_dabar['mday'] == $time_num) { $return .= "font-weight:bold;"; } else { $return .= ""; } //Jei tai yra savaitgalis if ($j == 6 || $j == 7) { $return .= " background-color:#E2E2E2;"; } //Jei diena turi švenčių $svente = svente($sventes,"".$time_dabar['mon']."-".$time_num.""); if (!empty($svente)) { $return .= " border:2px solid green;' title='".$svente."'>"; } else { $return .= "'>"; } //Tikrinam ar mėnesio dienos nesibaigė, kitu atveju atspauzdinam tarpą if ($time_num && $time_num <= $time_dienu) { $return .= $time_num; } else { $return .= " "; } $return .= "</td>n"; } $return .= " </tr>n"; } //Atspauzdinam kalendorių ir užbaigiam lentelę echo $return."</table>"; function svente($array,$siandien='',$return='') { //Gauname šiandienos (mėnesis-diena) if (!$siandien) { $siandien = date('n-j'); } //Tikriname ar švenčių masyve nurodyta diena egzistuoja if (array_key_exists($siandien,$array)) { foreach ($array[$siandien] as $key => $val) { if (empty($return)) { $return .= $val; } //Jei išvedam šventę pirmą kartą else { $return .= ", ".$val; } //Išvedame daugiau nei vieną šventę, atskiriame kableliais } } return $return; } ?> <? closeside(); ?> Ir meta toki vaizda: nt nt nt nt nt nt 1 nt 2 n n nt 3 nt 4 nt 5 nt 6 nt 7 nt 8 nt 9 n n nt 10 nt 11 nt 12 nt 13 nt 14 nt 15 nt 16 n n nt 17 nt 18 nt 19 nt 20 nt 21 nt 22 nt 23 n n nt 24 nt 25 nt 26 nt 27 nt 28 nt 29 nt 30 n Kas cia negerai? |
|
_Tomas VIP narys Terminatorius Pranešimai: 1319 Įstojęs: 2007 Rugp. 26 20:08:12 | |
virsui meta po kalendorium ntntntntntntntn n ntntntntntntntn n ntntntntntntntn n ntntntntntntntn n ntntntntntntntn n |
|
Woo-2 Narys Buldozeris Pranešimai: 186 Įstojęs: 2007 Geg. 10 17:05:40 | |
Naudok į sveikatą.. :) openside("Jūsų laisvalaikiui"); |
Peršokti į forumą: |