SALING TOLONG MENOLONG

Bryan hampir saja tidak melihat wanita tua yang berdiri dipinggir jalan itu, tetapi dalam cahaya berkabut ia dapat melihat bahwa wanita tua itu membutuhkan pertolongan. Lalu ia menghentikan mobil Pontiacnya di depan mobil Mecedes wanita tua itu, lalu ia keluar dan menghampirinya.
Walaupun dengan wajah tersenyum wanita itu tetap merasa khawatir, karena setelah menunggu beberapa jam tidak ada seorang pun yang menolongnya.

Apakah lelaki itu bermaksud menyakitinya?
Lelaki tersebut penampilanya tidak terlalu baik, ia kelihatan begitu memprihatinkan. Wanita itu dapat merasakan kalau dirinya begitu ketakutan, berdiri sendirian dalam cuaca yang begitu dingin, sepertinya lelaki tersebut tau apa yang ia pikirkan. Lelaki itu berkata ” saya kemari untuk membantu anda bu, kenapa anda tidak menunggu didalam mobil bukankah disana lebih hangat? oh ya nama saya Bryan.Bryan masuk kedalam kolong mobil wanita itu untuk memperbaiki yang rusak.
Akhirnya ia selesai, tetapi dia kelihatan begitu kotor dan lelah, wanita itu membuka kaca jendela mobilnya dan berbicara kepadanya, ia berkata bahwa ia dari St Louis dan kebetulan lewat jalan ini.
Dia merasa tidak cukup kalau hanya mengucapkan terima kasih atas bantuan yang telah diberikan.Wanita itu berkata berapa yang harus ia bayar, berapapun jumlahnya yang ia minta tidak menjadi masalah, karena ia membayangkan apa yang akan terjadi jika lelaki tersebut tidak menolongnya. Bryan hanya tersenyum.

Bryan tidak mengatakan berapa jumlah yang harus dibayar, karena baginya MENOLONG ORANG BUKANLAH SUATU PEKERJAAN YANG HARUS DIBAYAR. Ia sangat yakin apabila menolong seseorang yang membutuhkan pertolongan tanpa suatu imbalan suatu hari nanti Tuhan pasti akan membalas amal perbuatanya.

Ia berkata kepada wanita itu ” Bila ia benar-benar ingin membalas jasanya, maka apabila suatu saat nanti ia melihat seseorang yang membutuhkan pertolongan maka tolonglah orang tersebut “…dan ingatlah pada saya”.

Bryan menunggu sampai wanita itu menstater mobilnya dan menghilang dari pandangan.
Setelah berjalan beberapa mil wanita itu melihat kafe kecil, lalu ia mampir kesana untuk makan dan beristirahat sebentar. Pelayan datang dan memberikan handuk bersih untuk mengeringkan rambutnya yang basah. Wanita itu memperhatikan sang pelayan yang sedang hamil, dan masih begitu muda. Lalu ia teringat kepada Bryan

Setelah wanita itu selesai makan dan, sang pelayan sedang mengambil kembalian untuknya, wanita itu pergi keluar secara diam-diam.

Setelah kepergiannya sang pelayan kembali, pelayan itu bingung kemana wanita itu pergi, lalu ia menemukan secarik kertas diatas meja dan uang $1000. Ia begitu terharu setelah membaca apa yang ditulis oleh wanita itu:
“Kamu tidak berhutang apapun pada saya karena seseorang telah menolong saya, oleh karena itulah saya menolong kamu, maka inilah yang harus kamu lakukan:
“Jangan pernah berhenti untuk memberikan cinta dan kasih sayang”.
Malam ketika ia pulang dan pergi tidur, ia berfikir mengenai uang dan apa yang di tulis oleh wanita itu.
Bagaimana wanita itu bisa tahu kalau ia dan suaminya sangat membutuhkan uang untuk menanti kelahiran bayinya?
Ia tau bagaimana suaminya sangat risau mengenai hal ini, lalu ia memeluk suaminya yang terbaring disebelahnya dan memberikan ciuman yang lembut sambil berbisik :”semuanya akan baik-baik saja sayangku, I Love You Bryan”.

Sahabat, ternyata sang pelayan tersebut adalah istri lelaki yang bernama Bryan.

“Segala sesuatu yang berputar akan selalu berputar”, therefore, don’t ever to stop to do good things in your life. (Oleh karena itu, jangan pernah berhenti untuk melakukan hal-hal baik dalam hidup Anda )

http://e-motis.blogspot.com/2010/12/kembalikan-tanganku-pa.html

Sepasang suami isteri seperti pasangan lain di kota-kota besar meninggalkan anak-anak untuk diasuh pembantu rumah ketika mereka bekerja. Anak tunggal pasangan ini, perempuan berusia tiga setengah tahun. Sendirian di rumah, dia sering dibiarkan pembantunya yang sibuk bekerja.

Dia bermain diluar rumah. Dia bermain ayunan, berayun-ayun di atas ayunan yang dibeli papanya, ataupun memetik bunga matahari, bunga kertas dan lain-lain di halaman rumahnya.

Suatu hari dia melihat sebatang paku karat. Dia pun mencoret semen tempat mobil ayahnya diparkirkan tetapi karena lantainya terbuat dari marmer, coretan tidak kelihatan. Dicobanya pada mobil baru ayahnya. Ya... karena mobil itu bewarna gelap, coretannya tampak jelas. Apa lagi kanak-kanak ini pun membuat coretan sesuai dengan kreativitasnya. Hari itu bapak dan ibunya mengendarai motor ke tempat kerja karena ada perayaan Thaipusam sehingga jalanan macet. Setelah penuh coretan yg sebelah kanan dia beralih ke sebelah kiri mobil. Dibuatnya gambar ibu dan ayahnya, gambarnya sendiri, lukisan ayam, kucing dan lain sebagainya mengikut imaginasinya. Kejadian itu berlangsung tanpa disadari si pembantu rumah.

Pulang petang itu, terkejutlah ayah ibunya melihat mobil yang baru setahun dibeli dengan angsuran. Si bapak yang belum lagi masuk ke rumah ini pun terus menjerit, "Kerjaan siapa ini?" Pembantu rumah yang tersentak dengan jeritan itu berlari keluar. Dia juga beristighfar. Mukanya merah padam ketakutan lebih2 melihat wajah bengis tuannya.

Sekali lagi diajukan pertanyaan keras kepadanya, dia terus mengatakan 'Tak tahu... !" "Kamu dirumah sepanjang hari, apa saja yg kau lakukan?" hardik si isteri lagi.Si anak yang mendengar suara ayahnya, tiba-tiba berlari keluar dari kamarnya. Dengan penuh manja dia berkata "Ita yg membuat itu papa.... cantik kan!" katanya sambil memeluk papanya ingin bermanja seperti biasa. Si ayah yang hilang kesabaran mengambil sebatang ranting kecil dari pohon bunga raya di depannya, terus dipukulkannya berkali2 ke telapak tangan anaknya.

Si anak yang tak mengerti apa-apa terlolong-lolong kesakitan sekaligus ketakutan. Puas memukul telapak tangan, si ayah memukul pula belakang tangan anaknya. Si ibu cuma mendiamkan saja, seolah merestui dan merasa puas dengan hukuman yang dikenakan. Pembantu rumah terbengong, tdk tahu hrs berbuat apa?. Si bapak cukup rakus memukul-mukul tangan kanan dan kemudian tangan kiri anaknya.

Setelah si bapak masuk ke rumah dituruti si ibu, pembantu rumah menggendong anak kecil itu, membawanya ke kamar. Dilihatnya telapak tangan dan belakang tangan si anak kecil luka2 dan berdarah. Pembantu rumah memandikan anak kecil itu. Sambil menyiram air sambil dia ikut menangis. Anak kecil itu juga terjerit-jerit menahan kepedihan saat luka2nya itu terkena air. Si pembantu rumah kemudian menidurkan anak kecil itu. Si bapak sengaja membiarkan anak itu tidur bersama pembantu rumah.

Keesokkan harinya, kedua-dua belah tangan si anak bengkak. Pembantu rumah mengadu. "Oleskan obat saja!" jawab tuannya, bapak si anak. Pulang dari kerja, dia tidak memperhatikan anak kecil itu yang menghabiskan waktu di kamar pembantu. Si bapak konon mau mengajar anaknya. Tiga hari berlalu, si ayah tidak pernah menjenguk anaknya sementara si ibu juga begitu tetapi setiap hari bertanya kepada pembantu rumah. "Ita demam...
" jawap pembantunya ringkas."Kasih minum panadol ," jawab si ibu.

Sebelum si ibu masuk kamar tidur dia menjenguk kamar pembantunya. Saat dilihat anaknya Ita dalam pelukan pembantu rumah, dia menutup lg pintu kamar pembantunya. Masuk hari keempat, pembantu rumah memberitahukan tuannya bahwa suhu badan Ita terlalu panas. "Sore nanti kita bawa ke klinik. Pukul 5.00 siap" kata majikannya itu. Sampai saatnya si anak yang sudah lemah dibawa ke klinik. Dokter mengarahkan ia dirujuk ke hospital karena keadaannya serius. Setelah seminggu di rawat inap doktor memanggil bapak dan ibu anak itu.

"Tidak ada pilihan.." katanya yang mengusulkan agar kedua tangan anak itu dipotong karena gangren yang terjadi sudah terlalu parah.
"Ia sudah bernanah, demi menyelamatkan nyawanya kedua tangannya perlu dipotong dari siku ke bawah" kata doktor.

Si bapak dan ibu bagaikan terkena halilintar mendengar kata-kata itu. Terasa dunia berhenti berputar, tapi apa yg dapat dikatakan. Si ibu meraung merangkul si anak. Dengan berat hati dan lelehan air mata isterinya, si bapak terketar-ketar menandatangani surat persetujuan pembedahan.

Keluar dari bilik pembedahan, selepas obat bius yang suntikkan habis, si anak menangis kesakitan. Dia juga heran2 melihat kedua tangannya berbalut kasa putih. Ditatapnya muka ayah dan ibunya. Kemudian ke wajah pembantu rumah. Dia mengerutkan dahi melihat mereka semua menangis. Dalam siksaan menahan sakit, si anak bersuara dalam linangan air mata.

"Papa.. Mama... Ita tidak akan melakukannya lagi. Ita tak mau dipukul papa. Ita tak mau jahat. Ita sayang papa.. sayang mama." katanya berulang kali membuatkan si ibu gagal menahan rasa sedihnya.

"Ita juga sayang Kak Narti.." katanya memandang wajah pembantu rumah, sekaligus membuatkan gadis dari Surabaya itu meraung histeris.

"Papa.. kembalikan tangan Ita. Untuk apa ambil.. Ita janji tdk akan mengulanginya lagi! Bagaimana caranya Ita mau makan nanti? Bagaimana Ita mau bermain nanti? Ita janji tdk akan mencoret2 mobil lagi," katanya berulang-ulang.

Serasa copot jantung si ibu mendengar kata-kata anaknya. Meraung2 dia sekuat hati namun takdir yang sudah terjadi, tiada manusia dapat menahannya.

form pelanggan

FROM PELANGGAN


Sub hapus()
kd_pelanggan.Enabled = True
ClearFORM Me
Call RubahCMD(Me, True, False, False, False)
cmdproses(1).Caption = "&baru"
End Sub

Sub prosesDB(Log As Byte)
Select Case Log
Case 0
SQL = "INSERT INTO pelanggan(kd_pelanggan, nama, alamat, telp)" & _
" values('" & kd_pelanggan.Text & _
"','" & nama.Text & _
"','" & alamat.Text & _
"','" & telp.Text & "')"
Case 1

SQL = "UPDATE pelanggan SET Nama ='" & nama.Text & "'," & _
" alamat = '" & alamat.Text & "'," & _
" telp = '" & telp.Text & "'," & _
" where kd_pelanggan ='" & kd_pelanggan.Text & "'"
Case 2
SQL = "DELETE FROM pelanggan WHERE kd_pelanggan='" & kd_pelanggan.Text & "'"
End Select
MsgBox "Pemorosesan RECORD Database telah berhasil...!", vbInformation, "Data pelanggan"
Db.Execute SQL, adCmdTable
Call hapus
Adodc1.Refresh
kd_pelanggan.SetFocus
End Sub

Sub Tampilpelanggan()
On Error Resume Next
kd_pelanggan.Text = RS!kd_pelanggan
nama.Text = RS!nama
alamat.Text = RS!alamat
telp.Text = RS!telp

End Sub

Private Sub Cmdproses_Click(Index As Integer)
Select Case Index
Case 0
Call hapus
kd_pelanggan.SetFocus
Case 1
If cmdproses(1).Caption = "&baru" Then
Call prosesDB(0)
Else
Call prosesDB(1)
End If
Case 2
x = MsgBox("Yakin RECORD produk Akan Dihapus...!", vbQuestion + vbYesNo, "pelanggan")
If x = vbYes Then prosesDB 2
Call hapus
kd_pelanggan.SetFocus
Case 3
Call hapus
kd_pelanggan.SetFocus
Case 4
Unload Me
End Select
End Sub

Private Sub Form_Load()
Call OPENDB
Call hapus


End Sub

Private Sub kd_pelanggan_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
If kd_pelanggan.Text = "" Then
MsgBox "Masukkan kd_pelanggan produk !", vbInformation, "pelanggan"
kd_pelanggan.SetFocus
Exit Sub
End If
SQL = "SELECT * FROM pelanggan WHERE kd_pelanggan='" & kd_pelanggan.Text & "'"
If RS.State = adStateOpen Then RS.Close
RS.Open SQL, Db, adOpenDynamic, adLockOptimistic
If RS.RecordCount <> 0 Then
Tampilpelanggan
Call RubahCMD(Me, False, True, True, True)
cmdproses(1).Caption = "&Edit"
kd_pelanggan.Enabled = False
Else
x = kd_pelanggan.Text
Call hapus
kd_pelanggan.Text = x
Call RubahCMD(Me, False, True, False, True)
cmdproses(1).Caption = "&baru"
End If
nama.SetFocus
End If
End Sub

CARA CEPAT DAN MUDAH BELAJAR VB 6.0

Sebelumnya saya akan menjelaskan pengertian visual Basic atau biasa disingkat vb, vb merupakan bahasa pemrograman yang sangat mudah dipelajari, dengan teknik pemrograman visual yang memungkinkan penggunanya untuk berkreasi lebih baik dalam menghasilkan suatu program aplikasi. Ini terlihat dari dasar pembuatan dalam visual basic adalah FORM, dimana pengguna dapat mengatur tampilan form kemudian dijalankan dalam script yang sangat mudah.

Saya sendiri juga masih newbie dengan vb, karena sebelumya di kampuz kami di ajarkan bahasa pemograman Delpi. Memang secara interface lebih bagus delpi namun lebih mudah menggunakan vb di bandingkan delpi, malah kami mendapat tugas berat dari dosen untuk membuat aplikasi program dari vb untuk di gunakan untuk pengganti ASEP yaitu system komputerisasi yang berisikan data-data mahasiswa dan dosen secara lengkap husus untuk jurusan Akuntansi. Jadi untuk memperdalam bahasa pemrograman vb ini saya sering sekali browsing untuk mendapatkan tutorial yang mudah di mengerti agar bisa lebih cepat ke tahap berikutnya. Dan alhamdullillah tugas tesebut sudah hamper selesai, tenang saja insyaallah akan saya publish ko sementara liat SSnya dulu yah whee… he…

Lanjut ke tutorial VB tadi yah, akhirnya saya mendapatkan tutorial yang sagat mudah dimengerti untuk para newbie,

from produk

Sub hapus()
kd_produk.Enabled = True
ClearFORM Me
Call RubahCMD(Me, True, False, False, False)
cmdproses(1).Caption = "&baru"
End Sub

Sub prosesDB(Log As Byte)
Select Case Log
Case 0
SQL = "INSERT INTO produk(kd_produk, nama, satuan, jumlah)" & _
" values('" & kd_produk.Text & _
"','" & nama.Text & _
"','" & satuan.Text & _
"','" & jumlah.Text & "')"
Case 1

SQL = "UPDATE produk SET Nama ='" & nama.Text & "'," & _
" satuan = '" & satuan.Text & "'," & _
" jumlah = '" & jumlah.Text & "'," & _
" where kd_produk ='" & kd_produk.Text & "'"
Case 2
SQL = "DELETE FROM produk WHERE kd_produk='" & kd_produk.Text & "'"
End Select
MsgBox "Pemorosesan RECORD Database telah berhasil...!", vbInformation, "Data produk"
Db.Execute SQL, adCmdTable
Call hapus
Adodc1.Refresh
kd_produk.SetFocus
End Sub

Sub Tampilproduk()
On Error Resume Next
kd_produk.Text = RS!kd_produk
nama.Text = RS!nama
satuan.Text = RS!satuan
jumlah.Text = RS!jumlah

End Sub

Private Sub Cmdproses_Click(Index As Integer)
Select Case Index
Case 0
Call hapus
kd_produk.SetFocus
Case 1
If cmdproses(1).Caption = "&baru" Then
Call prosesDB(0)
Else
Call prosesDB(1)
End If
Case 2
x = MsgBox("Yakin RECORD produk Akan Dihapus...!", vbQuestion + vbYesNo, "produk")
If x = vbYes Then prosesDB 2
Call hapus
kd_produk.SetFocus
Case 3
Call hapus
kd_produk.SetFocus
Case 4
Unload Me
End Select
End Sub

Private Sub Form_Load()
Call OPENDB
Call hapus


End Sub

Private Sub kd_produk_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
If kd_produk.Text = "" Then
MsgBox "Masukkan kd_produk produk !", vbInformation, "produk"
kd_produk.SetFocus
Exit Sub
End If
SQL = "SELECT * FROM produk WHERE kd_produk='" & kd_produk.Text & "'"
If RS.State = adStateOpen Then RS.Close
RS.Open SQL, Db, adOpenDynamic, adLockOptimistic
If RS.RecordCount <> 0 Then
Tampilproduk
Call RubahCMD(Me, False, True, True, True)
cmdproses(1).Caption = "&Edit"
kd_produk.Enabled = False
Else
x = kd_produk.Text
Call hapus
kd_produk.Text = x
Call RubahCMD(Me, False, True, False, True)
cmdproses(1).Caption = "&baru"
End If
nama.SetFocus
End If
End Sub

CINTA,KEHIDUPAN,PERSAHABATAN

Saat kau MENYUKAI seseorang, kau ingin memilikinya untuk keegoisanmu sendiri.
Saat kau MENYAYANGI seseorang, kau ingin sekali membuatnya bahagia dan bukan untuk dirimu sendiri.
Saat kau MENCINTAI seseorang, kau akan melakukan apapun untuk kebahagiaannya walaupun kau harus mengorbankan jiwamu.

Saat kau MENYUKAI seseorang dan berada di sisinya maka kau akan bertanya,"Bolehkah aku menciummu?"
Saat kau MENYAYANGI seseorang dan berada di sisinya maka kau akan bertanya,"Bolehkah aku memelukmu?"
Saat kau MENCINTAI seseorang dan berada di sisinya maka kau akan menggenggam erat tangannya...

SUKA adalah saat ia menangis, kau akan berkata "Sudahlah, jangan menangis."
SAYANG adalah saat ia menangis dan kau akan menangis bersamanya.
CINTA adalah saat ia menangis dan kau akan membiarkannya menangis di pundakmu sambil berkata, "Mari kita selesaikan masalah ini bersama - sama."

SUKA adalah saat kau melihatnya kau akan berkata, "Ia sangat cantik dan menawan."
SAYANG adalah saat kau melihatnya kau akan melihatnya dari hatimu dan bukan matamu.
CINTA adalah saat kau melihatnya kau akan berkata, "Buatku dia adalah anugerah terindah yang pernah Tuhan berikan padaku.."

Pada saat orang yang kau SUKAi menyakitimu, maka kau akan marah dan tak mau lagi bicara padanya.
Pada saat orang yang kau SAYANGi menyakitimu, engkau akan menangis untuknya.
Pada saat orang yang kau CINTAi menyakitimu, kau akan berkata, "Tak apa dia hanya tak tau apa yang dia lakukan."

Pada saat kau SUKA padanya, kau akan MEMAKSANYA untuk menyukaimu.
Pada saat kau SAYANG padanya, kau akan MEMBIARKANNYA MEMILIH.
Pada saat kau CINTA padanya, kau akan selalu MENANTINYA dengan setia dan tulus...

SUKA adalah kau akan menemaninya bila itu menguntungkan.
SAYANG adalah kau akan menemaninya di saat dia membutuhkan.
CINTA adalah kau akan menemaninya di saat bagaimana keadaanmu.

SUKA adalah hal yang menuntut.
SAYANG adalah hal memberi dan menerima.
CINTA adalah hal yang memberi dengan rela.

KEHIDUPAN DAN ARTI SYUKUR

Kita hidup hanya sementara,
Jadi kita tidak usah sombong dengan apa yang sudah kita miliki sekarang, dan kita juga jangan pernah merasa kekurangan dengan apa yang kita miliki sekarang.
Contoh, kita masih bersyukur masih bisa makan sehari dua kali bahkan ada yang lebih, dan mungkin anda juga orang yang sangat beruntung bisa menikmati akses Internet baik dari Hp atau pun Warnet - warnet yang berada di kota anda, untuk slalu dapat Mencari informasi terbaru, Coba sekali - kali anda memperhatikan orang - orang yang selalu berada di jalan - jalanan misalnya anak - anak pengamen lampu merah, jual - jual koran, Tukang becak dayung, pemulung, dan orang yang tinggal di sudut - sudut Kota. Jangan kan Akses Internet untuk makan aja mereka sulit, betapa minimnya pengetahuan mereka tentang dunia luar ataupun inovasi - inovasi terbaru di jaman moderen sekarang ini,
Jadi bagi anda yang serba kecukupan, bersyukur lah dengan apa yang anda miliki sekarang, dan jangan pula anda sombong dengan harta dan jabatan yang anda peroleh sekarang,
karena dengan anda bersyukur dengan apa yang anda miliki, Niscaya Insya Allah, Allah akan memberikan kelipatan dengan apa yang pernah anda miliki sekarang.

Pernahkah anda memberikan sebagian apa yang anda miliki kepada orang yang tidak mampu?
Ingat hidup ini hanya sementara, Dan apa yang kita miliki sekarang hanyalah titipan Sang Ilahi,
tidak ada salahnya kita bersyukur dan memberikan sedikit apa yang kita miliki, kepada orang yang tidak mampu.

mungkin anda beranggapan kalau anda orang yang giat dan telaten sehingga anda bisa memiliki apa yang anda miliki sekarang, dan beranggapan kalau orang yang tidak mampu itu orang yang rendah,
Anda salah jika anda berfikiran seperti itu, semua itu kembali dengan kuasa Illahi, karena soal keberuntungan, mungkin anda termasuk orang yang beruntung, dan orang yang tidak mampu itu orang yang belum beruntung, walau pun Ia bekerja sekeras mungkin kalau rejzeki dan keberuntungan belum di pihak Dia untuk saat ini.
Jadi jangan pernah layas kepada orang yang berada di bawah anda, karena mereka lebih pintar ilmunya & lebih banyak pengalaman Alamnya dari pada anda, umur empat tahun aja mereka sudah dilatih mencari duit, dan umur lima tahun mereka sudah dapa menghasilkan uang sendiri untuk biaya hidup, sementara dengan anda yang sehariannya makan dan uang masih dari orang tua sendiri, bahkan tidak banyak dari anda yang baru menghasilkan uang sendiri.

Coba Anda bayangkan apa bila anda berada pada posisi mereka.! Berada pada perempatan jalan, menjadi seorang pemulung atau pengamen jalanan?
Mungkin anda belum sanggupkan? Jadi Anda jangan merasa pernah kekurangan dengan apa yang anda miliki sekarang, bersyukurlah atas pemberian Sang Illahi kepada anda, mungkin belum saat ini anda memperoleh apa yang anda ingin miliki sekarang, bersabarlah dan selalu berdoa agar di mudahkan jalan Anda.