Kamis, 22 Mei 2008

No Care With Another Ones

hello may be this time i would be try to explain with u about of my title how ever that title have much explain heheh ... ok lets try..
At the company we know all off people are needed but some big decicios maker can think that another people is not needed becouse of his power ... this condition can... but lets try think with another position ... if u stay at the jungle that no one can help u becouse of your wrong decision what can you do at that place hah ???? i think u just can see and wait ... you don't have big power to attaced

Jumat, 16 Mei 2008

Ecrip Chipperh

Attribute VB_Name = "modEncryption"
'Coded by Tim Cinel, 15 Oct 2003
'This module is an example of some low-level encryption.

'Remember, when encrypting, we need a way to get our original message back
'so do not ever use Rnd (Random Function). I suggest using a Calculated
'Random Number generater that requires an input.

Function Encrypt(strPassword As String, strInput As String) As String
Dim PasswordVal As Long, CurrentChar As Long, CurrentMod As Long

'Lets turn our password into a number! Yippee!
PasswordVal = GetPasswordValue(strPassword)

'CurrentMod will makes it difficult to recognise when we use the same character more than once.
CurrentMod = 2

For i = 1 To Len(strInput)
CurrentChar = Asc(Mid(strInput, i, 1))
'Set currentchar as the ASCII value of the the character being encrypted
CurrentChar = CurrentChar + PasswordVal

'CurrentMod is passed into CalculateSeed - See that function for more details.
CurrentChar = CurrentChar - CalculateSeed(CLng(CurrentMod))

CurrentChar = WrapNumber(CurrentChar, 0, 255)

Encrypt = Encrypt & Chr(CurrentChar)

CurrentMod = CurrentMod + 1
If CurrentMod > 30 Then CurrentMod = 2
Next i
End Function

Function Decrypt(strPassword As String, strInput As String) As String
Dim PasswordVal As Long, CurrentChar As Long, CurrentMod As Long

'Lets turn our password into a number! Yippee!
PasswordVal = GetPasswordValue(strPassword)
CurrentMod = 2

For i = 1 To Len(strInput)
CurrentChar = Asc(Mid(strInput, i, 1))
'Set currentchar as the ASCII value of the the character being encrypted
CurrentChar = CurrentChar - PasswordVal

'CurrentMod is passed into CalculateSeed - See that function for more details.
CurrentChar = CurrentChar + CalculateSeed(CLng(CurrentMod))

'We need to make sure that CurrentChar ends up being between 0 and 255, so we wrap it!
CurrentChar = WrapNumber(CurrentChar, 0, 255)

Decrypt = Decrypt & Chr(CurrentChar)

'Add 1 to CurrentMod (For calculated randomization)
CurrentMod = CurrentMod + 1
If CurrentMod > 30 Then CurrentMod = 2
Next i
End Function

Private Function GetPasswordValue(strPassword As String) As Long
Dim ASCII_Vals As Long

For i = 1 To Len(strPassword)
'We need to add up all the ASCII values from all the characters
ASCII_Vals = ASCII_Vals + Asc(Mid(strPassword, i, 1))
Next i

If ASCII_Vals > Len(strPassword) Then
'Divide the Calculated Random Number (CRN) of ASCII_Vals by the CRN of the length of the password.
GetPasswordValue = Int(CalculateSeed(ASCII_Vals) / CalculateSeed(Len(strPassword) + 1))
Else
'We would end up with 0 if we divided, so we aint gonna divide!
'We will just use the CRN ASCII_Vals produces.
GetPasswordValue = CalculateSeed(ASCII_Vals)
End If

End Function

Private Function CalculateSeed(InputNumber As Long) As Long
'This functions pretty much makes the InputNumber appear to become a totally random
'number, but unke using rnd (Random Function) this will always return the same number
'as long as you enter the same number.

'Log and Cos are just Maths functions

CalculateSeed = Int(Log(InputNumber) * Cos(InputNumber) * 137)
End Function

Private Function WrapNumber(lngNumber As Long, lngMinimum As Long, lngMaximum As Long) As Long
Dim Range As Long
Range = lngMaximum - lngMinimum
'This function 'wraps' numbers.
'If u want a number to be in a certain range (say between 0 and 255)
'this funciton will make any number fit into that range!
WrapNumber = lngNumber

If lngNumber > lngMaximum Then
Do Until WrapNumber <= lngMaximum
WrapNumber = WrapNumber - Range
Loop
ElseIf lngNumber < lngMinimum Then
Do Until WrapNumber >= lngMinimum
WrapNumber = WrapNumber + Range
Loop
End If

End Function

MENGAPA 85% KARYAWAN KANTOR NGANTUK

Kerja adalah suatu kesibukan kita ... jika kita tidak bekerja maka DAPUR gak ngebul.. yakinlah ...nah sekarang yang jadi permasalahan adalah banyak sekali karyawan terutama karyawan KANTORAN yang mengantuk alias pura2 gak ngantuk padahal super ngantuk ... mengapa terjadi demikian ??? ada beberapa faktor yang menyebabkan kejadian seperti itu misalnya :
1. Tidak adanya kesibukan karyawan tersebut
2. Karyawannnya yang malas dan gak mau move
3. Tidak memikirkan pekerjaan alias yg penting dapet gaji saben bulan
4. Tidak memiliki inovasi alias ide2 baik ide iseng apa ide gak iseng.
5. Emank otaknya dah eror
6. Gak ada fasilitas kerja yang baik...

SOLUSI
============
1. Bikin Kesibukan klo gak cari kesibukan dengan NULIS
2. MUTASIIN KE tempat yg banyak kerjaan
3. Nah ini berentiin
4. Ikutin Pelatihan yg menghasilkan duit dengan cara bekerja
5. Masukin Rumah sakit
6. Adakan Fasilitas yang baik

Monggo Nek Arep Sinau

dtmDate/cntTransID/intCCMonth/intCCYear/txtAddress1/txtAddress2/txtCCName/txtCCNumber/txtCity/txtCVV2/txtEMailAddress/txtIPAddress/txtPassword/txtRegEmailAddress/txtResultAuthCode/txtState/txtUserName/txtZip


#Jul 19 2007 12:00AM / 53780/ 7/ 3/800 w 4th st.//daniel e kester/firetree /5588320000046699/williamsport/317/seyalater@hotmail.com/65.173.18.240/drop2dead/seyalater@hotmail.com/AVSSALE:034941:MCBRS79IK0719 :1212:29453036:Y:/pa/seya64/17701

#Jul 24 2007 12:00AM / 54879/ 3/ 5/4201 e silverwood dr//trina l cooper/5588455001213946/phoenix/689/mecoopman@hotmail.com/68.2.106.195/megan/mecoopman@hotmail.com/AVSSALE:015970:MCBRHC9JD0724 :1224:29512474:N:/az/wbell13/85048

#Jul 28 2007 12:00AM / 55982/ 3/ 5/3820 E Ray Road//trina cooper/5588455001213946/Phoenix/689/coopman@hotmail.com/68.2.106.195/maryann6/coopman@hotmail.com/Duplicate rejected/AZ/coopman/85044

#Jul 30 2007 12:00AM / 56800/ 5/ 3/19111 w 10 Mile rd//Richard A Bloom/5588009000223362/Southfield/33620958/rm41more@hotmail.co,/172.162.200.77/awayhelp/rm41more@hotmail.com/AVSSALE:064578:MCB1ZJFCE0730 :1243:29616114:Y:/MI/rich4u/48075

#Aug 1 2007 12:00AM / 57468/ 1/ 3/2700 broening highway//william neubrand/5588370000634291/baltimore/607/xibitz420@yahoo.com/68.50.136.78/muscle/xibitz420@yahoo.com/AVSSALE:022946:MCBDQCWIK0801 :1248:29659193:Y:/md/XIBITZ/21222

#Aug 5 2007 12:00AM / 58333/ 4/ 4/1341 stockton st #2b//eddy v chau/5588329000307548/san francisco/298/evc98_80@yahoo.com/172.151.146.97/1628/evc98_ dtmDate/cntTransID/intCCMonth/intCCYear/txtAddress1/txtAddress2/txtCCName/txtCCNumber/txtCity/txtCVV2/txtEMailAddress/txtIPAddress/txtPassword/txtRegEmailAddress/txtResultAuthCode/txtState/txtUserName/txtZip

#Jul 19 2007 12:00AM / 53780/ 7/ 3/800 w 4th st.//daniel e kester/firetree /5588320000046699/williamsport/317/seyalater@hotmail.com/65.173.18.240/drop2dead/seyalater@hotmail.com/AVSSALE:034941:MCBRS79IK0719 :1212:29453036:Y:/pa/seya64/17701

#Jul 24 2007 12:00AM / 54879/ 3/ 5/4201 e silverwood dr//trina l cooper/5588455001213946/phoenix/689/mecoopman@hotmail.com/68.2.106.195/megan/mecoopman@hotmail.com/AVSSALE:015970:MCBRHC9JD0724 :1224:29512474:N:/az/wbell13/85048

#Jul 28 2007 12:00AM / 55982/ 3/ 5/3820 E Ray Road//trina cooper/5588455001213946/Phoenix/689/coopman@hotmail.com/68.2.106.195/maryann6/coopman@hotmail.com/Duplicate rejected/AZ/coopman/85044

#Jul 30 2007 12:00AM / 56800/ 5/ 3/19111 w 10 Mile rd//Richard A Bloom/5588009000223362/Southfield/33620958/rm41more@hotmail.co,/172.162.200.77/awayhelp/rm41more@hotmail.com/AVSSALE:064578:MCB1ZJFCE0730 :1243:29616114:Y:/MI/rich4u/48075

#Aug 1 2007 12:00AM / 57468/ 1/ 3/2700 broening highway//william neubrand/5588370000634291/baltimore/607/xibitz420@yahoo.com/68.50.136.78/muscle/xibitz420@yahoo.com/AVSSALE:022946:MCBDQCWIK0801 :1248:29659193:Y:/md/XIBITZ/21222

#Aug 5 2007 12:00AM / 58333/ 4/ 4/1341 stockton st #2b//eddy v chau/5588329000307548/san francisco/298/evc98_80@yahoo.com/172.151.146.97/1628/evc98_

#Aug 5 2007 12:00AM / 58333/ 4/ 4/1341 stockton st #2b//eddy v chau/5588329000307548/san francisco/298/evc98_80@yahoo.com/172.151.146.97/1628/evc98_80@yahoo.com/AVSSALE:032585:MCBCWDPCE0805 :1256:29711540:Y:/CA/egressive420/94133

#Aug 14 2007 12:00AM / 60293/ 1/ 4/4209 medical parkway//jake crownover/5588320001767665/austin/622/jccrown@hotmail.com/66.25.166.131/universal/jccrown@hotmail.com/AVSSALE:050557:MCBN5N0JY0814 :1288:29812652:Y:/tx/crowny/78756

#Aug 23 2007 12:00AM / 62929/ 6/ 3/9390 Research Blvd./Kaleido II, Suite 300/Todd C. Bryant/5588000001096873/Austin/755/tcbmrb@yahoo.com/24.153.135.132/buddyboxx/tcb20@hotmail.com/AVSSALE:023182:MCBB4F0IK0823 :1328:29929865:Y:/TX/tcb20us/78759

#Aug 23 2007 12:00AM / 63019/ 3/ 4/3739 Midview Ave.//Francis X. Corrigan/5588325000785733/Bridgeton/987/fbcorr@msn.com/64.158.173.89/6r

#Jul 19 2007 12:00AM / 53780/ 7/ 3/800 w 4th st.//daniel e kester/firetree /5588320000046699/williamsport/317/seyalater@hotmail.com/65.173.18.240/drop2dead/seyalater@hotmail.com/AVSSALE:034941:MCBRS79IK0719 :1212:29453036:Y:/pa/seya64/17701

#Jul 24 2007 12:00AM / 54879/ 3/ 5/4201 e silverwood dr//trina l cooper/5588455001213946/phoenix/689/mecoopman@hotmail.com/68.2.106.195/megan/mecoopman@hotmail.com/AVSSALE:015970:MCBRHC9JD0724 :1224:29512474:N:/az/wbell13/85048

Jul 28 2007 12:00AM / 55982/ 3/ 5/3820 E Ray Road//trina cooper/5588455001213946/Phoenix/689/coopman@hotmail.com/68.2.106.195/maryann6/coopman@hotmail.com/Duplicate rejected/AZ/coopman/85044

#Jul 30 2007 12:00AM / 56800/ 5/ 3/19111 w 10 Mile rd//Richard A Bloom/5588009000223362/Southfield/33620958/rm41more@hotmail.co,/172.162.200.77/awayhelp/rm41more@hotmail.com/AVSSALE:064578:MCB1ZJFCE0730 :1243:29616114:Y:/MI/rich4u/48075

#Aug 1 2007 12:00AM / 57468/ 1/ 3/2700 broening highway//william neubrand/5588370000634291/baltimore/607/xibitz420@yahoo.com/68.50.136.78/muscle/xibitz420@yahoo.com/AVSSALE:022946:MCBDQCWIK0801 :1248:29659193:Y:/md/XIBITZ/21222

#Aug 5 2007 12:00AM / 58333/ 4/ 4/1341 stockton st #2b//eddy v chau/5588329000307548/san francisco/298/evc98_80@yahoo.com/172.151.146.97/1628/evc98_80
@yahoo.com/AVSSALE:032585:MCBCWDPCE0805 :1256:29711540:Y:/CA/egressive420/94133

#Aug 14 2007 12:00AM / 60293/ 1/ 4/4209 medical parkway//jake crownover/5588320001767665/austin/622/jccrown@hotmail.com/66.25.166.131/universal/jccrown@hotmail.com/AVSSALE:050557:MCBN5N0JY0814 :1288:29812652:Y:/tx/crowny/78756

#Aug 23 2007 12:00AM / 62929/ 6/ 3/9390 Research Blvd./Kaleido II, Suite 300/Todd C. Bryant/5588000001096873/Austin/755/tcbmrb@yahoo.com/24.153.135.132/buddyboxx/tcb20@hotmail.com/AVSSALE:023182:MCBB4F0IK0823 :1328:29929865:Y:/TX/tcb20us/78759

#Aug 23 2007 12:00AM / 63019/ 3/ 4/3739 Midview Ave.//Francis X.
Corrigan/5588325000785733/Bridgeton/987/fbcorr@msn.com/64.158.173.89/6retired9/fbcorr@msn.com/AVSSALE:096380:MCB5YA1JD0823 :1329:29933691:Y:/MO/Ohh6942/63044

#Aug 25 2007 12:00AM / 63376/ 2/ 4/312 W. 4th St//edgar corredor/5588 5700 0064 4048/Santa Ana/845/hirick@email.com/63.205.137.184/7BiGgIo/hirick@email.com/AVSSALE:098770:MCB5WX8JY0824 :1335:29943159:Y:/CA/fotomagic/92701

#Aug 25 2007 12:00AM / 63390/ 3/ 5/4201 E silverwood Dr//trina cooper/5588455001213946/Phoenix/689/coopman@hotmail.com/68.99.255.135/megan/mecoopman@hotmail.com/AVSSALE:070916:MCB70TNJD0825

#Aug 28 2007 12:00AM / 64475/ 3/ 5/po box 248//samuel eakman/5588455001122873/grove city/2873298/germangiant@hotmail.com/24.154.63.143/same/germangiant@hotmail.com/AVSSALE:043126:MCBKSHSIK0828 :1357:30000441:Z:/pa/germangiant1/16127

#Aug 31 2007 12:00AM / 65284/ 9/ 3/4900 sears tower//john f gilmore jr/5588325000381103/chicago /393/gilmore350@worldnet.att.net/12.84.123.154/myron/gilmore350@worldnet.att.net/AVSSALE:025242:MCBOOYZIY0831 :1367:30029232:A:/il/kandell/60604

#Sep 5 2007 12:00AM / 66377/ 2/ 6/543 avondale drive//matt smith/3763 768565 02026/baton rouge/Valid /mattt345@aol.com/172.166.231.158/qubert/dysan5@hotmail.com//la/rob1232/70806

#Nov 25 2007 12:00AM / 85373/ 8/ 4/18 Ewe Boon Road/#03-02 Palm Spring/Timothy Richard Phillips/3762 01772162004/Singapore/0225/mehk100@hotmail.com/202.135.3.182/bobby1000/mehk100@hotmail.com/Request to cc failed: -6/Singapore/trim1000/259326

#Jan 18 2003 12:00AM / 96732/ 3/ 5/5514 19A Ave//David Clelland/36330484188015/Edmonton/909/dclella1@agt.net/24.79.138.163/4503csil/dclella1
@agt.net//Ab/pleasure_tongue/T6L 2C1

#Aug 18 2003 12:00AM / 160904/ 4/ 7/3102 capewood lane//liv huang/372340625951009/san jose/303/facds@yahoo.com/204.31.170.103/icecream/whoopti@hotmail.com//ca/KPnC/95132

#Oct 12 2003 12:00AM / 178488/ 2/ 5/103 Isenhower Parkway//Darryl E. Gugie/378292256261840/Newark/840/Viper694u2003@msn.com/67.75.221.215/jenniferlee/Viper694u2003@msn.com//NJ/Viper694unme/07062

#Oct 12 2003 12:00AM / 178630/ 5/ 5/3344 Rustburg Drive//Elliot Atstupenas/372541302031003/Fayetteville/655/atstupenas@carolina.net/66.57.130.40/tarheel/tarheel8652@yahoo.com//nc/tarheel8652/28303

Rabu, 14 Mei 2008

AKIBAT NAIKNYA HARGA BBM

==============================================
.......... BY DELEMITERDEV ...................
==============================================
1. YANG BIASA NAEK MOBIL SEKARANG NAEK MOTOR
2. YANG BIASA NAEK MOTOR SEKARANG NAEK SEPEDA
3. YANG BIASA NAEK SEPEDA SEKARANG JALAN KEKONG "JALAN KAKI"
4. YANG BIASA JALAN KAKI SEKARANG DIRUMAH SAJA
5. YANG BIASA DIRUMAH SAJA SEKARANG BUNUH DIRI
==============================================
.......... BY DELEMITERDEV ...................
==============================================

AKIBAT YANG LAEN ..... BAGI ANAK KOS
1. BIASA MAKAN MIE SEKARANG MAKAN GORENGAN
2. BIASA NYABU SEKARANG MEROKOK AJA
3. BIASA JALAN KE MALL SEKARANG JALAN KE PASAR TRADISIONIL MA PACAR AJA "HAHAHA"
4. BIASA BAYAR KOST SEKARANG GAK BAYAR KUCINGAN AMA PAK KOST
5. BIASA NONGKRONG SEKARANG DIKAMAR AJA TIDUR

NB WAJAR NEGARA KITA GAK MAJU2 ...."BUKAN NARSIS TAPI COBA PIKIR BENER KAGAK"

PEMERINTAH SUPER BODOHH

Neh Hasil Chat saya dengan salah satu temen seorang ibu rumah tangga yang merasakan keluhan dan perasaan dia thd kenaikan BBM " UH PRESIDEN --MANA KAMPANYE MU ??? APA KARNA DAPET MANTU ARTIS JADI GAK MIKIR LAGI ???? HAHAHHAHAHA
=======================' Nama Black List =================================
[9:15:48] ^Dewa-Cinta^ says: jadi toh mbak BBM naik
[9:17:36] yayoe says: tau rencananya sih katanya sore ini....
[9:18:24] ^Dewa-Cinta^ says: HAH
[9:18:28] yayoe says: jadi inget ke kampung.....
[9:18:39] yayoe says: semalem di metro ak nonton....
[9:19:46] ^Dewa-Cinta^ says: 0o0o0
[9:19:51] ^Dewa-Cinta^ says: gila tuh pemerintah
[9:19:53] ^Dewa-Cinta^ says: gak mikir2
[9:20:02] yayoe says: tau ya...
[9:20:05] ^Dewa-Cinta^ says: mosok saben ganti presiden naek trus BBM na
[9:20:06] yayoe says: saya pribadi....
[9:20:12] ^Dewa-Cinta^ says: klo gitu mending gak usah pake presiden aja
[9:20:26] yayoe says: semalam nonton gk tvone
[9:20:34] yayoe says: dari pks nolak bbm loh
[9:20:39] ^Dewa-Cinta^ says: 0o0o trus
[9:20:43] ^Dewa-Cinta^ says: yg gak nolak yg mana ???
[9:21:04] ^Dewa-Cinta^ says: klo pks punya suara cuma 20% alias 20% nolak yg 80%agree ya sama aja
[9:21:07] yayoe says: tapi para pengamat ekonomi setuju naek bbm katanya
[9:21:19] ^Dewa-Cinta^ says: hahah gitu yah sama aja
[9:21:27] yayoe says: lagian juga nolak gk nolak itu presiden lanjut ama keputusannya
[9:21:41] yayoe says: lagian kenapa dewan gk setuju katanya
[9:21:48] yayoe says: toh ada apsal yg menyebutkan
[9:22:15] ^Dewa-Cinta^ says: hmm gitu yah ???
[9:22:16] yayoe says: kalau harga minyak dunia lebih 100 /bdh pemerintah bleh menaikan bbm
[9:22:24] yayoe says: secara tdk langsung dewan setuju
[9:22:25] ^Dewa-Cinta^ says: ia yah ...
[9:22:29] yayoe says: toh sudah eluar pp nya
[9:22:38] ^Dewa-Cinta^ says: trus klo nurut mbak gimana baiknya
[9:22:42] yayoe says: jd yg sekarang pertanyaannya
[9:23:06] yayoe says: bisa gk saya wong kecil memebli bbm itu tanpa membuat kita sekarat...
[9:23:10] yayoe says: ada yg ironis lagi....
[9:23:25] yayoe says: karena bbm naek imbasnya ke yg lain ada yg gantung diri loh...
[9:23:30] yayoe says: subhanawlloh...
[9:23:37] yayoe says: seburuk inikah indonesia....
================================= SENSORED ======================================
yah bagi yang merasa membaca blok ini tolong di kasih komentarnya aku bingung juga kok SETIAP GANTI PRESIDEN PASTI NAEK BBM & SELALU KEBIJAKAN YANG GOBLOK2 YANG DIAMBIL ??? DUH2 NEGARAKU MENDING DIJAJAH BELANDA AJA DEH DARI PADA DI JAJAH AMA BANGSA SENDIRI ......
1 KATA YANG BISA AKU TULIS = PEMERINTAH GOBLOKKKKKKKKKKKKK