Adhy Permadi Senaen

STICKY POST

Welcome to My Opera....

Sunday, 18. January 2009, 09:20:42

Welcome to My Opera!
"Selamat datang", please enjoy to visit my blog! and stay update to my articles. If you have some questions or any opinion just leave a message or comment. Thanks.

LORD thank you for being so good in all my life!!

No comments

I like My stuff..

Saturday, 25. July 2009, 13:19:18

My K750i and MyOperaMini 4.2 on It

Phew..

I'm really like to see this picture..with my K750i take the picture with my hand note and pen that I got it from JA-Army. I really love my K750i I do all things on Internet from my K750i (ofcourse using my OperaMini 4.2) really love my handphone..just like I'm feel that the whole world is on my hand! Luv you Opera!

But a few days ago I felt that I lost my K750i cause I forget where to put it when I do work..

so make me sad.. but one of my friend in the office got it and then she did not tell to me that she keep my K750i after a night then she gave it to me in the morning..I'm really happy

to get it back again.. my life is feel empty when I lost my K750i..

but thanks GOD! I got it back..really happy!

5 comments

Bahasa INDONESIA TI. . .

Sunday, 3. May 2009, 13:00:33

Hmm..belakangan ini saya agak bingung dan heran juga mengenai BAHASA INDONESIA yang sering dipakai dalam lingkungan TI / IT contoh kecilnya aja, pas lagi ngeliat account FRIENDSTER/FACEBOOK teman yang lagi minta tolong dibantuin 'upload-in' fotonya.. Eh, sayanya malah bingung soalnya Account mereka menggunakan BAHASA INDONESIA sih.. Nah biar gak bingung dan terbiasa dengan bahasa berikut ini ta' catat bahasanya:

PINDAI = SCAN
RETAS = HACK
UNDUH = DOWNLOAD
UNGGAH = UPLOAD
PERAMBAN = BROWSER
TEMBOLOK = CACHE
DARING = ONLINE
LURING = OFFLINE
KANDAR = DRIVE
PENGANDAR = DRIVER

Nah, itu dia Bahasa Indonesia-nya...

No comments

Fungsi Terbilang pada Microsoft Excel...

Saturday, 2. May 2009, 09:58:14

fungsi terbilang, fungsi terbilang microsoft excel

Yah...berhubung masih agak sering melupakan sesuatu yang terlewatkan..( ciee...kek apa saja

)..nah ini nih hal yang dulu pernah ditanyakan kepada saya..n ada bantuan dari hasil nyari-nyari di google n nanya-nanya ke teman (searching mode:on)

biar gak lupa cara kerjanya n bikinnya...berikut saya jelaskan..

Buka Microsoft Excel Anda..kemudian pada menu Tools -> Macro -> Visual Basic Editor ( [Alt]+ {F11] )
Dari menu Insert pilih Module

Kemudian pada jendela Visual Basic Editor tersebut sisipkan kode berikut:

Public Function terbilang(angka As Double) As String 
Dim strjmlHuruf$, intpecahan As Integer, strpecahan$, urai$, bil1$, strtot$, bil2$ 
Dim x As Integer, y As Integer, z As Integer 
If IsNull(angka) Then 
terbilang = "" 
Exit Function 
End If 
strjmlHuruf = LTrim(CStr(angka)) 
intpecahan = Val(Right(Mid(CStr(angka), 15, 2), 2)) 
If (intpecahan = 0) Then 
strpecahan = "" 
Else 
strpecahan = LTrim(Str(intpecahan)) + "/100" 
End If 
x = 0 
y = 0 
urai = "" 
While (x < Len(strjmlHuruf)) 
x = x + 1 
strtot = Mid(strjmlHuruf, x, 1) 
y = y + Val(strtot) 
z = Len(strjmlHuruf) - x + 1 
Select Case Val(strtot) 
Case 1 
  If (z = 1 Or z = 7 Or z = 10 Or z = 13) Then 
     bil1 = "SATU " 
     ElseIf (z = 4) Then 
     If (x = 1) Then 
     bil1 = "SE" 
     Else 
     bil1 = "SATU " 
     End If 
     ElseIf (z = 2 Or z = 5 Or z = 8 Or z = 11 Or z = 14) Then 
     x = x + 1 
     strtot = Mid(strjmlHuruf, x, 1) 
     z = Len(strjmlHuruf) - x + 1 
     bil2 = "" 
     Select Case Val(strtot) 
     Case 0 
        bil1 = "SEPULUH " 
     Case 1 
        bil1 = "SEBELAS " 
     Case 2 
        bil1 = "DUA BELAS " 
     Case 3 
        bil1 = "TIGA BELAS " 
     Case 4 
        bil1 = "EMPAT BELAS " 
     Case 5 
        bil1 = "LIMA BELAS " 
     Case 6 
        bil1 = "ENAM BELAS " 
     Case 7 
        bil1 = "TUJUH BELAS " 
     Case 8 
        bil1 = "DELAPAN BELAS " 
     Case 9 
        bil1 = "SEMBILAN BELAS " 
     End Select 
   Else 
   bil1 = "SE" 
   End If 
   Case 2 
        bil1 = "DUA " 
   Case 3 
        bil1 = "TIGA " 
   Case 4 
        bil1 = "EMPAT " 
   Case 5 
        bil1 = "LIMA " 
   Case 6 
        bil1 = "ENAM " 
   Case 7 
        bil1 = "TUJUH " 
   Case 8 
        bil1 = "DELAPAN " 
   Case 9 
        bil1 = "SEMBILAN " 
   Case Else 
   bil1 = "" 
   End Select 
   If (Val(strtot) > 0) Then 
   If (z = 2 Or z = 5 Or z = 8 Or z = 11 Or z = 14) Then 
   bil2 = "PULUH " 
   ElseIf (z = 3 Or z = 6 Or z = 9 Or z = 12 Or z = 15) Then 
   bil2 = "RATUS " 
   Else 
   bil2 = "" 
   End If 
   Else 
   bil2 = "" 
   End If 
   If (y > 0) Then 
   Select Case z 
   Case 4 
   bil2 = bil2 + "RIBU " 
   y = 0 
   Case 7 
   bil2 = bil2 + "JUTA " 
   y = 0 
   Case 10 
   bil2 = bil2 + "MILYAR " 
   y = 0 
   Case 13 
   bil2 = bil2 + "TRILYUN " 
   y = 0 
   End Select 
   End If 
   urai = urai + bil1 + bil2 
   Wend 
   urai = urai + strpecahan 
   terbilang = urai & "RUPIAH" 
End Function

Nah setelah itu dari menu Debug -> Compile VBAProject
Tutup jendela Visual Basic Editor-nya, kemudian pada dokumen excel Anda ketikan fungsi '=terbilang(sel)'
Catatan 'sel' merupakan sel yang berisi angka/nilai yang ingin diterbilangkan (bahasa apa ini???)

2 comments

Belajar Mikrotik

Wednesday, 29. April 2009, 12:00:37

Yah..lagi kepengen belajar mikrotik nih.. berhubung sedikit agak gak mengerti walau pun teman dulu pernah bantu install.. yah..pengen perdalam lagi..karena 'Practice Make Perfect' wuihhhh..apa cobaa???

Biar gak lupa sempat nyari" materi untuk ( googling ) n akhirnya dapat artikel buat bantu" install n setting mikrotik router-nya bagus nih buat pemula... silahkan download aja kurang lebih hampir sama sih!

File tutorial 1

File Tutorial 2

No comments

Servlet

Monday, 16. February 2009, 00:45:49

Servlet adalah program kecil yang ditulis dengan bahasa Java yang dibuat untuk berjalan diatas web server. Kata Servlet memiliki kemiripan dengan Applet. Perbedaannya adalah applet berjalan disisi klien (client-side) sedangakan Servlet berjalan di sisi server (server-side).
Teknologi Java memperkenalkkan Servlet sebagai alternatif lain dari program CGI (Common Gateway Interface). CGI merupakan program yang dikembangkan untuk membuat halaman web menjadi lebih dinamis. CGI memungkinkan adanya interaksi antara user dengan web server, misalkan user input data pribadi melalui form HTML, kemudian data di proses di web server. Program CGI banyak ditulis dalam bahasa Perl atau C++.

Proses Akses Servlet
Program servlet berjalan di dalam web server, dan berperilaku sebagai lapisan penghubung antara request yang dikirim browser lewat protokol HTTP dengan Database, atau lapisan tengah antara browser dengan aplikasi pada web server.
Berikut alur proses yang terjadi ketika klien akses Servlet pada web server :

Membaca data secara ekplist data yang dikirim oleh klien lewat browser. User input data pada form HTML pada halaman web, data juga bisa berasal dari sebuah applet atau lewat program klien HTTP.
Membaca data secara implisit data HTTP request yang dikirim melalui browser. Dalam proses ini akan dibaca dua jenis data, pertama data yang diinput klien dan data yang dikirim oleh browser (seperti : cookies, media type) , proses ini berada di server dimana Servlet dieksekusi.
Generate hasil permintaan (request). Proses ini mungkin memerlukan komunikasi dengan database, eksekusi sebuah RMI atau memanggil web service, invoke sebuah aplikasi, atau menjawab (response) secara langsung permintaan (request). Disini database tidak langsung "berbicara" dengan HTTP atau tidak langsung mengembalikan database dalam bentuk HTML, hal ini berlaku untuk semua aplikasi. Disini dibutuhkan suatu lapisan untuk meng-ekstrak data kedalam bentuk steram HTTP.
Kirim data (dokumen) secara explicit ke client. Dokumen yang dikirim dapat dalam berbagai format , text (HTML), binary (image file), atau bahkan file hasil kompres (gzip file).
Kirim data response HTTP secar implisit. Servlet atau JSP akan mengirim data ke client, ada dua jenis data yang dikirim, data yang berisi informasi yang diinginkan / diproses dan informasi HTTP ( cookies, catch parameter dan sebagainya).

No comments

1 2 3 4 Next »

Showing posts 1 - 6 of 19.