Changeset 115


Ignore:
Timestamp:
May 2, 2016, 11:02:45 AM (9 years ago)
Author:
chronos
Message:
  • Modified: Updated latest information.
  • Fixed: Show ZdechovNET main page instead of Portal main page.
Location:
trunk
Files:
6 edited

Legend:

Unmodified
Added
Removed
  • trunk/Application/UWebSession.pas

    r114 r115  
    108108            THTMLString(Self.HtmlDocument.Body.SubItems.AddNew(THtmlString.Create)).
    109109              Text := Format(SError, [E.Message]);
    110             if Assigned(ModuleBase) then ModuleBase.GeneratePage(Self, Page.Page)
    111               else GeneratePageDefault(Self, Page.Page);
     110            GeneratePage(Page.Page);
    112111          end;
    113112        end;
     
    160159    RegisterModule(TModuleFinance.Create(nil), True);
    161160    RegisterModule(TModuleNetwork.Create(nil), True);
    162     RegisterModule(TModulePortal.Create(nil), True);
     161    //RegisterModule(TModulePortal.Create(nil), True);
    163162    RegisterModule(TModuleIS.Create(nil), True);
    164163    RegisterModule(TModuleNews.Create(nil), True);
  • trunk/Modules/ZdechovNET/UAboutPage.pas

    r105 r115  
    5050      'Počítačová síť postupně vznikla jako přirozená reakce na tehdejší situaci v informačních technologiích a jako reakce na nedostupnost vhodného internetového připojení pro domácnosti v obci. ' +
    5151      'Členové komunity jsou mezi sebou propojeni pomocí kabelu nebo bezdrátové technologie Wi-Fi. K internetu jsou připojeni přes hlavní směrovač. ' +
    52       'Připojení je negarantované, avšak prvořadým cílem je maximální spolehlivost, stabilita, rychlost a dostupnost připojení. ' +
     52      'Připojení je garantované s nonstop servisem a řešením problémů obvykle do 24 hodin a prvořadým cílem je maximální spolehlivost, stabilita, rychlost a dostupnost připojení. ' +
    5353      'Jelikož je obec odlehlá a obklopena vysokými kopci, jsou zde možnosti jiného kabelového či bezdrátového připojení značně omezené. Síť vedená místními aktivisty také přináší řadu nadstandardních komunitních služeb.<br/>' +
    5454      '<br/>' +
    5555      '<i>Důvody ke vzniku sítě:</i><br/>' +
    5656      '<ul>' +
     57      '<li>Dosažení rychlejšího a levnějšího nepřetržitého sdíleného internetového připojení bez omezení dat</li>' +
    5758      '<li>Možnost komunikace mezi členy formou textu, zvuku či videa</li>' +
    58       '<li>Dosažení rychlejšího a levnějšího nepřetržitého sdíleného internetového připojení bez omezení dat</li>' +
    5959      '<li>Možnost šíření aktuálních informací z dění v obce</li>' +
    6060      '<li>Sdílení společných dat</li>' +
    6161      '<li>Společné hraní síťových her</li>' +
    62       '<li>Zprovoznění užitečných služeb (chat, aktuality, bazar, menu v jídelně, web kamery, aj.)</li>' +
     62      '<li>Zprovoznění užitečných služeb (IPTV, VoIP, chat, aktuality, bazar, menu v jídelně, web kamery, aj.)</li>' +
    6363      '</ul><br/>';
    6464
     
    6868
    6969    Text := Text + '<strong>Počty zákazníků:</strong><br/>' +
    70       'Připojených domácností v obci: 103<br/>' +
     70      'Připojených domácností v obci: 124<br/>' +
    7171      'Připojených institucí: 1<br/>' +
    72       'Hosting serverů: 4<br/>' +
    73       'Celkem: 108<br/>' +
     72      'Hosting serverů: 1<br/>' +
     73      'Celkem: 126<br/>' +
    7474      '<br/>' +
    7575      '<strong>Technické parametry sítě</strong><br/>' +
    76       'Internetové připojení: 80/80 Mbit/s, vyhrazené, symetrické, bez agregace, bez omezení přenesených dat, přes společnost <a href="http://www.inext.cz/">Internext 2000</a><br/>' +
    77       'Pokrytí obce signálem: asi 80%<br/>' +
     76      'Internetové připojení: 160/160 Mbit/s, vyhrazené, symetrické, bez agregace, bez omezení přenesených dat, přes společnost <a href="http://www.inext.cz/">Internext 2000</a><br/>' +
     77      'Pokrytí obce signálem: asi 90%<br/>' +
    7878      'V připojených domácnostech celkem 365 občanů ze všech 600 (61 %)<br/>' +
    7979      '<br/>' +
    80       '<i>Aktualizováno: 21.1.2011</i>';
     80      '<i>Aktualizováno: 1.5.2016</i>';
    8181    end;
    8282    GeneratePage(Self);
  • trunk/Modules/ZdechovNET/UModuleZdechovNET.pas

    r108 r115  
    319319      '<li><a href="http://wiki.zdechov.net/">Wiki</a></li>' +
    320320      '</ul><ul class="MenuItem2">'; //<li>&nbsp;</li>';
    321     if Assigned(ModuleBase.Pages.FindByName('uzivatel')) then begin
     321    if False and Assigned(ModuleBase.Pages.FindByName('uzivatel')) then begin
    322322      if ModuleUser.UserOnline.User = UnknownUser then begin
    323323        Text := Text + '</ul>' +
     
    343343  I: Integer;
    344344  TitleTag: THtmlString;
     345  TopMenuTag: THtmlString;
    345346begin
    346347  with ASession do begin
  • trunk/Modules/ZdechovNET/UVoIPPage.pas

    r105 r115  
    4040      ' A v rámci sítě a těch co mají v obci VoIP od stejného operátora dokonce zdarma. <br/>' +
    4141      '<br/>' +
    42       '<strong>Výhody volání přes VoIP</strong>' +
    43       '<ol><li>Volání v síti zdarma</li>' +
    44       '<li>Registrace, zřízení VoIP zdarma</li>' +
    45       '<li>Nulový měsíční paušál</li>' +
    46       '<li>Žádný závazek, dobíjíte kredit bez časového omezení</li>' +
    47       '<li>Velká celorepubliková konkurence mnoha VoIP operátorů tlačí na nízké ceny hovorů na trhu</li>' +
    48       '<li>Online výpis hovorů zdarma</li>' +
    49       '<li>Běžné tel. číslo, možnost přenosu stávajícího čísla</li>' +
    50       '<li>Lze využít i bez počátečních investic - softwarový telefon</li>' +
    51       '<li>Pro telefonování nepotřebujete počítač - hardwarový VoIP telefon</li>' +
    52       '</ol>' +
     42      'Doporučujueme: <a href="http://www.odorik.cz/">VoIP Odorik</a>' +
     43      '<ul><li>Zřízení zdarma</li>' +
     44      '<li>Měsíční paušál: 0 Kč</li>' +
     45      '<li>Tarifikace: 1+1 (sekundová)</li>' +
     46      '<li>Volání v síti: <strong>0 Kč/minutu</strong></li>' +
     47      '<li>Volání do pevných sítí: <strong>0,25 Kč/minutu mimo špičku, 0,49 Kč/minutu ve špičce</strong></li>' +
     48      '<li>Volání do mobilních sítí: <strong>0,59 Kč/minutu</strong></li>' +
     49      '<li>Přenesení vašeho čísla: 1300 Kč</li>' +
     50      '<li>Volání z mobilního čísla na mobil: 1,5 Kč/minutu</strong></li>' +
     51      '</ul>' +
    5352      '<br/>' +
    54       '<a href="http://voip.mikrotech.cz/">Mikrotech</a>' +
    55     '<ul><li>Zřízení zdarma</li>' +
    56     '<li>Měsíční paušál: 0 Kč (1 Kč/měsíčně za číslo)</li>' +
    57     '<li>Tarifikace: 1+1 (sekundová)</li>' +
    58     '<li>V sítí Mikrotech: <strong>0 Kč/minutu</strong></li>' +
    59     '<li>Volání do pevných sítí: <strong>0,24 - 0,5 Kč/minutu</strong></li>' +
    60     '<li>Volání do mobilních sítí: <strong>1 Kč/minutu</strong></li>' +
    61     '<li>Příchozí volání: <strong>plus 0,1 Kč/minutu</strong></li>' +
    62     '<li>Přenesení vašeho čísla: 1500 Kč</li>' +
    63     '</ul>' +
    64     '<br/>' +
    65     '<a href="http://voip.mikrotech.cz/doc/cenik_mikrotech.pdf">Ceník</a><br/>' +
    66     '<br/>' +
    67     '<a href="http://www.odorik.cz/">Odorik</a>' +
    68     '<ul><li>Zřízení zdarma</li>' +
    69     '<li>Měsíční paušál: 0 Kč</li>' +
    70     '<li>Tarifikace: 1+1 (sekundová)</li>' +
    71     '<li>Volání v sítí: <strong>0 Kč/minutu</strong></li>' +
    72     '<li>Volání do pevných sítí: <strong>0,4 - 0,6 Kč/minutu</strong></li>' +
    73     '<li>Volání do mobilních sítí: <strong>1,6 Kč/minutu</strong></li>' +
    74     '<li>Přenesení vašeho čísla: 1300 Kč</li>' +
    75     '</ul>' +
    76     '<br/>' +
    77     '<a href="https://www.odorik.cz/ceny.html">Ceník</a><br/>' +
    78     '<br/>';
     53      '<a href="http://www.odorik.cz/ceny.html">Ceník</a><br/>' +
     54      '<br/>';
    7955    end;
    8056    GeneratePage(Self);
  • trunk/Packages/CoolWeb/CoolWeb.pas

    r114 r115  
    55unit CoolWeb;
    66
    7 {$warn 5023 off : no warning about unused units}
    87interface
    98
  • trunk/ZdechovNET.lpr

    r113 r115  
    2929    Core.Run;
    3030    Run;
    31     Printer.RawMode := True; // Avoid printer finalization exception
     31    //Printer.RawMode := True; // Avoid printer finalization exception
    3232  end;
    3333end.
Note: See TracChangeset for help on using the changeset viewer.