www.amapro.cz & David Bazala [Programování]

Otevře webové stránky AmaPro


Otevře hlavní stránku společnosti AmaPro
Internetové stránky určené pro studenty středních a vysokých odborných škol.


amapro.cz/odkazy Projekt eliminuje vyhledávání klíčových slov na komerčních stránkách a v e-schopech.



Nový projekt AmaPro

Program pro získávání názvů www stránek

Tato část kódu je určená pro získání smysluplných www stránek . Cílem je získat http.//name.name.cz ze souborů, které obsahují metainstrukce html a podobně. V tomto souboru jsou textové řetězce, které obsahují i názvy stránek a to ve formátu "http:" a ukončená je ".cz". Program projíždí řádky textu a hledá počátek shody. Následně hledá v podřetězci ukončovací znak. Vzniklý podřetězec ořeže o nadbytečné znaky a webová stránka je k dispozici ve formátu AnsiString. Program ještě vypíše text do komponenty ListBox.
//*******************************************************
// zdrojový kód pro získání cílových WWW stránek
// formát: http://www.keczy.cz
//*******************************************************
{
int delka_souboru; //proměnná počtu znaků v souboru
int uk_soubor; //proměnná ID číslo Window. otevřený soubor
char *data; //ukazatel na data (pole charů)
int start=0,konec=0; //pomocné proměnné pro řezání pole charů
ListBox1->Clear(); //Vymazání ListBoxu
AnsiString hledam="http:"; //slovo hledané jako návěstí počátku emailu
int const oddelit=hledam.Length()+2; //definice odřezání návěstí a přebytečných mezer
//*************************************************
uk_soubor=FileOpen("index.htm",fmOpenRead); //cesta k souboru a jeho otevření pro čtení
delka_souboru=FileSeek(uk_soubor,0,2); //nastavení ukazatele polohy v souboru na konec
FileSeek(uk_soubor,0,0); //nastavení ukazatele polohy v souboru na začátek
data=new char[delka_souboru]; //dynamická alokace pole char dle znaků v souboru
FileRead(uk_soubor, data, delka_souboru); //načtení souboru do pole char
FileClose(uk_soubor); //uzavření souboru
AnsiString orezano,docas,mezi_konec; //pomocné proměnné typu AnsiString
orezano=(AnsiString)data; //koncerze pole data jako char do AnsiString
delete [] data; //uvolnění dynamické paměti jako pole
//*************************************************
do //návěstí pro blok zpracování pole jako AnsiString
{
start=orezano.Pos(hledam); //hledání první pozice shody AnsiString s proměnnou hledam
if(start==0) //test na existenci shody
break; //není shoda, je proveden výskok z do-while
mezi_konec=orezano.SubString(start+oddelit,50); //pomocná proměnná pro výpočet odřezání
konec=mezi_konec.Pos(".cz"); //zjištění pozice ukončovacího znaku
docas=orezano.SubString(start+oddelit,konec+2); //načtení užitkové části AnsiString
orezano.Delete(1,start); //ořezání již testované části AnsiString
ListBox1->Items->Add(docas); //výstup do ListBoxu
}
while(orezano.Length()>0); //test na delku řezaneho AnsiString
}


Abecední seznam všech článků Vyhledání pojmů ve článcích




Hybridní počítače
Počítače, jejichž základem je standardní analogová počítací síť.
knihy/hybridni_pocitace
Popis jazaka C
Průvodce příkazy programovacího jazyka C.
programovani/jazyk_c
PHP práce s poli
Práce s poli a položkamy v PHP.
stranky/php_array
Databáze ikon
Ikony a malé obrázky pro tlačítka či jiné použití
datove_zdroje/icony/icony.php
Databáze obrázků
Malé a velké obrázky, podlkady, tlačítka, okrasné čáry a pod.
datove_zdroje/obrazky
Mikropočítače
Seznámení s obecnou problematikou počítačů a mikropočítačů.
programovani/mikropocitace
Programování PHP
Články o programování webových stránek pomocí PHP.
internet/katalog_programovani_php
Mikropočítače a jejich programování
Nízká forma programování, assembler a struktura procesorů.
knihy/mikropocitace/obsah_mikro1.php
Weby o programování
Odkazy na velké servery o programování a vývoji SW
odkazy/programovani
Otevře stránky Fulltextové vyhledávání na celém serveru
Digitalizované odborné knihy
Velká encyklopedie pojmů a zkratek
Česko - anglicko - německý technický slovník
Klasický katalog firem, služeb a stránek
OnLine překladač  vět a textů (nepoužívá Google)
Stránky pro chvíle oddechu od studia, relaxace
Katalog českých firem dle technologií
Internetový odkazník
Otevře hlavní stranu pro oddíl programování




 Wikipedie   Seznam stránek   Kapitoly témat   Významné servery   Klíčová slova 








Otevře hlavní stranu společnosti AmaPro

Všechna práva vyhrazena. Určeno jen pro osobní využití. Bez předchozího písemného souhlasu správce www.amapro.cz je zakázána jakákoli další publikace, přetištění nebo distribuce jakéhokoli materiálu nebo části materiálu zveřejněného na www.amapro.cz a to včetně šíření prostřednictvím elektronické pošty. Články, jejichž přímým autorem není amapro.cz lze publikovat pouze se souhlasem jejich majitelů či administrátoru příslušného webu.