s Imooet

s Imooet

Cari Blog Ini

Selasa, 22 Juni 2010

Pict's Family (jgn dketawain y) hixhix..












Friend's Kampoez







coba deh ungkapin cinta dgn ilmu IPA atau ilmu IPS..

Archimedes dan Newton tak akan mengerti Medan magnet
yang berinduksi di antara kita
Einstein dan Edison tak sanggup merumuskan E=mc2
Ah tak sebanding dengan momen cintaku

Pertama kali bayangmu jatuh tepat di fokus hatiku
Nyata, tegak, diperbesar dengan kekuatan lensa
maksimum
Bagai tetes minyak milikan jatuh di ruang hampa
Cintaku lebih besar dari bilangan avogadro...

Walau jarak kita bagai matahari dan Pluto saat
aphelium
Amplitudo gelombang hatimu berinterfensi dengan hatiku
Seindah gerak harmonik sempurna tanpa gaya pemulih
Bagai kopel gaya dengan kecepatan angular yang tak
terbatas

Energi mekanik cintaku tak terbendung oleh friksi
Energi potensial cintaku tak terpengaruh oleh tetapan
gaya
Energi kinetik cintaku = -mv~
Bahkan hukum kekekalan energi tak dapat menandingi
hukum kekekalan di antara kita

Lihat hukum cinta kita
Momen cintaku tegak lurus dengan momen cintamu
Menjadikan cinta kita sebagai titik ekuilibrium yang
sempurna
Dengan inersia tak terhingga
Takkan tergoyahkan impuls atau momentum gaya

Inilah resultan momentum cinta kita...


ATAU



Dengan hormat,
Hal : Penawaran Kesepakatan

Saya sangat gembira memberitahukan Anda bahwa saya
telah jatuh cinta kepada Anda terhitung tanggal 17
April 2003.

Berdasarkan rapat keluarga kami tanggal 15 Mei lalu
pukul 19.00 WIB, saya berketetapan hati untuk
menawarkan diri sebagai kekasih Anda yang prospektif.

Hubungan cinta kita akan menjalin masa percobaan
minimal 3 bulan sebelum memasuki tahap permanen.

Tentu saja, setelah masa percobaan usai, akan diadakan
terlebih dahulu on the job training secara intensif
dan
berkelanjutan. Dan kemu dian , setiap tiga bulan
selanjutnya akan diadakan juga evaluasi performa kerja
yang bisa menuju pada pemberian kenaikan status dari
kekasih menjadi pasangan hidup.

Biaya yang dikeluarkan untuk kerumah makan dan
shooping akan dibagi 2 sama rata antara kedua belah
pihak. Selanjutnya didasarkan pada performa dan
kinerja Anda, tidak tertutup kemungkinan bahwa saya
akan menanggung bagian yang lebih besar pengeluaran
total.

Akan tetapi, saya cukup bijaksana dan mampu menilai,
jumlah dan bentuk pengeluaran yang Anda keluarkan
nantinya.

Saya dengan segala kerendahan hati meminta Anda untuk
menjawab penawaran ini dalam waktu 30 hari
terhitung tanggal penerimaan surat . Lewat dari tanggal
tersebut, penawaran ini akan dibatalkan tanpa
pemberitahuan lebih lanjut, dan tentu saja saya akan
beralih dan mempertimbangkan kandidat lain.

Saya akan sangat berterimah kasih apabila Anda
berkenan untuk meneruskan surat ini kepada adik
perempuan, sepupu bahkan teman dekat anda, apabila
Anda menolak penawaran ini.

Demikian penawaran yang dapat saya ajukan dan
sebelumnya terima kasih atas perhatiannya.

Hormat saya,

Bakal calon pasanganmu

Rawat Rambut Yuk, aiih rambut yg dikepala neeh...-_*

Lakukan pola hidup sehat

Pola hidup sehat mencakup tidak merokok, rajin berolahraga secara teratur, mengkonsumsi makanan bergizi, juga melakukan refreshing dan relaksasi agar pikiran tidak menjadi stress. Untuk makanan, Anda dapat mengkonsumsi makanan yang mengandung vitamin A, C, E, selenium karena zat ini yang sangat baik menjaga kesehatan rambut.

Usahakan tidur cukup dan nyenyak setiap hari

Bila tidur Anda terganggu, hal ini dapat menyebabkan sirkulasi darah tidak lancar. Akibatnya rambut tidak mendapat nutrisi yang cukup dan menyebabkan rambut kusam. Oleh karena itu, jangan bebani pikiran Anda dengan hal-hal yang dapat mengganggu tidur Anda.

Gunakan produk perawatan rambut yang sesuai

Bila menggunakan produk perawatan rambut, perhatikan komposisi produk. Hindari produk yang berbahan alkohol dalam konsentrasi tinggi karena kandungan tersebut dapat merusak rambut. Saat menggunakan produk tersebut, jangan langsung dikenakan di kulit kepala karena menyebabkan pori-pori kepala tertutup dan dapat merusak kulit kepala yang selanjutnya merusak rambut.

Bila berenang, olesi dengan air basa atau penutup rambut

Tujuan dari hal ini adalah agar rambut tidak terkontaminasi dengan air kolam yang kandungan kimianya dapat merusak rambut Anda.

Gunakan sisir dari kayu

Sisir yang terbuat dari kayu dapat mengurangi kerontokan rambut. Kebersihan sisir juga perlu dijaga agar kotoran yang ada dalam sisir tidak melekat pada rambut Anda.

Pilih shampoo yang sesuai

Setelah memperhatikan jenis rambut, hal ini menjadi dasar bagi Anda untuk memilih shampo yang akan dipakai. Pilih shampo yang berkualitas yang sesuai dengan kondisi rambut.

Masak,Iseng" ajah, coba'in

BLUEBERRY CHEESE CAKE


Bahan:
250gr biskuit coklat
100 gr margarine, lelehkan
½ sdt vanilli bubuk
200gr gula pasir
4 btr telur
1 sdt emulsifier
1 Kg cheese krim
250gr sour krim
100ml kahlua (bila suka)
250ml krim kental
1 sdm gula pasir
250 gr selai blueberry




Cara membuat:

1. Siapkan loyang bongkar pasang 22cm/24cm, olesi mentega. Sisihkan
2. Hancurkan biskuit hingga halus, lalu tuang margarine leleh, dan vanili bubuk, aduk rata.
3. Masukkan adonan biskuit pada loyang, ratakan dan tekan-tekan sampai padat, oven sebentar (lk. 10 menit), angkat, sisihkan.
4. Kocok gula dan telur dengan mixer kecepatan tinggi hingga naik, tambahkan emulsifier, kocok terus hingga kental, masukkan cheese krim, dan sour krim bergantian sambil dikocok terus, tuangkan kahlua (bila suka).
5. Tuangkan adonan ini kedalam loyang tadi (yg sudah beralas biskuit), lalu panggang dengan cara au bain marie selama 90 menit.
6. Angkat, dinginkan di suhu kamar hingga dingin betul.
7. Sementara itu kocok krim kental dan gula pasir hingga kental, oleskan diatas cheese cake, lalu bekukan dalam kulkas selama lk. 3 s/d 4 jam.
8. Ratakan selai blue berry diatasnya, hias dengan coklat bentukan atau buah-buahan kaleng, potong-potong , sajikan.

*****

Modifikasi Blueberry Cheesecake dengan Blackcherry oleh Dewi Anwar


Bahan utk crust (dasar cake) :
• 250 gr biscuit oreo, marrie
• 100 gr margarine, lelehkan
• 1/2 sdt vanila bubuk
• kopi instant (bila menggunakan oreo)
• 1 kaleng black cherry kalengan tiriskan syrupnya (300gr)

Bahan cake :
• 200 gr gula pasir
• 4 btr telur
• 1 kg cream cheese
• 250 gr sour cream

Bahan frosting :
• 250 ml whipped cream cair
• 1 sdm gula pasir
• 250 gr selai blueberry


Cara membuat :
1. Siapkan loyang bongkar pasang 22 cm, olesi mentega
2. Hancur biscuit hingga halus, tuang margarine leleh,vanila, dan kopi
instant, aduk rata.
3. Masukan adonan biscuit pada loyang, ratakan dan tekan2 sampai
padat. Oven sebentar 5-10 menit, angkat, sisihkan.
4. Adonan cake, kocok telur dan gula hingga kental dan mengembang,
masukan cream cheese dan sour cream bergantian sambil terus dikocok
sampai lembut.
5. Susun black cherry diloyang isi biscuit (diatas biscuit), lalu
tuang adonan cake, oven dengan cara au bain marie selama 90 menit,
angkat, dinginkan, keluarkan dari loyang.
6. Dinginkan dalam lemari pendingin sampai 1 jam. Keluarkan.
7. Kocok whipped cream dan gula pasir sampai kental, olesi diatas
cake. Ratakan selai blueberry diatasnya, hias sesuai selera.
8. Simpan dalam lemari pendingin selama 4 jam.


Resep Kue Chocolate tart (cokelat)

Untuk 16 potong

Bahan tart cokelat :
6 butir telur
125 gram gula pasir
1 ½ sendok teh emulsifier (SP/TBM)
125 gram tepung terigu protein sedang
30 gram cokelat bubuk
15 gram susu bubuk
½ sendok teh baking powder
125 gram margarin, dilelehkan
½ sendok teh cokelat pasta
400 gram buttercream untuk olesan

Bahan isi :
100 ml susu cair
250 gram cokelat masak pekat, dipotong-potong
100 gram kacang madu, dicincang halus

Bahan toping :
100 ml susu cair
1 sendok makan madu
200 gram cokelat masak pekat, dipotong-potong

Bahan sirup (aduk rata)
2 sendok makan gula pasir
2 sendok makan air hangat
1 sendok makan esens rhum



Cara membuat Kue Chocolate tart (tart cokelat)  :
1.        Cake : kocok telur, gula pasir, dan emulsifier sampai mengembang. Tambahkan tepung terigu, cokelat bubuk, susu bubuk, dan baking powder sambil diayak dan diaduk rata.
2.        masukkan margarin leleh dan cokelat pasta sedikit sedikit sambil diaduk perlahan
3.        tuang di loyang diameter 22 cm, tinggi 7 cm yang dioles margarin dan dialas kertas roti
4.        oven 35 menit dengan suhu 180 derajat celcius sampai matang
5.        Isi : panaskan susu cair. Matikan api. Masukkan potongan cokelat masak pekat. Aduk sampai cokelat larut. Tambahkan kacang madu. Aduk rata. Dinginkan. Kocok rata
6.        belah 3 cake. Ambil selembar cake. Oles dengan bahan sirup. Oles dengan bahan isi. Tutup lagi dengan cake yang lain.
7.        Tutup cake dengan butter cream. Garis sisinya dengan penggaris segitiga. Dinginkan.
8.        Toping: panaskan susu cair dan madu. Matikan api. Masukkan potongan cokelat masak pekat. Aduk sampai cokelat larut.
9.        Tuang diatas cake sampai ke sisinya secara tidak rata. Dinginkan dan hias dengan buah buahan

RESEP KUE BOLU GULUNG PANDAN PISANG COKELAT

RESEP KUE BOLU GULUNG PANDAN PISANG COKELAT
RESEP KUE BOLU GULUNG PANDAN PISANG COKELAT
Cara Membuat Bolu Gulung adalah sebagai berikut :
1. Tata pisang ambon di dasar loyang 2424×3 cm yang di alas kertas roti tanpa dioles margarin dan beri jarak. Sisihkan
2. Kocok telur, gula pasir, dan emulsifier sampai mengembang
3. tambahkan tepung terigu dan tepung maizena sambil diayak dan diaduk rata
4. Masukkan margarin leleh, santan, air suji, pewarna hijau, dan garam sedikit-sedikit sambil diaduk perlahan
5. Tuang diatas pisang ambon. Kukus 20 menit dengan api sedang sampai matang
6. Oles tipis buttercream. Tabur meises di salah satu sisi. Gulung sambil dipadatkan

Bahan adalah sebagai berikut :
25 gram buttercream untuk olesan
20 gram meises cokelat untuk taburan
25 ml santan kental instan
1 sendok makan air suji (dari 25 lembar daun suji dan sendok teh air)
4 tetes pewarna hijau
sendok teh garam
3 buah pisang ambon, dibelah empat bagian
6 kuning telur 3 putih telur 100 gram gula pasir
1 sendok teh emulsifier (SP/TBM)
50 gram tepung terugu protein sedang
10 gram tepung maizena
25 gram margarin, dilelehkan





Penyakit Kanker Kulit

Penyakit Kanker Kulit

Penyakit kanker kulit dewasa ini cenderung mengalami peningkatan jumlahnya terutama di kawasan Amerika, Australia dan Inggris. Berdasarkan beberapa penelitian, mereka orang-orang kulit putih yang lebih banyak menderita jenis kanker kulit ini. Hal tersebut diprediksikan sebagai akibat seringnya mereka terkena (banyak terpajan) cahaya matahari. Di Indonesia penderita kanker kulit terbilang sangat sedikit dibandingkan ke-3 negara tersebut, namun demikian kanker kulit perlu dipahami karena selain menyebabkan kecacatan (merusak penampilan) juga pada stadium lanjut dapat berakibat fatal bagi penderita.

Penyakit Kanker Kulit adalah suatu penyakit yang ditandai dengan pertumbuhan sel-sel kulit yang tidak terkendali, dapat merusak jaringan di sekitarnya dan mampu menyebar ke bagian tubuh yang lain. Ada tiga jenis kanker kulit yang umumnya sering diderita manusia, diantaranya adalah karsinoma sel basal (KSB), karsinoma sel skuamosa (KSS) dan melanoma maligna (MM).
Kanker Kulit Ganas

·  Karsinoma Sel Basal (KSB)
Merupakan jenis penyakit kanker kulit yang paling banyak diderita. Kanker jenis ini tidak mengalami penyebaran (metastasis) kebagian tubuh lainnya, tetapi sel kanker dapat berkembang dan menyebabkan kerusakan jaringan kulit sekitarnya. Warna kulit yang terang dan sering terkena pijaran cahaya matahari keduanya diduga sebagai penyebab Karsinoma Sel Basal. Faktor lain yang juga dapat menjadi penyebab jenis kanker ini adalah system imun tubuh yang lemah (baik dampak penyakit lain atau pengobatan), luka bakar, sinar X-ray.

1. Tanda dan Gejala
Bagian tubuh yang terserang kanker sel basal biasanya wajah, leher dan kulit kepala. Adapun tanda-tanda penyakit kanker berjenis ini adalah benjolan yang agak berkilat, kemerahan dengan pinggir meninggi yang berwarna agak kehitaman, kelainan seperti jaringan parut dan lecet/lika yang tidak sembuh-sembuh.

2. Diagnosa Jenis kanker
Metode tunggal untuk memastikan penyakit kanker sel basal yaitu Dokter akan melakukan pemeriksaan klinis dan histopatologis dengan mengambil sample bagian kulit yang di anggap sebagai jaringan kanker (biopsy) untuk diteliti dibawah mikroskop.

3. Therapy dan Pengobatan
Apabila diagnosa telah ditegakkan secara jelas bahwa penderita mengalami kanker kulit berjenis sel basal, maka tindakan yang dilakukan umumnya adalah pembedahan atau pengangkatan jaringan kulit (kanker) secara komplit, atau dapat pula dengan tindakan penyinaran. Metode lainnya yang juga kerap dilakukan adalah bedah beku, bedah listrik, laser, fotodinamik serta dengan obat-obatan baik yang dioleskan maupun disuntikkan (kemoterapi).
·  Karsinoma Sel Skuamosa (KSS)
Merupakan jenis penyakit kanker kulit yang lebih banyak diderita pria terutama kaum lanjut usia (lansia). Ini adalah jenis kanker kulit dimana terjadi keganasan sel keratinosit epidermis, merupakan kanker kulit ke dua tersering. Penyakit kanker kulit KSS ini dapat menyebar kebagian tubuh yang lain, umumnya diderita mereka yang berada diwilayah tropik.

Seperti halnya penyakit KSB, kanker kulit jenis ini juga diduga akibat sinar matahari (dominannya), Imun tubuh yang lemah, virus, bahan-bahan kimia dan jaringan parut juga dapat menimbulkan penyekit ini. Adapun tanda dan gejalanya ialah mempunyai kelainan berupa benjolan-benjolan atau luka yang tidak sembuh-sembuh. Diagnosa ditegakkan dengan metode yang sama pada KSB, begitupun tindakan therapy dan pengobatan cenderung sama dengan kanker sel basal.
·  Melanoma Maligna (MM)
Ini adalah jenis penyakit kanker kulit yang paling ganas dan berpotensi mematikan. Di Amerika, didapatkan data enam dari tujuh penderita kanker ini meninggal dunia. Dan jumlah orang yang terserang meningkat dari tahun ke tahun. Melanoma Maligna bisa berkembang dari tahi lalat timbul yang sudah ada atau yang baru muncul.

1. Tanda dan Gejala
Informasi ini sangat penting sekali bagi meraka yang memiliki tahi lalat yang kemudian mengalami perubahan baik warna, ukuran maupun bentuknya, Tahi lalat terkadang terasa gatal dan bila digaruk mengeluarkan darah. Sel kanker ini tumbuh dari melanosit, yaitu sel kulit yang berfungsi menghasilkan zat warna melanin.

Kanker ini dicirikan dengan ABCD, yaitu A= Asimetrik, bentuknya tak beraturan. B= Border atau pinggirannya juga tidak rata. C= Color atau warnanya yang bervariasi dari satu area ke area lainnya. Bisa kecoklatan sampai hitam. Bahkan dalam kasus tertentu ditemukan berwarna putih, merah dan biru. D= Diameternya lebih besar dari 6 mm.

2. Diagnosa Melanoma Maligna
Penegakan diagnosa pada kasus penyakit kanker kulit jenis ini sama halnya dengan kedua jenis kanker kulit di atas (KSB dan KSS), yaitu dilakukannya tindakan biopsy untuk pemeriksaan dibawah mikroskop.

3. Therapy dan Pengobatan
Melanoma Maligna merupakan jenis kanker kulit yang paling ganas, dapat menyebar kebagian tubuh lainnya seperti kelenjar limfa. Tindakan yang dilakukan pada penderita kanker jenis ini adalah pengangkatan secara komplit jaringan kanker dengan jalan pembedahan, apabila telah diketahui terjadi penyebaran maka dibutuhkan operasi lanjutan untuk mengangkat jaringan di sekitarnya. Jika sel kanker ditemukan menyebar ke kelenjar limfa, maka mau tidak mau kelenjarnya juga diangkat.

Rahasia Agung Dibalik Shodaqoh..

Rahasia Agung Dibalik Shadaqah
Ini sebuah kisah nyata dari Ustad Yusuf mansur...

Di suatu perjalanan dari Sukabumi menuju Jakarta, 3 bulan yang lalu, sebelum bulan Romadhon

Saat tertidur di perjalanan, terbangunlah Ust. Yusuf Mansur (di bangunkan Alloh SWT) dengan rasa kepingin pipis. Tidak jauh di depan ada sebuah SPBU, diputuskanlah untuk buang air kecil di SPBU tersebut.

Setelah mobil di parker dan turun dari mobil, terlihat berlari tergopoh-gopoh seorang satpam SPBU menghampirinya.
”Assalammualaikum pak ustad” salam si satpam.
“waalaikumsalam”, ustad menjawab.
“begini pak ustad saya ingin cerita alias ngobrol-ngobrol dengan pak ustad”, sambar si satpam. “oh ya pak nanti ya setelah saya buang air kecil, tunggu dulu aja disini sebentar”,kata ustad Yusuf sembari dia berjalan menuju toilet. Akan tetapi si satpam bukannya menunggu malahan dia mengikuti di belakang ustad, si Ustad pun mengulangi perkataannya,
”pak tunggu aja sebentar ga lama ko”.
Si satpampun nyengir sembari berkata,”saya mau solat asar dulu pak”. Ustad melihat jam tangannya yang menunjuk jam 16.55.
”baru mau solat asar? Ya sudah cepet waktu asar bentar lagi habis”. “ya pak, waktu tugas saya baru selesai jadi baru sempet solat”,jawab si satpam.

Di dalam toilet setelah selesai buang air kecil ustad Yusuf merenenung, “tadi tertidur terus kebangun karena pingin pipis, pas ada SPBU, terus mampir, terus ketemu si satpam. Pasti Allah SWT sudah menjodohkan saya dengan si satpam itu tadi. Ya sudah akan saya dengar dia mau cerita apa.”

Ustad Yusuf di ajak ngobrol di kantin SPBU
“Begini pak ustad saya udah bosen kerja di sini, saya ga betah”, kata si satpam
“lho ga betah? Udah berapa lama kerja di sini?”, Tanya Ustad
“udah 7 tahun pak”, jawab si satpam
“nah itu betah namanya,kerja udah 7 tahun”, kata ustad lagi
“bukan gitu pak, habis ga ada kerjaan lain pak”,
“terus kenapa bisa ga betah?”
“gajinya kecil pak ustad”
“emang berapa gaji?”
“gaji perbulan saya 1,7 jt”
“Alhamdulillah, segitu kurang pak?, bapak udah punya istri dan anak? pasti ada yang salah dengan bapak”, sambar Ustad Yusuf
Si satpampun nyengir kuda,”hehe,saya ambil motor pak dan saya punya istri dan seorang anak”
“ya benar tebakan saya, emang uang cicilannya berapa per bulan?”
“925.000 per bulan pak”. (pantes aja gaji kagak cukup,itu namanya besar pasak dari pada tiang)
“saya pingin hidup saya berubah pak ustad ga gini-gini aja”, lanjut si satpam.
“ada 2 syarat kalau anda pingin berubah. Yang pertama benerin dulu tuh solat bapak, bagai mana mau berubah kalo solat aja telat. Solatlah tepat pada waktunya, begitu suara adzan terdengar maka berhentilah dari semua aktivitas, bergegas ambil wudhu dan kerjakaan sholat.”
Sholat asar kurang lebih jam 15.00, tapi anda mengerjakan pukul 17.00, berarti bapak telat 2 jam. Sehari 5 waktu sholat, 2 x 5 = 10 jam, sebulan 10 x 30 = 300 jam (12,5 hari), setahun 12,5 x 12 = 150 hari (5 bln), masa kerja 7 x 5 = 35 bln (3 th). Itu baru di kali waktu kerja bapak 7 thn di SPBU, kalo di kali umur bapak sesudah masa baligh sampe sekarang? Udah habis waktu bapak sia-siakan, percepatan waktu bapak jelas kalah dengan teman-teman bapak, sodara-sodara bapak yang menunaikan ibadah solat tepat pada waktunya. Yang lain udah naik pesawat, bapak masih naik sepeda aja. Yang lain udah hidup enak bapak masih gini-gini aja.”, papar ustad Yusuf
Sambil manthuk-manthuk si satpam bertanya lagi,”syarat yang ke 2 apa pak ustad?”.
“yang ke 2 berinfak dan bersodakohlah kamu, sisihkanlah dari penghasilan bapak”.
Si satpampun nyamber,”OK pak saya mau benerin solat saya tapi untuk syarat yang ke 2 saya ga sanggup pak ustad, gimana mau infak dan sodakoh? Penghasilan saya aja pas-pasan bahkan kurang pak ustad”.
Sambil geleng-geleng pak ustad berkata,“semua makhluk yang ada di jagat raya ini sudah di atur rejekinya masing-masing oleh Alloh SWT, hewan-hewan dan tumbuhan tak terkecuali. Jangankan orang yang bekerja, pengangguran aja sudah di bagi rejekinya, apalagi yang bekerja, saya mau nanya, mana ada sekarang pengangguran yang tidak makan sehari-harinya?? Pasti makan, kalo ada yang tidak atau kurang makan, silahkan datang ke rumah saya untuk makan. Namanya syarat berarti wajib, mau berubah nasibnya ga?,
" mau pak ustad, tapi berapa sedekahnya ?"
" sebulan gaji deh "
" sebulan gaji ? terus makan keluarga saya ?"
" gini aja bapak bilang ke atasan, bon dulu uang gaji bulan depan untuk infak dan sodakoh”. Si satpam terbengong-bengong, pertentangan batin sangatlah kuat antara iklas dan tidak, pecahlah itu perang baratayudha di dalam hatinya. Dan akhirnya sambil menghela nafas panjang si satpam berkata,”baiklah pak ustad 2 syarat tadi akan saya laksanakan dengan sebaik-baiknya, terimakasih pak ustad saya udah mengganggu waktu ustad.
“Alhamdulillah, nggak apa-apa, lakukanlah syarat tadi dengan semata-mata mengharap ridho Alloh SWT.”

Berpisahlah si satpam dengan Ustad Yusuf Mansyur.

Malam harinya si satpam gendu-gendu rasa dengan istrinya, apa-apa yang sudah di obrolin dengan Ustad Yusuf. Alhamdulillah sang istripun mendukung niatan dari suaminya dengan penuh hati.

Kemudian Pagi harinya si satpam menghadap kepada komandannya,
“ndan, saya mau ngebon uang gaji saya bulan depan, boleh ga ndan?”
“boleh aja tapi alasannya buat apa?” Tanya balik si komandan
Si satpam pun terdiam, iya iya buat apa? Masa alasan ngebon untuk infak dan sodakoh, kan ga lucu.
“heh di Tanya ko malah diam!!”, komandan menyentak
“ya ndan kemarin saya ketemu ustad yusuf mansyur, syarat untuk merubah nasib saya salah satunya bersodakoh, jadi saya ngebon mau buat sodakoh ndan”, jawabnya dengan lirih dan agak malu-malu.
Si komandannya ketawa...
“ hahaha masa kamu kasbon buat sodakoh ?, yang bener aja ? tp OK lah, nanti ya saya Tanya boz besar dulu, kan dia yang meng-ACC”.
Si komandan pun langsung bergegas menghadap boz untuk mengutarakan hajat si satpam anak buahnya.
“pagi boz, gini salah satu satpam anak buah saya, mau ngebon uang gajinya bulan depan, di ACC ga boz?”
" buat apaan ?"
" katanya sih mau di gunakan untuk sodakoh boss "

“mau buat sodakoh?” sambil mantuk-mantuk dan cengar-cengir si boz menyambar lagi,” aneh banget, ya sudah, bilang ama dia boleh, akan saya kasih dia bon gaji bulan depan, suruh kesini dia "

Si satpam masuk ruangan boss nya.
" katanya kamu mau kasbon gaji bulan depan dan uangnya mau buat sedekah ?"
" iya boss, saya mau merobah nasib "
" merobah gimana ?
si satpam pun njelasin ke boss nya, kalo mau berubah nasib harus sedekah. dan si boss pun percaya gak percaya.

Singkat cerita si satpam udah mendapatkan uangnya dan telah menghabiskannya untuk berinfak dan sodakoh bagi sodara-sodara dan tetangganya yang kurang mampu.

Hari-hari pun berlalu, sampai tibalah di bulan yang baru. Alhamdulillah semua teman-temannya pada gajian, sendiri-sendiri ga gajian, karena bulan lalu udah di bon. Tapi hari demi hari berlalu, seorang teman satpamnya bertanya-tanya apakah si satpam itu tadi hidupnya serba kekurangan atau tidak, temannya pun melakukan survey, oh ternyata si satpam telah menjual motornya, pantes lempeng aja dia. Si bos pun terus bertanya-tanya sambil menunggu si satpam kenapa ga datang-datang lagi, lempeng amat tu bocah ya, merasa penasaran si bos pun memanggil si satpam untuk menghadapnya di kantin.

“gimana mau ngebon lagi ga untuk bulan depan, kan uang bulan ini udah ga ada?” tantang si bos.
“Alhamdulilah ga pak bos.”
Tiba-tiba temennya nyeletuk dari belakang,”dia abis jual motornya boz”.
“oh abis jual motor, pantes ka gak ngebon lagi.”
“ga bos saya jual motor ga buat saya dan keluarga makan bos, tetapi saya jual untuk menambahi sodakoh saya!”.elak si satpam
Tambah terbengong-bengong si bos dan penasaran,
“gini bos saya ceritain, selepas saya bersodakoh hari-hari terakhir di bulan lalu saya sempet terbesit di hati rasa was-was dan gundah. Mau makan apa saya dan keluarga saya bulan depan. Eh di awal bulan kemaren Alhamdulillah nama istri saya nyangkut di surat warisan keluarga di kampung, di situ tertera angka 17jt untuk istri saya”.
Si bos pun nyamber lagi.”lah kenapa kamu jual itu motor?”
“saya malu sama ustad yusuf, seandainya pada saat itu saya jual motor untuk sodakoh pasti Alloh SWT akan membalasnya dengan lebih besar lagi. Alhamdulillah sekarang saya dan istri punya warung sembako di rumah sebagai usaha sampingan, semoga dengan ini nasib saya sedikit-sedikit akan berubah menjadi baik dan lebih mulia di mata Alloh SWT ”.
“Amin,”

Semoga dari cerita nyata ini dapat memotifasi teman-teman, bapak-bapak dan ibu-ibu untuk mencontoh si satpam tadi. Ada 2 syarat jika anda sekalian ingin merubah nasib anda di muka bumi ini dan mulia di mata Alloh SWT:
1. Sholat tepat waktu
2. Berinfak dan bersodakohlah dalam keadaan lapang maupun sempit dengan iklas.

Kedua syarat tersebut dilakukan dengan semata-mata untuk mendapat ridho Alloh SWT


Pernahkah mendengar kisah tentang seorang yang menjadi kaya karena rajin bershodaqoh? Atau, ingatkah kita kisah ‘Aisyah, istri Rasulullah, yang memberikan dua buah rotinya kepada dua orang pengemis, padahal roti itu yang tersisa untuk buka puasanya? Dimana yang terjadi selanjutnya, Allah menggantikan pemberian itu dengan kambing bakar yang di atasnya terdapat roti yang diantar oleh seorang tetangganya. Padahal, tetangga tersebut belum pernah memberi hadiah apapun sebelumnya.
      Dalam Al Quran, kita tahu tentang janji Allah yang akan melipatgandakan shodaqoh kita dengan 700X lipat dari apa yang kita shodaqohkan (QS. Al-Baqaroh : 261). Pada kenyataannya, ternyata banyak manfaat lain shodaqoh. Diantaranya, dapat menyelamatkan si pemberi dari kejadian buruk. Selain itu, shodaqoh juga ampuh untuk menyembuhkan penyakit si pemberi. Gak percaya? Kisah berikut buktinya.
      Adalah Muhammad bin Wadhoh, seorang imam, hafizh, dan ahli hadits. Beliau adalah budak dari penguasa Andalusia. Waro’, zuhud, sabar dalam menyebarkan ilmu serta jauh dari perbuatan maksiat adalah hal lain yang diketahui dari dirnya. Suatu hari ketika beliau sedang asyik berbincang dengan tamunya, datang seseorang membawa kabar tentang anak beliau yang ditabrak dan dilindas gerobak. Tetapi ia tidak begitu peduli dengan berita buruk itu.
      Bahkan beliau mengambil bukunya dan meminta seorang qori’ untuk memanjangkan bacaannya. Tak lama seorang lelaki lain datang menepis berita buruk tadi dengan mengabarkan, “bergembiralah wahai Abu Abdillah, Alhamdulillah anak anda selamat. Roda gerobak itu hanya menyerempet bajunya hingga ia terjatuh, namun ia tak sampai cidera”, jelas si pembawa berita.
      Maka Muhammad bin Wadhoh menjawab “ Alhmadulillah, aku yakin akan hal itu, karena hari ini aku melihat anakku memberikan uang recehan kepada seorang miskin, jadi aku tahu tidak akan ada suatu keburukan pun yang akan menimpanya siang ini. Lalu ia mengutip hadist : ‘sesungguhnya Allah akan menolak kematian yang buruk atas seseorang karena shodaqoh yang dikeluarkannya’’.
      Kisah lain menyangkut seorang laki-laki yang datang kepada Ibnu Mubarok dan bertanya tentang solusi atas luka bernanah yang keluar dari lututnya sejak tujuh tahun yang lalu. Ia sudah mengobati lukanya dengan berbagai jenis obat, namun kesembuhan masih enggan menyapanya. Maka Ibnu Mubarok memberikan solusi cerdas yang sulit dicerna oleh akal jika kita memakai logika saja. “Pulanglah, lalu galilah sumur di tempat orang-orang yang membutuhkan air. Sesungguhnya aku berharap akan keluar mata air di sana dan darahmu akan berhenti”.
      Apa hubungan shodaqoh dengan kesembuhan lukanya? Simak apa kata Rasulullah “Obatilah yang sakit di antara kalian dengan shodaqoh, lindungilah harta kalian dengan zakat, dan bersiaplah menghadapi cobaan dengan doa.( HR. Al-Baihaqi). Selanjutnya laki-laki itu melaksanakan perintah Ibnu Mubarok., dan  .... ia pun sembuh.
      Subhanallah. Ada banyak rahasia agung yang tersimpan dalam shodaqoh. Ibarat mutiara yang tersimpan rapi dalam cangkang sebuah kerang yang kita tidak pernah tahu kemuliaan apa yang akan dipancarkannya. Walau kadang logika menolak ! Namun  itulah ajaibnya shodaqoh, memberi dua manfaat sekaligus. Untuk orang yang kita beri dan juga insya Allah manfaat untuk kita sendiri. Wallahua’lam.

Dibalik Sholat DHUHA..

Shalat Dhuha mengandung manfaat sangat besar. Nabi bersabda dalam Hadits Qudsi, Allah berfirman, “Wahai anak Adam , jangan sekali-kali engkau malas mengerjakan empat rakaat shalat dhuha, karena dengan shalat tersebut, Aku cukupkan kebutuhanmu pada sore harinya.” (HR Hakim dan Tabrani). Nabi juga bersabda ,”Barangsiapa melakukan 2 rakaat shalat Dhuha disertai tidak berkata sesuatu kecuali kebaikan , maka dosanya akan diampuni meskipun banyaknya melebihi buih dilautan.” (HR Abu Daud)
Dari Abu Hurairah melalui Imam Thabrani Rasulullah saw telah bersabda, “Sesungguhnya di surga itu ada sebuah pintu yang disebut pintu Dhuha. Kelak di hari kiamat, para penikmat dhuha akan diundang secara khusu. Dikatakan kepada mereka, inilah pintu masuk kalian. Masuklah dengan rahmat-Ku.
Dari Abu Dzarr RA, dia bekata, Rasulullah SAW bersabda “Hendaklah masing2 diantara kalian setiap pagi bersedekah untuk setiap ruas tulang badannya. Maka setiap bacaan tasbih (subhanallah) adalah sedekah, setiap bacaan tahmid (alhamdulillah) adalah sedekah, setiap bacaan tahlil (laa ilaha illallah) adalah sedekah, setiap bacaan takbir (Allahu Akbar) adalah sedekah, menyuruh kebaikan adalah sedekah, melarang keburukan adalah sedekah, dan sebagai ganti dari semua itu, cukuplah mengerjakan dua rakaat salat Dhuha” (HR. Ahmad, Muslim, dan Abu Daud).
Dari Abu Buraidah bahwa Rasulullah SAW bersabda “Dalam tubuh manusia itu terdapat 360 ruas tulang. Ia diharuskan bersedekah untuk tiap ruas itu”. Para sahabat bertanya: “Siapa yang kuat melaksanakan itu wahai Rasulullah?”. Rasulullah menjawab: “Menutup dahak di masjid dengan tanah atau menyingkirkan sesuatu gangguan dari tengah jalan itu berarti sedekah, atau sekiranya mampu, cukuplah diganti dengan mengerjakan dua rakaat salat Dhuha“.
Subhanallah, betapa besarnya barokah atas sholat sunnah dhuha ini. Betapa tidak, seandainya sholat dhuha tidak ada, maka kita harus melakukan sedekah untuk setiap ruas tulang tubuh kita yang jumlahnya mencapai 360 buah. Apakah kita mampu melakukannya setiap pagi? Islam memang agama yang mudah dan tidak memberatkan umatnya. Untuk meringankan perihal bersedekah untuk 360 ruas tulang badan ini, kemudian Allah memberikan jalan yang sangat mudah dan ringan, yaitu cukup dengan melakukan sholat sunnah 2 rakaat setiap pagi. Sungguh Allah Maha Bijaksana.
Hadits-hadits di atas juga memberikan anjuran kepada kita agar senantiasa memperbanyak tasbih, tahmid, tahlil, takbir, melakukan amar ma’ruf dan nahi munkar.
Pentingnya sholat dhuha bagi umat muslim bukanlah hal yang diragukan dan dipertanyakan lagi. Sedemikian pentingnya sampai-sampai Allah telah bersumpah dalam beberapa ayat dalam AL Quran dengan waktu dhuha, seperti dalam surat Asy Syam. Bahkan, di dalam AL Quran juga terdapat sebuah surat yang bernama Ad Dhuha.
Yang perlu kita pahami adalah bahwa setiap kali Allah bersumpah dengan sesuatu, maka pada sesuatu tersebut tentunya terdapat rahasia yang agung dan memiliki manfaat yang besar. Maka, manakala Allah bersumpah dengan Dhuha, itu artinya banyak sekali tersimpan rahasia agung dan manfaat yang besar di dalam waktu Dhuha.
Bahkan, dalam sebuah doanya Rasulullah saw senantiasa memohon kepada Allah, “Allahumma baarik ummatii fii bukuuriha”, yang artinya adalah “Ya Allah, berikanlah keberkahan kepada ummatku diwaktu pagi”. Hal ini menunjukkan bahwa orang-orang yang aktif pada waktu pagi (shubuh dan dhuha) untuk berjuang mencari rizki yang halal akan memperoleh limpahan barokah dari Allah swt. Maka dengan demikian, bagi orang-orang yang terlena dengan tidurnya hingga lupa untuk melaksanakan sholat shubuh, dan yang bermalas-malsan untuk melakukan sholat dhuha, tidak akan mendapatkan berkah pagi dari Allah swt.
Ini menunjukkan bahwa orang-orang yang aktif dan bangun di waktu pagi (waktu subuh dan dhuha) untuk beribadah kepada Allah dan mencari nafkah yang halal, ia akan mendapatkan keberkahan. Sebaliknya, mereka yang terlena dalam mimpi-mimpi dan tidak sempat shalat Subuh pada waktunya, ia tidak kebagian keberkahan itu. Adapun doa yang dibaca setelah sholat dhuha adalah:
“Allâhumma innadh dhuhâ-a dhuhâ-uka wal bahâ-a bahâ-uka wal jamâla jamâluka wal quwwata quwwatuka wal qudrata qudratuka wal ‘ishmata ‘ishmatuka. Allâhumma in kâna rizqî fis samâ-i fa anzilhu wa in kâna fil ardhi fa akhrijhu wa in kâna mu’assiran fayassirhu wa in kâna haraman fathahhirhu wa in kâna ba’îdan faqarribhu bihaqqi dhuhâ-ika wabahâ-ika wajamâlia waquwwatika waqudratika âtinî mâ âtaita min ‘ibâdikash shâlihîn.”
“Ya Allah, sesungguhnya waktu dhuha itu adalah waktu dhuha-Mu, keagungan itu adalah keagungan-Mu, keindahan itu adalah keindahan-Mu, kekuatan itu adalah kekuatan-Mu, kekuasaan itu adalah kekuasaan-Mu, dan perlindungan itu adalah perlindungan-Mu. Ya Allah, jika rezekiku masih diatas langit maka turunkanlah, dan jika di dalam bumi maka keluarkanlah, jika masih sukar maka mudahkanlah, jika rezekiku haram maka sucikanlah. Jika masih jauh maka dekatkanlah. Dengan kebenaran waktu dhuha-Mu dan keagungan-Mu, dengan kebenaran keindahan-Mu dan kekuatan-Mu, dan perlindungan-Mu limpahkanlah kepada kami segenap apa yang telah Engkau limpahkan kepada hamba-hamba-Mu yang saleh“.
Sholat Dhuha adalh salah satu jenis sholat sunnah yang terkenal sebagai sholat untuk menarik rizki. Hal ini sesuai dengan isi doa dari sholat tersebut, “Ya Allah, jika rezekiku masih diatas langit maka turunkanlah, dan jika di dalam bumi maka keluarkanlah, jika masih sukar maka mudahkanlah, jika rezekiku haram maka sucikanlah. Jika masih jauh maka dekatkanlah.”
Meskipun demikian, inti dari segala jenis ibadah adalah untuk mengabdi kepada Allah swt. Maka jangan sampai sholat dhuha ini hanya diorientasikan kepada pengejaran rizki saja, tetapi juga harus lebih mengarah kepada sebuah usaha yang dilakukan dalam rangka beribadah hanya kepada-Nya.

Bekerja Itu Ibadah ..

Bekerja bukan hanya kebutuhan, tapi juga kewajiban. Berpahala jika dilakukan, berdosa kalau ditinggalkan. Anas bin Malik meriwayatkan bahwa seorang lelaki dari kaum Anshar datang menghadap Rasulullah saw dan meminta sesuatu kepada beliau. Rasulullah saw bertanya, “Adakah sesuatu di rumahmu?”
“Ada, ya Rasulullah!” jawabnya, “Saya mempunyai sehelai kain tebal, yang sebagian kami gunakan untuk selimut dan sebagian kami jadikan alas tidur. Selain itu saya juga mempunyai sebuah mangkuk besar yang kami pakai untuk minum.”
“Bawalah kemari kedua barang itu,” sambung Rasulullah saw. Lelaki itu membawa barang miliknya dan menyerahkannya kepada Rasulullah. Setelah barang diterima, Rasulullah saw segera melelangnya. Kepada para sahabat yang hadir pada saat itu, beliau menawarkan pada siapa yang mau membeli. Salah seorang sahabat menawar kedua barang itu dengan harga satu dirham. Tetapi Rasulullah menawarkan lagi, barangkali ada yang sanggup membeli lebih dari satu dirham, “Dua atau tiga dirham?” tanya Rasulullah kepada para hadirin sampai dua kali. Inilah lelang pertama kali yang dilakukan Rasulullah.
Tiba-tiba salah seorang sahabat menyahut, “Saya beli keduanya dengan harga dua dirham.”
Rasulullah menyerahkan kedua barang itu kepada si pembeli dan menerima uangnya. Uang itu lalu diserahkan kepada lelaki Anshar tersebut, seraya berkata, “Belikan satu dirham untuk keperluanmu dan satu dirham lagi belikan sebuah kapak dan engkau kembali lagi ke sini.”
Tak lama kemudian orang tersebut kembali menemui Rasulullah dengan membawa kapak. Rasulullah saw melengkapi kapak itu dengan membuatkan gagangnya terlebih dahulu, lantas berkata, “Pergilah mencari kayu bakar, lalu hasilnya kamu jual di pasar, dan jangan menemui aku sampai dua pekan.”
Lelaki itu taat melaksanakan perintah Rasulullah. Setelah dua pekan berlalu ia menemui Rasulullah melaporkan hasil kerjanya. Lelaki itu menuturkan bahwa selama dua pekan ia berhasil mengumpulkan uang sepuluh dirham setelah sebagian dibelikan makanan dan pakaian. Mendengar penuturan lelaki Anshar itu, Rasulullah bersabda, “Pekerjaanmu ini lebih baik bagimu daripada kamu datang sebagai pengemis, yang akan membuat cacat di wajahmu kelak pada hari kiamat.”
Rasulullah saw memberikan pelajaran menarik tentang pentingnya bekerja. Dalam Islam bekerja bukan sekadar memenuhi kebutuhan perut, tapi juga untuk memelihara harga diri dan martabat kemanusiaan yang seharusnya dijunjung tinggi. Karenanya, bekerja dalam Islam menempati posisi yang teramat mulia. Islam sangat menghargai orang yang bekerja dengan tangannya sendiri. Rasulullah saw pernah ditanya, “Pekerjaan apakah yang paling baik?” Beliau menjawab, “Pekerjaan terbaik adalah usaha seseorang dengan tangannya sendiri dan semua perjualbelian yang dianggap baik,” (HR Ahmad dan Baihaqi).
Sedemikian tingginya penghargaan itu sehingga orang yang bersungguh-sungguh bekerja disejajarkan dengan mujahid fi sabilillah. Kerja tak hanya menghasilkan nafkah materi, tapi juga pahala, bahkan maghfirah dari Allah SWT. Rasulullah saw bersabda, “Jika ada seseorang yang keluar dari rumah untuk bekerja guna mengusahakan kehidupan anaknya yang masih kecil, maka ia telah berusaha di jalan Allah. Jika ia bekerja untuk dirinya sendiri agar tidak sampai meminta-minta pada orang lain, itu pun di jalan Allah. Tetapi jika ia bekerja untuk berpamer atau bermegah-megahan, maka itulah ‘di jalan setan’ atau karena mengikuti jalan setan,” (HR Thabrani).
Kerja juga berkait dengan martabat manusia. Seorang yang telah bekerja dan bersungguh-sungguh dalam pekerjaannya akan bertambah martabat dan kemuliannya. Sebaliknya, orang yang tidak bekerja alias menganggur, selain kehilangan martabat dan harga diri di hadapan dirinya sendiri, juga di hadapan orang lain. Jatuhnya harkat dan harga diri akan menjerumuskan manusia pada perbuatan hina. Tindakan mengemis, merupakan kehinaan, baik di sisi manusia maupun di sisi Allah SWT. Orang yang meminta-minta kepada sesama manusia tidak saja hina di dunia, tapi juga akan dihinakan Allah kelak di akhirat. Rasulullah saw bersabda, “Demi Allah, jika seseorang di antara kamu membawa tali dan pergi ke bukit untuk mencari kayu bakar, kemudian dipikul ke pasar untuk dijual, dengan bekerja itu Allah mencukupi kebutuhanmu, itu lebih baik daripada ia meminta-minta kepada orang lain,” (HR Bukhari dan Muslim).
Bekerja juga berkait dengan kesucian jiwa. Orang yang sibuk bekerja tidak akan ada waktu untuk bersantai-santai dan melakukan ghibah serta membincangkan orang lain. Ia akan menggunakan waktunya untuk meningkatkan kualitas kerja dan usaha. Begitu pentingnya arti bekerja, sehingga Islam menetapkannya sebagai suatu kewajiban. Setiap Muslim yang berkemampuan wajib hukumnya bekerja sesuai dengan bakat dan kemampuannya.
Abu Hanifah adalah seorang ulama besar yang sangat dihormati. Ilmunya luas dan muridnya banyak. Di tengah kesibukannya belajar dan mengajar, ia masih menyempatkan diri untuk bekerja sehingga tidak jelas apakah ia seorang pedagang yang ulama atau ulama yang pedagang. Baginya, berusaha itu suatu keharusan. Sedangkan berjuang, belajar dan mengajarkan ilmu itu juga kewajiban.
Tentang nilai usaha ini, Islam tidak hanya bicara dalam tataran teori, tapi juga memberikan contohnya. Rasulullah saw adalah seorang pekerja. Para sahabat yang mengelilingi beliau juga adalah para pekerja. Delapan sahabat Rasulullah saw yang dijamin masuk surga adalah para saudagar yang kaya. Kenapa orang yang bekerja itu mendapatkan pahala di sisi Allah SWT? Jawabannya sederhana, karena bekerja dalam konsep Islam merupakan kewajiban atau fardhu. Dalam kaidah fiqh, orang yang menjalankan kewajiban akan mendapatkan pahala, sedangkan mereka yang meninggalkannya akan terkena sanksi dosa. Tentang kewajiban bekerja, Rasulullah bersabda, “Mencari rezeki yang halal itu wajib sesudah menunaikan yang fardhu (seperti shalat, puasa dan sebagainya),” (HR ath-Thabrani dan al-Baihaqi)
Karena bekerja merupakan kewajiban, maka tak heran jika Umar bin Khaththab pernah menghalau orang yang berada di masjid agar keluar untuk mencari nafkah. Umar tak suka melihat orang yang pada siang hari tetap asyik duduk di masjid, sementara sang mentari sudah terpancar bersinar.


Buat Program DataBase ( ada VB'y jg )

Buat Program Database

Gunakan DataEnvironment Designer

© 2000, by Fuad Harahap for www.geocities.com/visiweb

Bagi para veteran versi 5 tentunya kamu biasa menggunakan DOA dalam pembuatan program database. Tapi kali ini saya akan mengajak kamu untuk mencoba membuat program basis data (database) dengan cara cepat dan mudah, yaitu dengan menggunakan fasilitas baru dari Visual Basic 6.0, yang disebut "DataEnvironment Designer". 

DataEnvironment Designer, apalagi itu ???

Terlalu banyak istilah dan fasilitas memang terkadang membuat pusing kepala, apa lagi tidak ditunjang dengan referensi yang singkat dan jelas. Oke, nggak usah 'kuatir, sering-sering aja berkunjung ke situs ini saja, siapa tau kamu bakal 'nemu informasi yang sedang kamu cari, khususnya masalah pemrograman. 
Baik, DataEnvironment Designer adalah fitur baru yang terdapat pada VB 6.0 dan fitur ini belum atau tidak terdapat pada Visual Basic versi sebelumnya.
Fitur ini menawarkan pembuatan program database dengan cara interactive. Pada saat design, kamu dapat mengatur nilai property untuk Connection dan Command object, menulis kode untuk merespon event dari ActiveX Data Object (ADO). 
Hal yang juga menarik, kamu bisa men-drag field yang terdapat pada DataEnvironment object ke dalam Form atau Report (laporan) untuk membuat data-bound kontrol.
Khusus bagi kamu para pengguna Microsoft Visual FoxPro 6.0, mungkin kamu-kamu sudah nggak asing lagi dengan DataEnvironment Designer, tapi, DataEnvironment Designer yang terdapat pada VB 6.0 ini, jauh lebih canggih dibandingkan dengan yang ada di VFP 6.0, jadi kenapa 'nggak bermigrasi aja ke Visual Basic 6.0 ? Pokoknya oke punya dehh... 

Sejarah Singkat

Sebelum kita bergerak terlalu jauh ada baiknya kita mengenal dulu apa itu ADO, DAO dan RDO pada Visual Basic. Bagi kamu yang mungkin merupakan pendatang baru di pemrograman basis data dengan menggunakan Visual Basic, —perlu kamu ketahui— khusus pada VB 6.0 terdapat tiga 'interface' untuk pengaksesan data, yaitu ;
1. ADO :  ActiveX Data Objects
2. RDO :  Remote Data Object
3. DAO :  Data Access Objects  

Kenapa ada tiga 'interface' untuk data access pada Visual Basic? 

Seperti kita Microsoft, teknologi data access selalu berkembang dengan cepat. Teknologi terakhir adalah ADO, yang menawarkan kemudahan dan fleksibilitas dibandingkan dengan RDO atau DOA.
Selain itu ADO juga mudah untuk dipelajari.
Menurut Microsoft teknologi RDO dan DOA yang masih di-ikut sertakan kedalam VB 6.0 hanyalah untuk menjaga kompatibilitas dengan program yang dikembangkan dengan Visual Basic versi sebelumnya (versi 3,4 dan 5).
Jadi kesimpulannya, kalo kamu mengembangkan suatu aplikasi basis data baru, gunakan saja teknologi terakhir yang disebut ADO —(ActiveX Data Objects)—.

Why Use ADO?

Ini pertanyaan cerdas, kenapa begitu ? 'kalo kamu penggemar FS. Millennium yang ditayangkan di RCTI 
—Note: Millennium episode baru akan kembali ditayang mulai Kamis, 2 November 2000— maka tokoh utama dalam FS ini selalu bertanya dengan Why, dan bukan dengan How atau What. 
Sebab menurut Frank Black, bertanya dengan Why menandakan si-penanya sudah cukup 'tau tentang hal tersebut, yang pingin diketahui hanyalah alasan kenapa hal tersebut yang dipilih atau dilakukan. 
Kembali ke ADO, alasan menggunakan teknologi ini karena, ADO (ActiveX Data Objects) di disain untuk memudahkan interaksi aplikasi dengan data access sesuai dengan paradigma baru yang dikembangkan oleh Microsoft yaitu OLE DB. OLE DB menyedikan 'high-performance' untuk meng-akses semua jenis data source, termasuk didalamnya non-relational database dan relational (ORACLE-InterBase-BD2), email dan file systems, text dan grafik, dan lainnya. 
Untuk lebih jelasnya mengenai teknologi pengaksesan database silahkan kamu lihat 'Data Access Guide' pada on-line help VB.

Ayo! Buat Project baru

Untuk mengembangkan suatu program aplikasi dengan menggunakan VB 6.0 langkah pertama yang harus kita lakukan adalah membuat suatu proyek baru. Jalankan VB 6.0 kemudian dari kotak dialog New Project pilih Standard EXE.
Gambar 1. Kotak dialog New Project
Sebelum memulai proyek baru sebaiknya persiapkan dulu database dalam format MS Access yang akan kita gunakan sebagai sarana eksperimen.
Database yang digunakan untuk experimen kita bisa berasal dari contoh-contoh database yang disertakan pada Visual Basic (misal; biblio.mdb atau nwind.mdb, keduanya terletak di "C:\Program Files\Microsoft Visual Studio\VB98") atau bisa juga dengan membuat database baru.
Untuk pembuatan database baru dalam format MS Acces, bisa kita pilih satu diantara dua cara dibawah ini:
1. Gunakan Microsoft Access 98 atau Microsoft Access 2000
2. Gunakan Visual Basic {dari menu utama VB 6.0 pilih Add-Ins|Visual Data Manager}
Catatan: selain itu bisa juga menggunakan database yang telah saya sediakan (penjualan.mdb) yang bisa didownload bersama dengan contoh program serta artikel ini. Click disini untuk download.

Tambahkan Object DataEnvironment  kedalam Project

Setelah menyiapkan file database (*.mdb) dan setelah membuat project baru maka proses berikutnya adalah menambahkan object DataEnvironment ke kedalam project:
Langkah 1:
Buat referensi ke DataEnvironment,  caranya; click mouse-kanan pada Tool Box untuk menampilkan menu pop-up. Kemudian dari menu pop-up tersebut pilih Components..., lihat Gambar 2.
Gambar 2. VB 6.0 Tool Box
Selanjutnya akan ditampilkan kotak dialog Components, pilih tab Designers dan pastikan kamu telah mengaktifkan pilihan 'Data Environment' seperti yang terlihat pada Gambar 3.
Gambar 3. Tab Designers dari kotak dialog Components
Langkah 2:
Tambahkan Data Environment Designer kedalam project, caranya dari menu utama VB 6.0 pilih Project|More ActiveX Designers...|Data Environment. Lihat Gambar 4 sebagai bahan acuan.
Gambar 4. Menu Project dari VB 6.0
Setelah kamu selesai mengakses menu Project|More ActiveX Designers...|Data Environment maka jendela Data Environment Designer akan segera ditampilkan. Lihat Gambar 5, sebagai acuan.
Selain itu terjadi penambahan folder baru "Designers" pada jendela Project Explorer.
Catatan: jika kamu tidak melihat jendela Project Explorer, maka untuk mengaktifkannya kamu bisa mengakses menu utama VB 6.0 pilih View|Project Explorer.


Gambar 5. Tampilan Jendela Data Environment Design (kiri) serta Project Explorer (kanan)
Langkah 3:
Setelah DataEnvironment object masuk kedalam project, maka secara default VB akan memberi nama DataEnvironment1, selanjutnya adalah tugas kamu untuk merubah nama default tersebut menjadi suatu nama yang lebih memiliki arti.
Dalam pemberian nama, biasanya untuk DataEnvironment selalu diawali dengan (prefix) 'de', misalnya dalam contoh kasus ini, diberi nama dePenjualan.
Untuk merubah properti nama, pilih jendela Properties atau tekan F4, kemudian dari Object Selector pilih DataEnvironment1. Pada properti (Name) isikan dengan "dePenjualan". Silahkan lihat Gambar 6 dibawah ini.
Gambar 6. Jendela Properties
Catatan: jika kamu tidak melihat jendela Properties, maka dapat di aktifkan dengan mengakses menu utama VB 6.0 kemudian pilih View|Properties Window atau bisa juga menekan tombol F4. 

Setelah melakukan perubahan pada properti Name dari DataEnvironment object, maka jendela Project Explorer akan telihat seperti pada Gambar 7.
Gambar 7. Project Explorer setelah perubahan properti Name dari DataEnvironment

Jendela DataEnvironment Design

Banyak tombol yang terletak pada Toolbar dari jendela DataEnvironment, beberapa di antaranya berguna untuk melakukan proses setup properti dari DataEnvironment object, dan yang lainnya berguna untuk membuat 'Connection' dan 'Command object'.
Gambar 8. Tampilan Jendela DataEnvironment
Catatan: tepatnya 12 tombol pada Toolbar dari jendela DataEnviromnet, yaitu: Add Connection, Add Command, Insert Stored Procedures, Add Child Command, Delete, Refresh, Design, Properties, View Code, Options, Arrange by Connections, dan Arrange by Objects.
 
Apa kegunaan dari ke-12 tombol tersebut? Untuk lebih jelasnya kamu-kamu dapat melihat keterangan lengkapnya di Online Help VB 6.0.

Membuat Connection Object 

Saat kamu menambakkan DataEnvironment kedalam project, maka VB 6.0 secara otomatis akan menambahkan connection object (nama default: Connection1). Connection object kurang lebih adalah ADO connection string, yang didalamnya berisi informasi koneksi ke database, sepeti database provider, lintasan data (path) dan nama file.
Ikuti langkah-langkah berikut untuk membuat suatu Connection object.
Langkah 1:
Ganti dulu nama defaultnya.
Caranya; tekan F4 untuk menampilkan jendela Properties, kemudian dari object selector pilih Connection1, dari properti Name ganti menjadi "conPenjualan", seperti yang terlihat pada Gambar 9. 
Tiga hurup pertama (con) adalah merupakan prefix untuk object Connection.
Gambar 9. Tampilan Jendela DataEnvironment & Jendela Properties
Langkah 2:
Click tombol Properties yang terdapat pada toolbar dari jendela DataEnvironment, hal ini dimaksudkan untuk melakukan proses setup properti Connection Object, lihat Gambar 10. Pengaksesan tombol ini akan menampilkan kotak dialog Data Link Properties.
Gambar 10. Tampilan Jendela Data Environment
Langkah 3:
Dari kotak dialog Data Link Properties yang ditampilkan, terdapat empat tab, yaitu: (1) Provider, digunakan untuk memilih data provider, (2) Connection, digunakan untuk membuat Connection String, (3) Advanced, digunakan untuk mengaturan Network Settings dan Access Permissions, dan (4) All, menampilkan semua daftar Connection object. 
Dari tab Provider, pilih Microsoft Jet 4.0 OLE DB Provider (jika database yang digunakan dibuat dengan MS-Access 2000, pilih yang satu ini, 'kalo kamu menggunakan contoh database yang saya sertakan alias yang kamu download). 
Setelah itu tekan tombol Next untuk selanjutnya menuju tab Connection. 
Catatan: jika database yang dikoneksikan dibuat dengan menggunakan Access97 maka kamu harus memilih; Microsoft Jet 3.51 OLE DB Provider.  Sedangkan bagi kamu yang membuat database dengan mengunakan Access2000 maka kamu harus memilih; Microsoft Jet 4.0 OLE DB Provider. Jangan sampai keliru!
Gambar 11. Kotak dialog Data Link Properties|Provider
Langkah 4:
Pada tab Connection, kamu akan membuat 'connection string', pada edit box database name masukan nama database yang akan digunakan (pada contoh ini digunakan database 'penjualan.mdb'). 
Alternatif lain, kamu bisa memasukan nama database lain yang akan digunakan. 
Untuk memasukan nama database tersebut, kamu bisa langsung mengetiknya kedalam edit box, atau dengan menekan tombol ellipsis (...) yang terletak di kanan edit box database name. Lihat Gambar 12 sebagai bahan acuan.
Gambar 12. Kotak dialog Data Link Properties|Connection
Langkah 5:
Setelah kamu melakukan proses 'Connection', kini saatnya untuk mencoba koneksi yang dibuat tersebut. Caranya click tombol Test Connection yang terletak pada tab Connection bagian kanan bawah. Lihat Gambar 12 sebagai bahan acuan.
Selanjutnya akan ditampilan kotak pesan yang akan menginformasikan sukses tidaknya connection yang telah kamu buat. Bila connection benar maka akan ditampilkan pesan "Test connection succeeded".

Membuat Command Objects

Command objects merupakan hal yang penting dalam DataEnvironment object. Command object kurang lebih adalah recordset dimana kamu bisa mengakses database. 
Command object dapat berupa suatu table, view, stored procedure, atau juga SQL query.

Untuk membuat suatu Command object, kamu bisa mengikuti langkah berikut ini:

Langkah 1
Click tombol Add Command yang terdapat pada toolbar dari jendela DataEnvironment. Sebuah Command object baru segera akan ditampilkan, secara default akan diberi nama Command1, lihat Gambar 13 sebagai bahan acuan.
Gambar 13. Kotak dialog Data Link Properties|Connection
Langkah 2
Dari jendela DataEnvironment pilih Command1 (yang baru saja terbentuk, dengan cara di-click) kemudian click tombol mouse sebelah kanan, maka akan tampil menu pop-up. Dari menu pop-up tersebut pilih Properties..., selanjutnya akan ditampilkan kotak dialog "commandName Properties" seperti terlihat pada Gambar 14.
Ganti Command Name dengan (misalnya; Pelanggan). Biasanya, sebuah Command object diberi nama sesuai dengan nama Tabel yang akan digunakan atau bisa juga nama SQL query.
Gambar 14. Kotak dialog Properties dari Command object
Langkah 3
Setelah sumber data untuk command object selesai di-set, selanjutnya jendela DataEnvironment akan terlihat seperti pada Gambar 15.
Gambar 15. Jendela DataEnvironment setelah Command object selesai di-set

Proses terakhir, Hubungkan DataEnvironment dengan Form

Setelah objek DataEnvironment selesai dibuat, tahap berikutnya adalah menghubungkannya dengan Form, dalam hal ini Form bertindak sebagai media untuk menampilkan data.
Ikuti langkah dibawah ini.
Langkah 1:
Pilih Form1 dari jendela Project Explorer, dan sesuaikan ukuran dari form tersebut sehingga nantinya dapat menampung semua field yang akan di letakkan diatas form tersebut.
Langkah 2:
Atur letak jendela DataEnvironment serta jendela Form1 secara bersebelahan seperti terlihat pada Gambar 16.
Langkah 3:
Lakukan proses drag & drop field yang diingkan ke Form1, kamu bisa memilih field tertentu yang kamu kehendaki untuk diletakan pada Form1. 
Gambar 16. Jendela DataEnvironment & jendela Form1
Untuk mendrag semua field yang terdapat pada command object, caranya, drag command object (Pelanggan) dan letakan di atas Form1, maka hasilnya akan terlihat seperti pada Gambar 16b.
Gambar 16b. Tampilan Form1 sesudah proses drag-drop Command object
Setelah field yang diinginkan (bisa juga semua) diletakan diatas Form1, maka kamu dapat merubah properti dari masing-masing komponen tersebut, dalam contoh ini, mungkin kamu pingin merubah properti Caption dari masing-masing Label.

Coba Jalankan Project

Setelah meletakan field dari DataEnvironment ke dalam Form, dan setelah mengadakan penyesuaian terhadap properti Caption dari masing-masing Label, kini saatnya melakukan proses uji coba.
Untuk menjalankan project maka dari menu utama VB pilih Run|Start atau tekan F5. Apabila semua tahapan pengembangan project dilakukan dengan benar, maka hasilnya akan tampak seperti pada gambar 17.
Gambar 17. Tampilan Form1 saat Run-Time
Seperti yang kamu lihat,  ketika kamu menjalankan project ini maka Form1 akan menampilkan record pertama dari tabel "pelanggan".

Ber-Navigasi ria ... 

Secara default, DataEnvironment object 'nggak menyedikan fasilitas untuk bernavigasi (tombol naik-turun record), serta tidak juga menyediakan fasilitas editing data (tambah, edit, hapus). 
Untuk kedua hal tersebut kamu harus menulis kode program. Kode program yang kamu tulis tersebut mengacu pada penggunaan properti dan metode dari ADO recordset.
Pada artikel ini, saya memfokuskan pembahasan hanya pada pembuatan fasilitas navigasi, sedangkan fasilitas untuk proses editing record (tambah, edit, hapus) akan saya jelaskan pada artikel terpisah, jadi stay terus di www.geocities.com/visiweb.
DataEnvironment object secara otomatis akan membuat recordset object untuk setiap command object (dlm contoh ini, command object saya namakan "pelanggan"). Nama dari recordset object yang tercipta tersebut adalah sama dengan nama dari command object tetapi diawali dengan hurup depan (prefix) rs. Dalam contoh ini recordset tersebut secara otomatis diberi nama rsPelanggan.
Untuk membuat fasilitas navigasi ikut langkah dibawah ini.
Langkah 1:
Letakan empat buah CommanButton pada Form1.
Langkah 2:
Ubalah propertis name & label dari setiap CommanButton tersebut. Lihat tabel dibawah ini.
Tabel 1. Pengaturan properti dari masing-masing Tombol Navigasi
Nama Komponen
Property
Value
CommandButton1
Name
cmbAwal

Caption
&Awal



CommandButton2
Name
cmbSebelum

Caption
&Sebelum



CommandButton3
Name
cmbBerikut

Caption
&Berikut



CommandButton4
Name
cmbAkhir

Caption
Akhi&r
Langkah 3:
Berikan perintah pada setiap event-click dari masing-masing tombol navigasi tersebut, sebagai illustrasi lihat Gambar 18.
Gambar 18. Tampilan dari jendela Code Editor, berikan perintah pada setiap event-click dari tombol navigasi
Untuk lebih jelasnya saya sertakan Source Code dari Form1.FRM, seperti yang terlihat dibawah ini.
Source code untuk Form1.FRM
 
Option Explicit
 
Private Sub cmdRecAwal_Click()
  dePenjualan.rsPelanggan.MoveFirst
End Sub
 
Private Sub cmbRecSebelum_Click()
  With dePenjualan.rsPelanggan
    .MovePrevious
    If .BOF Then
      .MoveFirst
      MsgBox "Awal Record, Data Pelanggan.", vbOKOnly, "Informasi"
    End If
  End With
End Sub
 
Private Sub cmbRecAkhir_Click()
  dePenjualan.rsPelanggan.MoveLast
End Sub
 
Private Sub cmbRecBerikut_Click()
  With dePenjualan.rsPelanggan
    .MoveNext
    If .EOF Then
      .MoveLast
      MsgBox "Akhir Record, Data Pelanggan.", vbOKOnly, "Informasi"
    End If
  End With
End Sub
 

F - i - n - i - s

Akhirnya setelah kamu selesai menempatkan empat buah tombol yang digunakan untuk berpindah record (navigasi), dan juga telah mengatur properti serta menulis code untuk event-click dari masing-masing tombol tersebut, coba jalan lagi project ini.
Bila tidak ada masalah, maka kamu dapat bernavigasi ria, dengan menekan tombol yang kamu inginkan seperti terlihat pada Gambar 19.
Gambar 19. Tampilan final dari Form1
Selanjutnya kamu dapat membuat membuat file EXE, untuk project ini. Caranya pilih File|Make Project1.exe dari menu utama Visual Basic.
/www.geocities.com/visiweb/vb

Visual Basic koneksi dengan SQL Server 2000

By de01
Cara membuat koneksi Database dalam Visual Basic 6.0.
Membuat koneksi database baik itu menggunakan Visual Basic 6.0 maupun Visual Basic .NET pada dasarnya sama. Di bawah ini akan saya coba jelaskan cara sederhana untuk membuat koneksi dengan SQL Server Database menggunakan Visual Basic 6.0. Artikel ini hanya ditujukan buat teman-teman yang ingin mengetahui cara mengkoneksikan program Visual Basic ke dalam database SQL.
Langkah pertama, buka program Visual Basic 6.0 dan buat project baru dengan memilih Standar EXE pada menu tampilan awan Visual Basic 6.0.
Langkah kedua, pilih menu project dan pilih menu References. Dalam kotak dialog References, cari “Microsoft ActiveX Data Objects 2.8 Library” atau “Microsoft ActiveX Data Objects 2.6 Library” atau “Microsoft ActiveX Data Objects 2.7 Library”. Pilih salah satu, semuanya sama saja terserah Anda. Centang library tersebut dan klik OK.
Langkah ketiga, buat modul baru dalam project kita dengan mengklik menu Project > Add Module. Pada kotak dialog yang muncul, klik Open. Dalam modul yang baru kita buat ketikkan:
Public dB As New ADODB.Connection
Langkah keempat, buka Form1 yang terdapat dalamProject Explorer (biasanya di sebelah kanan) dengan cara Double Click pada Form1. Form1 akan terbuka. Double Click Form1 dimana saja, maka anda akan masuk ke dalam tampilan Code View . Kode yang muncul akan terlihat seperti di bawah ini:
Private Sub Form_Load()
End Sub
Langkah kelima, ketikkan perintah di bawah ini di antara Sub Form_Load() dan End Sub:
On error goto Ern
dB.Provider = “SQLOLEDB.1;server=(local);User ID=sa;password=asianet;Initial Catalog=Penjualan”
dB.Open
MsgBox “Koneksi sukses.”
Exit sub
Ern:
MsgBox “Koneksi Gagal”
Keterangan :
(local), mengindikasikan lokasi server Anda. Jika aplikasi kita hanya akan mengakses ke SQL Server dalam komputer local, gunakan (local). Sebaliknya jika aplikasi kita digunakan agar terhubung ke jaringan, sebaiknya gunakan sesuai nama server (komputer) dalam jaringan. (sorry kalo kata-katanya agak kurang dipahami… J).
User ID=sa;password=asianet. Bila saat installasi SQL Server pertama kali kita menggunakan User ID ‘sa’ dan password=asianet. Maka User ID dan passwordnya harus dimasukkan di sini. Lain waktu akan saya terangkan cara Installasi SQL Server 2000, kalo SQL Server yang 2005 agak gampang (tapi, semuanya tergantung dimana kita memakai Instance default atau tidak atau menggunakan SQL Server authentication atau tidak).
Initial Catalog=Penjualan. Maksudnya, nama database kita apa? Disini databasenya saya namakan ‘Penjualan’


Koneksi Database menggunakan Visual Basic 6 dan .NET

Filed Under Programming, Visual Basic |
Koneksi SQL Server 2000 dengan Visual Basic 6 menggunakan ADODB
  • · Menggunakan SQL Server Client
    Dim Conn as ADODB.Connection
    Conn
    = “Provider=SQLOLEDB.1;User ID=;Password=” & _
    “;Initial Catalog=” & _
    “;Data Source=

    SQL Server Client harus sudah terinstal terlebih dahulu.
  • · Menggunakan ODBC
    Dim Conn as ADODB.Connection
    Conn = “ODBC;DRIVER=SQL Server;DSN=” & _
    “;UID=;PWD=” & _
    “;SERVER=;DATABASE=

    Set terlebih dahulu pada ODBC database yang akan dikoneksikan pada tab System DSN – Add.
    Pilih driver SQL Server, untuk selanjutnya pilih alamat server dan databasenya.
    Untuk SQL Server 2005 gunakan driver SQL Native Client.
Koneksi MySQL dengan Visual Basic 6 menggunakan ADODB
  • · Menggunakan ODBC
    Dim Conn as ADODB.Connection
    Conn
    = “DRIVER={MySQL ODBC 3.51 Driver};SERVER=;” & _
    “DATABASE=;UID=;PWD=;”

    Set terlebih dahulu pada ODBC database yang akan dikoneksikan pada tab System DSN – Add.
    Pilih driver MySQL ODBC 3.51 Driver, untuk selanjutnya pilih alamat server dan databasenya.
    MySQL ODBC drivernya harus diinstal dahulu. Untuk sourcenya dapat di download secara gratis pada www.mysql.com/products/connector/
Koneksi MySQL dengan Visual Basic .Net menggunakan ADO.Net
  • · Tanpa ODBC
    Dim ConnString As String
    Dim Conn As MySqlConnection
    ConnString =“Server=;Database=;“ & _
    “Uid=;“ & _
    “Pwd=;Connect Timeout=30;“
    Conn = New Conn(ConnString)
Koneksi Microsoft Access dengan Visual Basic 6 menggunakan ADODB
  • · Tanpa ODBC
    Dim Conn as ADODB.Connection
    Conn
    = “Provider=Microsoft.Jet.OLEDB.4.0;Data Source=” & _
    “;User Id=;Password=;”
  • · Menggunakan ODBC
    Dim Conn as ADODB.Connection
    Conn = “ODBC;DRIVER=MICROSOFT ACCESS DRIVER;DSN=” & _
    “;UID=;PWD=” & _
    “;SERVER=;DATABASE=

    Set terlebih dahulu pada ODBC database yang akan dikoneksikan pada tab System DSN – Add.
    Pilih driver Microsoft Access Driver (*.mdb), untuk selanjutnya pilih alamat server dan databasenya.
Catatan: Hampir semua connection string pada ADODB bisa juga digunakan pada ADOR atau Data
Environment pada Visual Basic 6

Untuk koneksi ke MySQL gunakan MySQL Connector/NET yang dapat didownload secara gratis di:
http://dev.mysql.com/downloads/connector/net/5.1.html
Pada Visual Basic 2005 gunakan ADO.Net sebagai object pengolahan databasenya.
Contoh:
Dim MySQLConnectionString As String
Dim MyADOConnection As MySqlConnection
MySQLConnectionString = “Server=myServer;” & _
“Database=myDatabase;” & _
“Uid=myUserID;” & _
“Pwd=myPassword;” & _
“Connect Timeout=30;”
MyADOConnection = New MySqlConnection()
MyADOConnection.ConnectionString = MySQLConnectionString
MyADOConnection.Open()
Kita dapat melakukan setting koneksi database ke SQL server dengan dua cara:
1. Menggunakan ODBC dengam melakukan setting DSN (Data Source Name)
2. Khusus pengguna aplikasi VB Net 2003,2005,2008 dapat melakukan koneksi ke database SQL Server tanpa menggunakan ODBC.
Jika kita menggunakan ODBC sebagai DSN ke SQL Server perlu melakukan setting di ODBC.
Untuk SQL Server 2000 gunakan driver SQL Server sedangkan SQL Server 2005 gunakan driver SQL Native Client.
Untuk codingnya di VB Net kurang lebih mirip dengan comment yang pernah saya post di atas yg untuk MySQL, cuman untuk SQL Server gunakan System.Data.SqlClient.SqlConnection
Saya biasa menggunakan ADODB sebagai koneksi ke database.
Untuk menggunakan ADODB anda dapat mencarinya di thread yg lain yg sudah pernah saya post.
Cukup melakukan
Dim sqlConn as ADODB.Connection
lalu set Connection string nya
Set sqlConn.ConnectionString = ……
Lalu
On Error Goto Err
sqlConn.Open
sqlConn.Close
Jika error maka masuk ke loop error
Err:
msgbox “Connection Error”
Di dalam MySQL versi 5.0 memiliki fasilitas Stored routines seperti Procedure dan Function. Stored Procedure adalah kumpulan dari perintah SQL yang dapat disimpan didalam server layaknya routine coding pada program aplikasi. Dengan stored prosedure, setiap client tidak perlu menyimpan routine code sendiri yang berhubungan dengan database tetapi hanya dengan mengaksesnya di server. Ini akan sangat membantu memperkecil jalannya lalulintas data pada sebuah jaringan.
Beberapa situasi dimana stored procedure sangat bermanfaat untuk:
  1. Ketika aplikasi multiple client membaca data di dalam bahasa pemrogramman yang berbeda dan di dalam platform yang berbeda tetapi membutuhkan menghasilkan atau menampilkan operasi database yang berbeda.
  2. Ketika keamanan penjadi prioritas utama. Seperti bank contohnya, menggunakan stored procedure dan function untuk semua operasi programnya. Ini membutuhkan sebuah konsistensi dan sebuah lingkungan yang aman untuk menyimpan sebuah routine. Di beberapa pengaturan aplikasi dan user memungkinkan untuk tidak memiliki akses ke tabel-tabel pada database secara langsung, tetapi hanya dapat menjalankan perintah-perintah tertentu yang telah disimpan sebelumnya.
Contoh Stored Procedure:
DELIMITER //
CREATE PROCEDURE payment
(payment_amount DECIMAL(6,2),
payment_seller_id INT)
BEGIN
DECLARE n DECIMAL(6,2);
SET n = payment_amount - 1.00;
INSERT INTO Moneys VALUES (n, CURRENT_DATE);
IF payment_amount > 1.00 THEN
UPDATE Sellers
SET commission = commission + 1.00
WHERE seller_id = payment_seller_id;
END IF;
END;
//
DELIMITER ;

kalau mau menjalankan store procedure di mysql dari vb 6, caranya bagaimana yah. kalau bisa di email ke saya yah. TIA
Kamu harus menggunakan ADODB yang bisa tambahkan di Project - References - “Microsoft ActiveX Data Objects 2.8 Library” dan “Microsoft ActiveX Data Objects Recordset 2.8 Library”
‘Tambahkan deklarasi global
Private sqlConn As ADODB.Connection
Private sqlCmd As ADODB.Command
Private Param As ADODB.Parameter
‘Pada even FormLoad lakukan setting ConnectionString,
‘dapat di lihat di http://heng-line.com/?p=8
Set sqlConn = New ADODB.Connection
sqlConn = “[connection string]”
sqlConn.CursorLocation = adUseClient
‘Cara mengakses procedurenya
sqlConn.Open
Set sqlCmd = New ADODB.Command
Set Param = New ADODB.Parameter
sqlCmd.CommandType = adCmdStoredProc
sqlCmd.CommandText = “[nama procedure pd MySQL]”
‘Parameter yang diparsingkan harus sesuai dengan jumlah parameter yang ada pada stored procedure dah harus berurutan
Set Param = sqlCmd.CreateParameter(”[nama parameter]“, adInteger, adParamInput, ,[nilai yang akan diparsingkan])
sqlCmd.Parameters.Append Param
sqlCmd.Execute
‘Jika hasil procedure berupa hasil select,
‘Kita dapat mengambil hasilnya dan memasukan ke dalam recordset
‘Contoh
Dim rst as ADODB.Recordset
Set rst.DataSource = sqlCmd.Execute
Sedangkan untuk membuat function, mirip pada perintah create procedure.
Contoh:
/*Procedure untuk menhitung usia berdasarkan tanggal lahir*/
DELIMITER $$
CREATE FUNCTION `get_usia`(dtDariTgl datetime, dtKeTgl datetime) RETURNS int(11)
DETERMINISTIC
BEGIN
declare inHasil int;
set inHasil =
if(month(dtDariTgl) > month(dtKeTgl),
date_format(dtKeTgl,’%Y’) - date_format(dtDariTgl,’%Y’) - 1,
if(month(dtDariTgl) <> month(dtKeTgl),
date_format(dtKeTgl,’%Y’) - date_format(dtDariTgl,’%Y’),
if(day(dtDariTgl) > day(dtKeTgl),
date_format(dtKeTgl,’%Y’) - date_format(dtDariTgl,’%Y’) - 1,
date_format(dtKeTgl,’%Y’) - date_format(dtDariTgl,’%Y’)
)
)
);
RETURN inHasil;
END $$
DELIMITER ;
Dari sisi vb6 nya. anda membutuhkan MySQL Connector (anda dapat mendownload secara gratis dari situs mysql) sebagai connector menggunakan ODBC.
Connection string nya dapat dilihat di http://heng-line.com/?p=8
Untuk koneksinya gunakan perintah ADODB di vb6.