Već dugo vrijeme se koristim dalje opisanim skriptovima, tako da sam naravno dobio spisak e-mail adresa, koje sam obilježio kao adrese spamera. Tokom, otprilike dveju godina narastao je na više od 30000 adresa, koje vama ovdje dajem na raspolaganje. Slobodno njime možete proširiti svoju datoteku Junk senders.txt. Ovdje ponuđena datoteka sadrži nazive domena, iz kojih su bili e-mailovi slani. U prvoj verziji skriptova bio sam u spisak ulagao cijele e-mail adrese, no to je dovelo do naglog povečanja broja upisa, i time i do usporenja filtriranja adresa prilikom prijama e-mailova. Zato sam morao skript modificirati tako, da se u spisak ulažu samo nazivi domena. Zbog toga ovdje mogu biti uvrštene i domene, koje se nebave ovakvom "djelatnošću", no njihova je domena mogla biti zlouporabena. Najviše time mogu biti oštečene domene, koje gostuju kod različitih providera web usluga, i njihova imena su poštanskom serveru nadodana kao tzv. aliasi. Moram priznati, da i moje domene su kad-tad na ovakav način zlouporabene.

Kada se još koristite MS Outlook 2002 (xp) i primate veću količinu bezvrijedne pošte dnevno, može vama pomoći ovaj VBA skript. Njegovom svrhom je pojednostavniti održavanje datoteke, u koju ova verzija Outlooka sprema adrese spammera. Nažalost, ne bi to bio Microsoft, da manipulaciju sa spamom ne komplicira. Svijete čudi se, njegovo nespretno rješenje nastavlja se i u MS Outlooku 2003.

Radi se o čudnome obilježavanju spama, koje je moguće samo redak po redku. No pokušajte obilježiti više spama odjedanput i sprovesti akciju "Bezvrijedna pošta - nadodati u listu neželjenih pošiljaoca", vidi sliku broj 1.

Kada obilježite više redaka sa spamom, odjedanput ova mogućnost nestaje, što se vidi na slici 2.

Kod ove verzije Outlooka nije ni slučajno omaškom obilježenu pošiljku kao spam, samo tako lako skinuti sa liste spammera! Naravno, da sa takvih nedostataka i nedoradaka je u biti sasnovan cijeli software od Microsofta i nuđen milijardama ljudi za neosnovano visoku cijenu. Stalno se cijeli "paketi" software-a dotjeravaju i moderniziraju, no ovakve sitnice ih prate cijelo vrijeme. U ovom konkretnom slučaju to sebi objašnjavam kao bojazanj autora nadopune minimalizirati mogućnost pogrešnog obilježenja poželjne pošiljke kao spama.

Predmetna verzija Outlooka je isto malo saviljiva za programere. Dozvoljava existenciju samo jednog projekta, koji je smješten u domiciljnom spremniku korisnika u datoteci VbaProject.OTM, na putu očito:

"C:\Documents and Settings\UserName\Application Data\Microsoft\Outlook".

Očito zbog toga, što kod drugih Windows, uglavnome starijih verzija, to može biti malo, ili potpuno drugačije. Ja se u sdašnjem trenutku koristim sa Microsoft Windows XP Professional x64 Edition, barem tako piše na instalacionom CD.

Razlika u manipulaciji sa spamom u usporedbi ka rješenju od Microsofta, uostalom dopunjenog u Outlook nekim iz nadogradnih ili popravnih paketića, proizlazi iz opisa dalje navedenog rješenja.

Nakon instalacije potrebnih skriptova, koja će biti opisana u daljnjem, pojavi se u izborniku prozora "Primljeno" nova stavka "Spam", slika broj 3.

Kucnućem na izbor "Spam" otvori se nama slijedeći izbor "Dodati". Kada kucnemo na izbor "Dodati" dođe ka startu procesa, koji sve odabrane stavke u spremniku "Primljeno" postepeno prođe i premjesti u spremnik "Bezvrijedna pošta". Kada se pošiljaoc takve pošiljke još nenalazi u listi neželjenih pošiljaoca, biti će u nju uvršten.

No kada predjemo u spremnik "Bezvrijedn pošta" promjeni se i izbor ispod izbora "Spam" na "Oduzeti". Kucnućem na izbor "Oduzeti" pokrenemo proces, koji sve izabrane stavke u spremniku "Bezvrijedna pošta" postepeno prođe i premjesti u spremnik "Primljeno". Istodobno će biti otklonjena bilješka iz liste neželjenih pošiljaoca. Na ovaj način možemo povratiti omaškom krivo kao spam obilježenu poštu, vidi slika broj 5.

Kao što je bilo prije pomenuto, izborom opcije "Dodati", ili "Oduzeti" pokrenemo proces, koji izvrši zahtjevane radnje. Ovaj proces je u biti makro, napisano u jeziku Visual Basic for Applications (VBA). Pošto neki makroi mogu biti podmetnuti neodgovornim programerima, tzv. makrovirusi, biti ćete prije pokrenuća tog procesa upozoreni na to, što proces hoće da pristupi ka osjetlivim podacima, vidi slika broj 6. Kako se iz slike može primjetiti, morate odrediti vrijeme, po koje predpostavljate djelovanje skripta i naravno morate odobriti, da sa ste sa radom skripta saglasan. Ovi iz vas, koji redovito sprovodite sinchronizaciju Outlooka sa mobilnim telefonem a slično, sigurno znate kako reagirati na ovo upozorenje.

Upozornje: Dalje opisani postupak instalacije će ukloniti sve vama stavljene skriptove iz aplikacije MS Outlook 2002. Kada se budete točno pridržavali slijedečeg postupka, biti će vaši skriptovi očuvani u izvornoj datoteci VBA projekta. Nažalost ova verzija Outlooka ne omogučava drugi pristup. Sigurno boljim načinom je, skinuti datoteke sa VBA i dodati ih ka postojećem projektu. No to zahtjeva barem minimalno poznavanje okruženja za skriptovanje u Outlooku 2002.

Postupak instalacije je dalje naveden u točkama, kojih redoslijed je potrebno zadržati:

1. Skinemo ovdje datoteku VBA projekta zkomprimiranu u VbaProject.zip i smjestimo nju u prije poznati i prazan adresar, naprimjer C:\temp. Ka provjeri ispravnosti skinute datoteke nudim ovdje njezin checksum u formatu MD5:
   0741cd48152b9027dc51a4c2a5ba20f9
2. U tom istom adresaru extrahiramo iz skinute arhive VbaProject.zip zahtjevanu datoteku VbaProject.OTM.
3. Završimo rad aplikacije Outlook.
4. Pronađemo adresar u kojem se nalazi originalna datoteka VbaProject.OTM. Tipično se radi o adresaru "C:\Documents and Settings\UserName\Application Data\Microsoft\Outlook" kod engleske verzije MS Windows XP. Pozor, kada čete se prokucavati navedenim putem. Naprimjer adresar "Application Data" je opremljen atributima R a H, nego samo za čitanje (Read only) i skriveni (Hidden). Kod defaultnog podešenja prikaza stavki u exploreru, neče biti takva stavka uopće iscrtana! Također je potrebno prolaziti po uvedenoj putanji, ne kraticom preko linka/ikone "Dokumenti", "Moji dokumenti" i slično!
5. Promjenimo ime originalne datoteke VbaProject.OTM, u više navedeno adresaru, na, recimona 1VbaProjekt.OTM
6. Iskopiramo skinutu datoteku VbaProjekt.OTM na ovo mjesto.
7. Ponovo uputimo aplikaciju Outlook. Otvorimo izbornik "Alati > Makro > Osiguranje...".

   Slika 7 - Izbornik "Alati > Makro > Osiguranje..."

8. Na karti "Osiguranje" odredimo najmanji mogući nivo sigurnosti. Ovaj nivo možemo ostaviti privremeno, samo za vrijeme instalacije. Nakon instalacije povratimo ovu mjeru natrag, na zahtjevanu vrijednost. No prilikom izvršavanja skripta, ili startu aplikacije Outlook biti ćemo ometani upitima tipa: "Želite dozvoliti rad makroa?" i slično.

   Slika 8 - Karta "Osiguranje"

9. Dalje otvorimo izbor "Alati > Makro > Editor jezika Visual Basic".

   Obrázek 9 - Nabídka "Nástroje > Makro > Editor jazyka Visual Basic"

10. Kucnućem na izbor uđemo u editor jezika VBA, slika 10. Ovdje ništa nepoduzimamo, samo se ubjedimo, da u prozoru editora ima neki tekst, i opet prozor editora zatvorimo.

    Slika 10 - Prozor editora jazika VBA.

11. Još jedan puta završimo rad aplikacije Outlook. Nakon njezinog ponovnog starta se u izborniku pojavi stavka "Spam", vidi sliku broj 3. Sa ovim je instalacija završena.

Kada vama nije strano okruženje editora VBA, ukomponiranog u aplikaciju Outlook 2002, možete skriptove instalirati pojedinačno u vaš postojeći projekat. Naravno, malo je složenije:

1. Skinemo ovdje komprimirane datoteke VBA skriptova pohranjene u arhivi outlook2002spam.zip i ovu smjestimo u nama poznati i prazan adresar, naprimjer C:\temp. Ka provjeri ispravnosti skinute datoteke ovdje nudim njezin checksum u formatu MD5:
   5bd6881e845a3adca23040fcd7b231b4
2. U ovom adresaru raspakiramo skinutu arhivu outlook2002spam.zip, koja sadrži potrebne datoteke:
   • EventsHandling.cls
   • MenuHandling.bas
   • SpamHandling.bas
   • ThisOutlookSession.cls
3. Pokrenemo, ili aktiviramo aplikaciju MS Outlook 2002 i otvorimo izbor "Alati > Makro > Osiguranje...".

   Slika 11 - Izbor "Alati > Makro > Osiguranje..."

4. Na karti "Osiguranje" odredimo najmanji mogući nivo sigurnosti. Ovaj nivo možemo ostaviti privremeno, samo za vrijeme instalacije. Nakon instalacije povratimo ovu mjeru natrag, na zahtjevanu vrijednost. No prilikom izvršavanja skripta, ili startu aplikacije Outlook biti ćemo ometani upitima tipa: "Želite dozvoliti rad makroa?" i slično.

   Slika 12 - Karta "Osiguranje"

5. Dalje otvorimo izbor "Alati > Makro > Editor jezika Visual Basic".

   Slika 13 - Izbor "Alati > Makro > Editor jezika Visual Basic".

6. Nakon odabira izbora se otvori prozor editora jezika VBA, slika 14. Najprije provjerimo, imamo-li pristupačan panel projekta. Na panelu projekta obilježimo prvu stavku i u izborniku aktiviranom desnom tipkom miša, odaberemo stavku "Import datoteke".

   Slika 14 - Prozor editora jezika VBA.

7. Na panelu "Import datoteke" najprije pronadjemo adresar, u koji smo bili raspakirali datoteke sa VBA skriptovima. Nakon toga odaberemo datoteku ThisOutlookSession.cls i prisnemo tipku "Otvoriti", vidi sliku 15.

   Slika 15 - Import datoteke sa kodom skripta VBA.

8. U stablu projekta će se pojaviti modul klase ThisOutlookSession1. Kada sada dvaput uzastopce kucnemo mišom na ovaj redak, pojavi se nama u desnom, editacionom dijelu prozoru editora tekst, odgovarajući onome na slici 16. Uobičajenim načinom sav sadržaj prozora obilježimo (može uz pomoć tipki Ctrl+A) i desnom tipkom na mišu otvorimo izbornik. Odaberemo opciju "Izvaditi", nakon čega obilježeni teks nestane.

   Slika 16 - Sadržaj prozora editora VBA nakon importa datoteke ThisOutlookSession.cls.

9. Dalje pokucamo dvaput na stavku ThisOutlookSession na panelu projekta. Ovim aktiviramo novi prozor editora, kucnemo na njegovu površinu, aktiviramo desnom tipkom miša kontekstualni izbornik i u njemu odaberemo opciju "Umetnuti", slika 17. Napravljenu promjenu odmah spremimo na disk, tako da kucnemo na ikonu diskete.

   Slika 17 - Sadržaj prozora editora VBA sa premještenim tekstom skripta.

10. Sada odklonimo praznu granu ThisOutlookSession1 na panelu projekta. Jednostavno nju obilježimo i u kontekstualnom izborniku ispod desne tipke miša odaberemo stavku "Brisati ThisOutlookSession1...", kako se vidi iz slike 18.

    Slika 18 - Brisanje više nepotrebne grane projekta ThisOutlookSession1.

11. Biti ćemo upitani, hoćemo-li eksportirati sadržaj ove stavke u externu datoteku. Ovom mogućnošću se nećemo koristiti i tako odgovorimo sa "Ne", vidi sliku 19.

    Slika 19 - Brisani kod ne spremimo, i tako ga više nema :).

12. Sada na sličan način, kao što je bilo opisano ispod točki 6. a 7. importiramo preostale tri datotéke. Nakon njihovog importa mora stablo projekta odgovarati onome na slici broj 20.

    Slika 20 - Cijelo stablo projekta nakon importa svih datotéka.

13. Preostalo nama provjeriti takozvane "Izvore", ili sprege skript-stroja aplikacije Outlook na neophodne biblioteke i dodatke. Zato odaberemo u izborniku VBA editora stavku "Alati > Reference" prema slici broj 21.

    Slika 21 - Izbor izbornika referencija na biblioteke i dodatke.

14. Na panelu "Reference" trebamo odabrati sva polja prema slici broj 22. Najvjerojatnije ćemo morati u listi pronaći i staviti kvačicu kod stavke "Microsoft CDO 1.21 Library". Kada je sve u redu prisnemo tipku "OK". Nakon toga kucnućem na ikonu diskete cijeli projekat spremimo na disk.

    Slika 22 - Panel "Reference" i odabrane neophodne biblioteke.

15. Nakon što smo spremili projekat, zatvorimo prozor editora VBA i zatvorimo aplikaciju MS Outlook. Ovu ponovo pokrenemo. Ubjedimo se, da izbornik prozora "Primljeno" je proširen o stavku "Spam", vidi sliku broj 3. Sa ovim je instalacija dodatka privedena kraju.

Gore opisana instalacija je mnogo složenija, no što je bila prije opisana zamjena datoteke projekta, tipa OTM. Prednošću ipak je to, što potrebne skripte možeme dodati onim već postojećim.

Nakon apliciranja jednog iz niza ispravnih paketa je Outlooku 2002 nadodan jednstavan spam filter i filter pošiljki sa sadržajem za odrasle. Naravno, da je bezuvjetno potrebno imati filter aktivan. U obrnutom slućaju neće biti pošiljke, kojih adresa je bila stavljena na listu neželjenih pošiljaoca, automatski premještane u spremnik "Bezvrijedna pošta" kod njihovog prispjeća. Zato nije na odmet opisati ovdje postupak aktiviranja spam-filtera.

1. Otvorimo izbornik "Alati > Poredati", ili kucnemo na ikonu identičnu toj u izborniku, i smještenoj na panelu s alatima, vidi gore desno na slici broj 23.

   Slika 23 - Izbornik "Alati" sa stavkom "Poredati".

2. Nakon kucnuća na stavku izbornika, ili ikonu, otvori se nama u gornjem dijelu prozora "Primljeno" panel "Načini organiziranja mape Primljeno", kao što se vidi na slici 24. Ovdje odaberemo poveznicu "Bezvrijedna pošta".

   Slika 24 - Panel "Načini organiziranja mape Primljeno".

3. Panel promjeni sadržaj na takav, koji se vidi na slici broj 25. Ovdje i prvom redku odaberemo stavke tako, da izbor odgovara slici, tj. Automatiski PREMJESTITI bezvrijednu poruku u spremnik BEZVRIJEDNA POŠTA.

   Slika 25 - Panel Panel "Načini organiziranja mape Primljeno", stavka "Bezvrijedna pošta".

4. Provjerimo podešenje panela "Načini organiziranja mape Primljeno", koje treba da odgovara onome na slici 26. Bitan je sadržaj prvog redka, lijevo od tipke "Isključit". Ovdje treba biti obavijest, da "Nove bezvrijedne poruke će biti premještene u mapu Bezvrijedna pošta". Kada je sve u redu, panel zatvorimo kucnućem na križić, smješteni desno gore na samome panelu.

   Slika 26 - Podešenje panela "Načini organiziranja mape Primljeno", stavka "Bezvrijedna pošta".

5. Provjeriti možemo podešenje spam-filtera i uz pomoć tzv. "Vodića pravilima". U njemu moraju biti stavke prikazane na slici broj 27. Načićemo ovdje i listu e-mail adresa spammera, nazivanu kao "Crna lista" (Black list). Vodič pravilima je pristupačan kao istoimena stavka izbornika "Alati".

   Slika 27 - Vodič pravilima i njegov sadržaj.

6. Microsoft zove spammere otpadom, znači Junk. U datoteci Junk Senders.txt su zato spremljene e-mail adrese, nama obilježene kao bezvrijedne. Odmah nakon prispjeća bilo koje e-mail poruke je provjereno, ima-li adrese njezinog pošiljaoca u ovoj datoteci. Kada to je slučaj, biti će odmah premještena u spremnik "Bezvrijedna pošta". Datoteka leži u istom adresaru, gdje i prije pominjana datoteka VbaProject.OTM. Mechanizam ulaganja "Crne liste" u tekstualnu datoteku je tipičan za MS Outlook do verzije 2002. Verzija 2003 donosi opet "sitnu" izmjenu, "Crna lista" se ulaže u databazu registri u binarnom obliku. Zato rješenje za MS Outlook 2003 bude ponuđeno što prije.

   Slika 28 - Panel "Datoteke Junk Senders.txt a VbaProject.OTM u adresaru Windows.

Dozvoljavam sebi štovane namjernike upozoriti na stvar, da navedeno rješenje bilo razvijeno za MS Outlook 2002 u češkoj verziji i englesku verziju Windows XP. Kod korištenja u drugom okruženju potrebne su sitne izmjene u kodu VBA skriptova. Ove će biti sa vremenom opisane. Razlogom je zbilja, što autor ne disponira takvim radnim okruženjem, i zbog toga ne može niti prikazati, niti provjeriti, testirati napravljeno. Izmjene u kodu dotiću se drugih naziva puteva (path) i naziva polja (folder) u samome Outlooku. Na ovom mjestu želim zamoliti za pomoć, koju sigurno može pružiti neki iz čitaoca.

Zahvaljujem na razumjevanju.

 

Kao što već postaje običajem, moram na ovome mjestu izjaviti, da VBA skripte sam svojeručno napisao. Ipak priznajem, da znanje sam crpio iz pomoći ka MS Outlooku 2002, sa stranica Microsofta i stranica drugih pametnih ljudi, koji se bave sličnom problematikom. Ove skripte dajem sasvim savjesno na raspolaganje bilo kome, tko je ikad bio izrazio interes. Neću da snosim odgovornost za štete, koje je sebi itko napravio svojim neznanjem. Ove skripte mogu biti modificirane i dalje širene bez bilo kojih ograničenja. Kada će njima biti nadodan podmukao i štetan kod, znajte da tu nemam niti taj najmanji dijelić krivice. Zato bolje da skinete skripte sa moje stranice. Ovdje barem garantiram, da skinute skripte budu izvorne. Nažalost i ove stranice je moguće prolomiti, izmjeniti njihovu adresu i nadomjestiti istovjetno izgledajućim stranicama, no sasvim drugog sadržaja. Za ove pokušaje i eksperimente nepreuzimam bilo koju odgovornost. Biti ću samo sretan, da sam nekome pomogao, bilo sa problemom, bilo sa proširenjem njegovog znanja. Jednostavno, primite ovaj kod za takav, kao što i jeste.

Na više mjesta bio sam se koristio zaštićenim nazivima proizvoda, tehnologija ili kompanija. Moguće je, da ova obilježja nisu bila potpuna i nisu odgovarala zahtjevanim parametrima. Izvinjenjem neka mi je, što sam morao tako postupati, pošto čitaoc treba shvatiti o čemu se piše i govori. Vjerujem, da će mi biti oprošteno i to, kada neka tvrdnja nije baš odgovarala iskonskoj stvarnosti i uloženoj reklami.

Zahvaljujem svim spammerima i također Microsoftu, da su me primorali sjesti i napisati ove skriptove. Bilo mi je više stalo do glave obilježavanje pojedinačnih poruka kao spam. Zahvaljujem i na ponudi večinom korisne robe. Penis mi je, zahvalujući nekolika operacijama i rastezanjima, skoro, pa do peta - hvala. Nakon redovitog gutanja vijagre, cijalisa i drugih, meni nuđenih preparata su moja dostignuća u krevetu i van njega označavana za čudesna i neumorna - hvala. Absolutno gubim apetit na spizu i automatski sam izgubio svoju godinama skupljanu i skupo plaćenu težinu, skinuo sam sve, sve do idealne. Osjećam se kao perce - hvala. Imam pune ruke satova Rolex, Omega, Patek i drugih, isto kao što su bili imali na rukama davne 1945. sovjetski osloboditelji. Oni njih nisu znali nategnuti, ja nisam znao odoljeti vašoj ponudi - hvala. Koristim se zahvaljujući samo vama jeftinim softwareom inače renomiranih firmi. Još nisam uspio skinuti Vistu, ipak obiman paket, no bez obzira - hvala. Zahvaljujem svim ozbiljnim trgovcima, koji mi stalno nude svoje viškove po povoljnim cijenama, nemojte da se ljutite, ili već imam, ili nemam ineresa, ipak - hvala, što me niste bili izostavili. Moj račun u banci pretiječe, više neznam gdje ću s lovom, pošto vaše ponude na kupoprodaju akcija u upravo taj pravi trenutak, bile su od mene napravile bogatuna - hvala. Moj konto mi je dozvolio izgubit koju lovu u vašom kasinu, ili kladeći se u bilo šta. Moram reći, ovdje mi sreća ne cvate, možda drugi puta. No moji dugi zimski večeri odmah su postali zabavniji, napetiji i krači, onda - hvala, hvala i još jedanput hvala. Posebno zahvaljujem spammerima, pošto razvlače moju domenu po crnim listama mail-servera širom kugle zemaljske. Kako očaravajuće, s jedne strane braneći se zubima, noktima monopolu nadnarodnih kompanija, sa strane druge stvarajući drugi monopol - monopol neželjene ponude. Hvala.