A1 Computer - I Wayan Sudiarsa ST

putra ke 2

2011-11-01T02:46:00.000-07:00

telah lahir putra ke 2 ku pada tanggal 26 oktober 2011 pada pukul 15:00 di RS Premagana Batubulan Gianyar. it just feel great

susahnya install win Xp di laptop baru

2011-01-24T18:59:00.000-08:00

microsoft memang dengan straegi pasarnya mengarahkan kita untuk beralih ke sistem operasi windows 7, hal ini memang secara halus di lakukan dengan meniadakan dukungan untuk hardware yang baru. sialnya hal ini di dukung oleh semua fendor penyedia perangkat keras yang ada, sehingga mau tidak mau kita harus beralih menggunakan sistem operasi windows 7. Banyak hal menarik yang di tawarkan oleh windows 7, akan tetapi untuk penggunaan kerja kantoran di indonesia windows XP saja sudah cukup.

Membuat Mail Merge di office 2007

2010-07-30T19:20:00.000-07:00

A. Membuat Mail Merge
Membuat Dokumen Utama
1. Untuk menggunakan data surat yang sudah ada, buka dokumen tersebut.
Untuk membuat dokumen surat baru, buka sebuah dokumen yang baru.
2. Pilih menu Tools-Mail Merge.
3. Klik Create-Form Letter-Active Window.
4. Klik Get Data. Untuk membuat data baru, klik Create Data Source dan kemudian tentukan spesifikasi field yang akan dipergunakan dengan cara memilih nama field yang kita perlukan atau hapus semua field yang tersedia dan kemudian Anda buat nama field baru.
5. Tentukan nama file yang akan dipergunakan sebagai penyimpan data.
6. Klik Edit Main Document pada kotak pesan yang muncul.
7. Ketikkan teks dan grafik yang akan dimunculkan di setiap surat.
8. Klik dimana Anda akan memasukkan informasi yang selalu berubah disetiap surat. Kemudian, pada toolbar Mail Merge, klik Insert Merge Field,
dan kemudian klik nama field yang akan disisipkan.
9. Simpan dokumen utama.

B. Mendefinisikan Data
1. Klik pada tombol Edit Data Source untuk memunculkan Data Form.
2. Isikan data pada Data Form yang muncul.
3. Pergunakan Tab atau Enter untuk pindah ke field berikutnya dan Shift Tab untuk ke field sebe-lumnya. Anda juga bisa langsung melakukan klik pada field yang akan diisi datanya.
4. Untuk memasukkan data yang sudah ada ke file Data Source dan memasukkan data yang ba-ru, klik tombol Add New.
5. Ulangi langkah 3 dan 4 untuk memasukkan data berikutnya, dan setelah selesai, klik OK.
Menggabung Data Ke Dokumen Utama
Melihat Tampilan Sementara di Dokumen Utama
1. Klik tombol View Merged Data
2. Gunakan tombol navigasi di toolbar Mail Merge untuk berpindah antar data

C. Menggabungkan ke Dokumen Baru
1. Klik pada tombol Merge To New Document
MS Word akan membuat sebuah dokumen baru yang berisi surat yang sudah digabung. Setiap surat diletakkan dalam lembaran yang terpisah.
2. Untuk kembali ke dokumen utama, pilih menu Window, diikuti dengan memilih nama do-kumen utama.
Untuk menyimpan dokumen gabungan, simpan sebagaimana menyimpan dokumen Word lain-nya.
Untuk menutup dokumen hasil gabungan tanpa menyimpan, klik tombol Close.
Catatan Anda juga boleh mengedit teks didokumen gabungan sebagaimana mengedit do-kumen Word lainnya.

BYON M31H G/M T6400

2009-10-08T09:23:00.000-07:00

Core2 Duo T6400, 1GB DDR2, 160GB HDD, DVD±RW, 56K Modem, NIC, WiFi, Bluetooth, VGA Intel GMA 4500 256MB (shared), Camera, 14.1" WXGA, Non OS

Harga : 5.350.000

trend software engeneering

2009-08-18T08:36:00.001-07:00

untuk mendapatkan pengertian tentang software, sangat penting untuk memeriksa karakteristik dari software yang membuatnya berbeda dari hal lain yang di buat oleh umat manusia. ketika sebuah hardware di buat, proses kreatif manusia(analisa, desain, konstruksi dan testing) sepenuhnya di terjemahkan ke dalam sebuah bentuk fisik. jka kita membangun sebuah komputer baru, rencana, desain dan hasilnya melibatkan bentuk fisik. software merupakan sebuah logika daripada sebuah bentuk fisik semata. oleh karena ituoleh karena itu software mempunyai karakteristik yang lebih daripada sebuah hardware.
Pemrograman berorientasi objek kini sudah sangat popular dalam dunia rekayasa perangkat lunak. Dengan menggunakan 3 konsep utama, Encapsulate(Enkapsulasi), Inheritance(Penurunan), dan Polymorphic. Ketiga konsep ini menjadi landasan kuat pada pemograman beroriantasi objek yang dapat menigkatkan readability (mudah dibaca dan dipelajari), reusability (mudah dikegunakan kembali), dan dekomposisi permasalahan (pemodulan). Object menjadi kunci utama keberhasilan OOP karena mengurangi tingkat kompleksitas dalam pemrograman dan memungkinkan maintenance yang relatif lebih mudah terhadap perangkat lunak itu sendiri. Namun, masalah muncul jika di dalam object-object atau kelas-kelas yang berbeda terdapat suatu aspek tertentu yang unik. Untuk mengubah suatu aspek dari perangkat lunak yang dibangun, maka beberapa object dan definisi kelas harus dimodifikasi. Hal ini dapat menjadi suatu masalah yang cukup mengganggu, terutama dalam menangani perangkat lunak yang kompleks dan berskala besar. Kemudian dikenal istilah Tangling, yang artnya dalam suatu objek terdapat aspek lain dari objek itu sendiri, sebagai contoh pada objek bisnis terdapat penanganan loging. Adapula scattering yang artinya, beberapa aspek yang sama muncul pada setiap layer/modul. Dan kedua hal ini cenderung sering muncul secara bersamaan.
Kemudian muncullah Aspect-Oriented Programming, dimana metode ini menyusun masalah-masalah kedalam satuan unit yang disebut aspek. Secara garis besar AOP merupakan metode pemograman yang menghadirkan konsep untuk memotong silang (crosscut) permasalahan tangling dan scattering. Tangling dalam artian bawa terdapat hal-hal lain didalam suatu Object yang sebenarnya tidak berhubungan langsung, namun hanya merupakan technical concerns semata. Sedangkan scattering lebih kepada pengkodean yang muncul pada banyak tempat, sebagai contoh kode program untuk akses user password yang bisa terjadi pada beberapa layer. Kedua hal diatas, telah menyebabkan source code menjadi tidak bersih dan tidak independent. Untuk itulah dibutuhkan madul yang dapat melakukan crosscutting concern terhadap permasalahan diatas, inilah yang dinamakan Aspect. Sebagai contoh, security dapat dikatakan sebuah aspect, tanpa merusak design asli dari system. Maka dalam hal ini Aspek dapat dikatakan sebagai suatu modul yang meng-enkasulapsi perilaku yang mempengaruhi kelas-kelas (dan object-object) tertentu. Dengan AOP, tiap aspek dapat dijabarkan sebagai unit-unit yang terpisah dan kemudian disatukan oleh Aspect Weaver(sebagai kompilasi). Bila kita bandingkan dengan Object-Oriented Programming (OOP), security dijadikan sebagai sebuah class, dan tidak dapat digunakan crosscutting concern, AOP sendiri merupakan penyempurna dari metode OOP tersebut.

Konversi Windows XP bajakan ke versi resmi

2009-05-29T19:00:00.000-07:00

Mungkin saja terjadi, karena sesuatu hal PC pribadi atau di kantor anda telah terinstall Windows XP bajakan. Setelah anda membeli kode lisensi yang resmi, anda berniat untuk mengkonversi kode lisensi Windows XP bajakan anda yang telah terinstall ke kode lisensi resmi yang baru anda beli, namun anda tidak ingin melakukan proses installasi yang memakan waktu.

Cukup dengan melakukan langkah-langkah berikut, masalah anda dapat selesai dengan singkat. Sebelum memulai, untuk berjaga-jaga jangan lupa untuk membackup registry anda.

1. Klik menu Start, Run.

2. Pada kotak Run, ketik regedit dan tekan Enter atau klik Ok.

3. Ketika jendela Registry Editor terbukga, navigasi kursor anda ke HKEY_LOCAL_MACHINE\Software\Microsoft\WindowsNT\CurrentVersion \WPAEvents.

4. Pada panel kanan, arahkan kursor ke OOBETimer, klik kanan, lanjutkan dengan klik Modify.

5. Ubah secara sembarang isi key tersebut. Minimal anda melakukan perubahan dalam satu digit. Langkah ini secara otomatis akan menon-aktifkan kode lisensi Windows XP anda.

6. Klik kembali menu Start, Run.

7. Pada kota Run, ketik %systemroot%\system32\oobe\msoobe.exe /a, tekan Enter atau klik Ok.

8. Klik Yes, I want to telephone a customer service representative to activate Windows, lanjutkan dengan mengklik tombol Next.

9. Lanjutkan dengan mengklik Change Product key.

10. Ketik license key anda yang baru pada kotak New key, lalu klik Update.

11. Restart komputer anda.

12. Setelah anda kembali ke desktop XP anda, periksa hasil pekerjaan anda dengan menjalankan langkah nomor 7 di atas.

13. Jika aktivasi kode lisensi anda berhasil, akan muncul pesan Windows is already activated. Click Ok to exit.

Masalah anda selesai. Semoga bermanfaat

1st aniversary

2009-03-08T06:30:00.000-07:00

14 Maret 2009 adalah ulang tahun perkawinan kami yang pertama, enaknya bikin acara apa ya...?

nasionalisme berbanding lurus dengan konflik?

2008-12-04T18:01:00.000-08:00

Tadi malam saya sempat bertanya pada salah satu keponakan saya, siapakah pahlawan favoritmu? dia menjawab "Naruto Om!"
Lalu mulai terlintas mengenai keadaan sekarang, dimana generasi muda yang nasionalismenya semakin berkurang. Mungkin karena kita terlalu manja sekarang ini, dimanjakan oleh fasilitas, dimanjakan oleh hiburan, dimanjakan oleh gengsi, padahal semua itu kan adalah berupa hutang yang harus kita bayar ke luar. Ternyata kenyamanan tidak selalu berimbas positif.
Terbayang juga bagaimana para pendahulu kita begitu bangganya dengan Bangsa Indonesia, walaupun kita dalam kemelaratan. Apa mungkin karena akhir2 ini kita tidak pernah mempunyai konflik yang besar dengan negara lain? saya ingat, bagaimana nasionalisme mulai tergugah ketika kita punya konflik dengan malaysia tentang kepulauan ambalat, tapi kini dingin lagi.
Saya pernah mendengar slogan bahwa kita akan merasa satu apabila kita punya musuh yang sama, tapi apabila itu tidak ada. Maka kita akan mulai saling menyakiti satu sama lain dan mencari nilai kebenaran sendiri. apa kita sebagai suatu bangsa harus memulai konflik? agar rasa satu bangsa, satu nusa, dan satu bahasa itu tumbuh kembali?

Tips Menambah Bandwidth Internet pada Windows

2008-11-09T06:41:00.000-08:00

Pada dasarnya OS windows sudah membatasi bandwidth untuk koneksi internet sebanyak 20% dari total bandwidth yang seharusnya bisa maksimal.

Jika anda ingin menambah bandwidth internet supaya koneksinya terasa lebih cepat dan kencang bisa dengan cara mengurangi atau mengosongkan batasan bandwidth tersebut supaya pada Windows kita bisa maksimal dalam menggunakan bandwidth yang sudah ada.

Ikuti petunjuknya seperti dibawah ini :

1. Klik Start
2. Klik Run
3. Ketik gpedit.msc
4. kemudian klik Ok
5. Setelah masuk klik Administrative Templates
6. kemudian Klik Network
7. setelah terbuka klik QoS Packet scheduler
8. kemudian klik Limit Reservable Bandwidth
9. Dan setelah terbuka ubah setting menjadi Enable
10. Kemudian ubah Bandwidth Limitnya menjadi 0
11. Klik Apply,ok
12. Kemudian keluar dan Restart komputer

mitos-mitos dalam wisuda wearnes education center bali

2008-10-29T22:12:00.001-07:00

berikut adalah mitos-mitos dalam wisuda wearnes education center bali , anda boleh percaya, boleh tidak. berikut adalah mitos-mitosnya:
1. Biasanya habis wisuda para alumni pada rame-rame cari kerja, atau kalau nggak ngelanjutin kuliah lagi.
2. sebagian kecil alumni yang putri segera akan menikah.
3. ketika mc menyebutkan wearnes education center setelah kilas balik, para penonton pasti bertepuk tangan.
4. panitia yang pegang lighting ada yang resign kemudian.
5. ketika prosesi wisuda menginjak ke wisudawan terakhir, maka suasana akan menjadi sangat riuh...,
6. Para peserta sangat kelaparan, karena biasanya mereka buru-buru dan lupa sarapan.
7. Pada waktu makan siang makanan pasti ludes tak bersisa..
8. ketika profil dosen di tampilkan para mahasiswa pasti ketawa lebar hahaha....
9. Ketika ketua panitia wisuda pidato, biasanya dia garuk-garuk kaki.
10.Setelah acara selesai biasanya banyak artis dadakan dari kalangan karyawan, karena para wisudawan berebut untuk foto-foto dengan mereka.
11.Setelah wisuda para alumni biasanya langsung balik ke kampung halamannya masing-masing dan melupakan teman2 maupun pacar mereka yang ada di sini.

untuk info lebih lanjut ketik reg(spasi)mitos ke 9877

Soft Opening Internet on A1 Computer

2008-10-19T21:35:00.000-07:00

Selasa, 21 Oktober 2008 akan ada soft opening Internet on A1 Computer yang beralamat di Jl. WR. Supratman 283 Denpasar. harga selama masa promosi Rp. 2000/jam. mohon doa restunya semoga usaha ini bisa sukses.....,

Launching Blog baru

2008-10-17T17:44:00.000-07:00

sehubungan dengan makin aktifnya kegiatan politik menjelang pemilu 2009 maka saya menyampaikan sebuah pengumuman, telah di launch blog partai hanura pac denpasar timur saya harap ini bisa menjadi sebuah wacana yang baru. terimakasih.

harga rupaih jatuh..., pusing deh

2008-10-12T20:07:00.000-07:00

hari jumat tanggal 10 oktober kemari ada kejadian yang luar biasa, siangsetibanya di kampus tercinta wearnes education center aku chatinng ama salah satu distributorku. dalam kurun waktu 3 jam nilai tukar dolar terhadap rupiah bergeser dari 9600 menjadi 10.300 rupiah naik 700 rupiah. gila nggak tuh..., kayaknya kita bakalan menghadapi resesi lagi nih, mudah-mudahan nggak seperti tahun 1998....

SEO Indonesia

2008-09-24T00:13:00.000-07:00

Sekarang ini bisnis yang dilakukan melalui media internet berkembang dengan sangat pesat. Siapa sih yang nggak kepingin punya situs yang namanya masuk ranking 1 di search engine google atau yahoo misalnya. nah kalau ingin menaikan rangking situs kita di situ kita perlu belajar sebuah metode yang bernama SEO(Search Engine Optimizer) katanya. oleh karena kesempatan ini masih sangat terbuka dan peluanya sangat besar yuk belajar bareng sehingga kita nanti bisa punya kumpulan yang namanya SEO Indonesia

waktu yang tepat untuk beli komputer

2008-09-22T23:08:00.000-07:00

seringkali teman-teman saya tanya, "Arsa, kapan waktu yang tepat untuk membeli komputer?"
Lumayan susah juga sih menjawabnya, karena komputer adalah sebuah produk teknologi yang harganya semakin lama semakin murah. coba ingat lima tahun yang lalu untuk mendapatkan komputer dengan kecepatan 2GHz dan memori 128Mb itu harganya 9 JT-an, nah sekarang harga komputer dengan Kecepatan 3Gb dan memori 512Mb bisa didapat hany dengan harga 3 jt, Jauh sekali bukan.
akan tetapi kalau kita tidak membeli komputer sekarang, kapan kita akan belajar?? walaupun kita tahu begitu kita pakai komputer itu harganya sudah turun 30%nya.
jadi kapan waktu yang paling tepat untuk membeli komputer menurut saya adalah: bukan pada harga komputer itu ataupun anda menunggu nilai tukar dolar yang turun, akan tetapi pada saat anda sadar bahwa dengan membeli sekarang anda akan manfaat yang besar dan bahkan bisa menghasilkan lebih dari nilai komputer itu sendiri.

harga flashdisk 4Gb Turun

2008-09-20T23:54:00.000-07:00

info aja ya...., harga flashdisk kingstone 4 Gb turun drastis. baru aja 2 minggu lalu harga flashdisk 4 giga dijual ke user seharga 160an ribu, sekarang sudah bisa didapatkan dengan harga hanya 140rb aja lho....,
mungkin yang berenacana beli flashdisk disarankan untuk beli yang ini aja karena kalau yang 1Gb masih di sekitaran 70rb dan yang 2 gb di sekitaran 90rb.......

minggu yang sibuk

2008-09-19T21:16:00.000-07:00

huh........,
minggu yang sibuk ini hampir berakhir juga, minggu ini adalah salah satu minggu yang sangat melelahkan baik mental maupun fisik. mungkin koreksi juga ya, untuk aku yang nggak terlalu bisa ngatur waktu. kesibukan ini di mulai dengan pembuatan website, rakitan komputer, mengurus aplikasi kredit, pembuatan izin usaha, penawaran, instalasi, tugas kuliah, UTS, mengajar sampai dengan tugas di rumah yang tiada habisnya. akhirnya sebagian tugas ini terselesaikan juga setidaknya tenang dikit deh.
karena sedikit tenang aku bisa refresing dikit berolahraga dengan club basket GGC....,

Syukuran

2008-09-12T05:30:00.000-07:00

Hari ini ada syukuran di wearnes education center bali . syukuran ini bertujuan untuk memberikan rasa syukur ke hadirat tuhan yang maha esa dan untuk melepas para marketer wearnes education center yang akan berjuang ke medan pertempuran melakukan pencarian calon mahasiswa baru wearnes education center.

wearnes education center

2008-09-03T00:00:00.000-07:00

Wearnes Education Center is a well-known campus specializing
in computer and business. We guide our students to be a master in business knowledge with computerized system.

We are the best and having modern facilities. It's the easiest way
to get knowledge in short time, and in a best method.

We are full of awards because of our commitment in
education service and education process.
Enterprise-50, ASEAN Citra Award, and Microsoft IT Academy
Program. These are symbols of our quality.

In Wearnes, we combine intelligent with emotional (moral)
education, so students will get flexible inclusive in education program

Penyebab Kegagalan pada orang pintar

2008-07-07T05:31:00.000-07:00

Penyebab Kegagalan Orang Pintar

Seperti halnya kesuksesan, setiap orang pun bisa mengalami kegagalan! Tak terkecuali orang-orang jenius yang kecerdasannya mendekati sempurna. Karena, memang tak ada jaminan bahwa orang pintar akan selalu sukses.

Makanya, jangan heran, jika Anda menemui rekan sekolah Anda yang dulu dikenal pandai dan cerdas namun akhirnya hanya merutuki nasib karena masa depannya yang suram! Apa penyebabnya? Di luar nasib dan faktor 'lucky', banyak hal yang bisa memicu kegagalan orang-orang pintar. Namun berdasarkan wawancara dan survei yang dilakukan pada 200 orang pintar di Amerika, ada enam hal penting penyebab kegagalan bagi mereka. Coba simak:

* Kurang ketrampilan sosial

Seberapa pun hebatnya intelegensi akademis Anda, Anda tetap perlu memiliki intelegensi sosial, seperti kemampuan mendengarkan, peka terhadap perasaan orang lain, memberi dan menerima kritik dengan baik. Orang yang memiliki intelegensi sosial tinggi mampu mengakui kesalahan mereka dan tahu bagaimana membina dukungan tim. Intelegensi sosial bisa diperoleh dengan banyak berlatih.

* Tidak cocok

Sebuah kesuksesan memerlukan kecocokan antara kemampuan, bakat, kepentingan, keinginan, kepribadian, dan nilai-nilai dalam pekerjaan Anda. Bila Anda merasa tidak cocok, maka jangan ragu untuk meninjau perilaku pekerjaan dan menyesuaikan atau mengubah pekerjaan Anda selama ini. Bagi beberapa orang, pokok persoalannya adalah seberapa besar resiko yang berani diambil.

* Tidak ada komitmen

Sesuatu yang dilakukan setengah-setengah akan memperbesar kemungkinan gagal. Suatu tujuan perlu dibarengi tekad, semangat, dan komitmen yang kuat untuk mencapainya. Kurangnya penghargaan pada diri sendiri merupakan penyebab dasar kegagalan. Untuk bisa ambil bagian dalam sukses, Anda harus yakin bahwa Anda bisa melakukannya.

* Kurang fokus

Beberapa orang melakukan terlalu banyak kegiatan sehingga akhirnya tidak melakukan satu pun dengan baik. Fokuskan kembali diri Anda pada apa yang paling baik dilakukan. Sadarilah keterbatasan Anda, tetapkan prioritas, dan susun organisasi usaha Anda.

* Kurang menyadari rintangan

Kadang, banyak rintangan tersembunyi yang sulit diperangi. Umur, diskriminasi jenis kelamin dan ras merupakan jenis rintangan yang sering tidak disadari. So, Anda harus meninjau kembali, berdasarkan analisa yang benar mengenai situasi, untuk merebut kembali kontrol atas kehidupan dan masa depan Anda.

* Kemalangan

Siapapun tidak bisa menolak adanya takdir, entah itu takdir baik atau buruk. Dan siapa pula yang bisa menolak ketika kemalangan itu harus Anda alami? Seandainya ini terjadi, yang harus Anda lakukan, jangan menyalahkan diri sendiri! Ingat, meski tak bisa menolak kemalangan itu, namun selalu ada jalan untuk memperbaikinya.

Pada akhirnya, kegagalan bukanlah 'jalan buntu' untuk mencapai sukses. Kesempatan datang silih berganti. Jika hari ini Anda gagal, mungkin besok Anda akan sukses. Jika Anda mampu berpikir jernih mengenai kegagalan dan menyadari bahwa dalam hidup ini selalu ada pilihan, Anda akan bisa menyikapi sebuah kegagalan sebagai pelajaran yang berharga. Ingat, tak ada orang yang lebih bodoh selain tidak bisa memetik pelajaran dari sebuah kegagalan.

Selingan: Ssstttttt...................... ada yang protes tuh

2008-07-07T05:28:00.001-07:00

ADA YANG PROTES

Bersama dengan ini, Saya sebagai penis ingin meminta
kenaikan gaji dikarenakan alasan-alasan berikut:
* Saya melakukan pekerjaan yang berhubungan dengan fisik
* Saya bekerja di suatu kedalaman tertentu
* Saya bekerja dengan menggunakan kepala terlebih dahulu
* Saya bekerja di tempat yang lembab
* Saya bekerja lembur dengan tanpa biaya tambahan
* Saya bekerja di ruang yang gelap yang tidakmempunyai aliran udara segar
* Saya bekerja di temperatur yang tinggi
* Pekerjaan saya beresiko tertular oleh penyakit

Tanggapan dari HRD:
Setelah mempertimbangkan permintaan dan argumen yang
diberikan, kami menolaknya dengan alasan-alasan berikut:
* Anda tidak bekerja 8 jam penuh
* Anda tertidur setelah melakukan tugas yang waktunya sebentar
* Anda tidak selalu menurut perintah dari manajemen
* Anda tidak selalu berada di posisi yang telah ditentukan, bahkan sering pergi ke tempat lain
* Anda terlalu banyak mengambil istirahat yang tidak resmi
* Anda tidak mempunyai inisiatif, selalu harus ditekan dan dirangsang untuk dapat memulai bekerja
* Anda meninggalkan tempat kerja anda dengan berantakan
* Terkadang anda mengabaikan peringatan kesehatan dengan tidak menggunakan pakaian pelindung yang semestinya
* Anda tidak pernah menunggu usia pensiun sebelum berhenti bekerja
* Anda tidak suka bekerja dalam 2 shift
* Anda terkadang meninggalkan tempat kerja anda sebelum kerjaan selesai
* Dan yang terpenting adalah anda selalu memasuki dan meninggalkan tempat kerja dengan membawa 2 buah bungkusan yang bentuknya mencurigakan

Membangun aplikasi dengan VFP dgn database My Sql

2008-07-06T02:44:00.000-07:00

Bagian I

-------------------------------------------------------------------------------------------------------------

# mulai copy disini

CREATE TABLE anggota (

kdangg int(11) NOT NULL auto_increment,

nama varchar(50) default NULL,

alamat mediumtext,

notelp varchar(50) default NULL,

PRIMARY KEY (kdangg)

) TYPE=MyISAM;

# Isi data tabel 'anggota'

INSERT INTO anggota (kdangg, nama, alamat, notelp) VALUES("1", "nobody", "diantara runput ilalang", "54654654654");

INSERT INTO anggota (kdangg, nama, alamat, notelp) VALUES("2", "somebody", "somewhere", "84555245");

CREATE TABLE fitur (

kdfitur int(11) NOT NULL auto_increment,

nama varchar(50) default NULL,

ket mediumtext,

kdangg int(11) default NULL,

PRIMARY KEY (kdfitur)

) TYPE=MyISAM;

#selesai script

--------------------------------------------------------------------------------------------------------------

Bagian II

--------------------------------------------------------------------------------------------------------------

Sebelumnya kita sudah membahas tentang bagaimana membuat database mySQL dengan menggunakan mySQL-Front dan tentang ODBC Diver. Kali ini akan saya bahas tentang pembuatan aplikasinya dengan Visual FoxPro (untuk referensinya saya menggunakan VFP 8.0 Pro, tetapi anda juga dapat mengaplikasikannya untuk versi 6 dan 7 !).

Visual FoxPro adalah salah satu software paling (kalau boleh saya bilang terbaik!) baik untuk pemrosesan data. Untuk keterangan selengkapnya, anda dapat membaca artikel dari Handi berjudul "10 Alasan menggunakan Visual FoxPro".

Komunikasi antara Visual FoxPro dengan mySQL Server

Komunikasi antara Visual FoxPro dengan mySQL dapat dibentuk dengan beberapa cara, seperti menggunakan ODBC (SQLSTRINGCONNECT( ), SQLCONNECT( )), menggunakan ActiveX objek, atau dengan menggunakan Library bawaan mySQL sendiri yaitu "Libmysql.dll". Kali ini akan saya bahas koneksi dengan menggunakan ODBC Driver saja.

- SQLCONNECT( )

• Syntax : SQLCONNECT( 'nama_koneksi' , 'namadatakoneksiODBC' , 'usenameODBC' , 'passwordODBC' )

• Keterangan :

- 'nama_koneksi' = Nama koneksi yang akan anda gunakan setiap anda akan memproses data. Sebaiknya variabel ini disimpan sebagai variabel PUBLIC

- 'namadatakoneksiODBC' = Nama koneksi ODBC, BUKAN nama database anda...!

- 'usenameODBC' = Nama user database

- 'passwordODBC' = Password database user tersebut

• Kelebihan :

- Lebih cepat dalam pemrosesan data dari pada menggunakan SQLSTRINGCONNECT( )

- Lebih stabil karena koneksi sudah dibentuk sesaat setelah login ke sistem Windows anda

- Tidak adanya ketergantungan terhadap versi ODBC

• Kekurangan :

- Anda harus membuat koneksinya disetiap mesin yang akan memproses data.

- Tidak Secure karena detail tentang koneksi ini (termasuk username dan passwordnya...!) dapat dilihat lewat Registry di "HKEY_LOCAL_MACHINE\SOFTWARE\ODBC"

- SQLSTRINGCONNECT( )

• Syntax : SQLCONNECT( m.stringkoneksi )

• String koneksi : "DRIVER={MySQL ODBC 3.51 Driver};DESC=;DATABASE=";

+_lcDBname+";SERVER="+_lcserver+";UID="+_lcUsername+;

";PASSWORD="+_lcpswDB+";PORT=;OPTION=;STMT=;"

• Keterangan :

- 'stringkoneksi = Alias (string) koneksi yang akan dieksekusi oleh SQLCONNECT( )

- _lcDBname = variable nama database mySQL, contoh : "databaseku"

- _lcserver = variable nama server atau IP server, contoh : "localhost" atau "90.0.0.1"

- _lcUsername = variable username database, contoh : "root"

- _lcpswDB = variable password database, contoh : "inikunci"

Atau anda dapat menuliskannya secara langsung :

"DRIVER={MySQL ODBC 3.51 Driver};DESC=;DATABASE=databaseku;SERVER=localhost;UID=root;PASSWORD=inikunci;PORT=;OPTION=;STMT=;"

Ingat...! mySQL pada dasarnya dikembangkan untuk lingkungan UNIX yang case sensitive dalam pembacaan karakter! Walaupun hal ini tidak berlaku untuk versi windowsnya, akan tetapi sebaiknya anda perhatikan besar kecilnya huruf tersebut!

• Kelebihan :

- Tidak perlu membuat koneksi ODBC via Control Panel di tiap-tiap mesin yang akan memproses data

- Sangat Secure karena detail koneksi seperti nama database, username database dan passwordnya berada didalam source code aplikasi anda

- Menggunakan Resource yang lebih sedikit dibandingkan dengan SQLCONNECT( )

• Kekurangan :

- Adanya ketergantungan versi ODBC Driver, yang berarti jika anda mengganti versi ODBC driver di mesin yang akan digunakan memproses data, maka anda harus mengubah source code-nya (walaupun dengan sedikit trik anda tidak perlu mengubah source code tersebut...;-p )

Anda dapat menggunakan salah satu dari fungsi koneksi diatas sesuai dengan kebutuhan anda. Sebagai catatan, perbedaan kecepatan proses data untuk jaringan LAN tidak signifikan. Bahkan anda tidak akan merasakan delaynya. Hal ini disebabkan bukan VFP yang memproses datanya, melainkan SQL Server yang memproses datanya. VFP hanya menampilkan data hasil proses server ke CURSOR

Bagian III

---------------------------------------------------------------------------------------------------------------

Sudah mencoba tutorial sebelumnya? Berikut adalah tutorial dalam pengkodean VFP. Tutorial ini bagian terahkir dari 4 bagian. Selamat mencoba...!

DASAR PROSES DATA
Pada dasarnya, query pada SQL Server (seperti mySQL, MSSQL, ORACLE dll) tidak selalu sama. Query yang diproses oleh fungsi SQLEXEC(namakoneksi,"query yang dilakukan","namacursor") ( lihat artikel SQL Pass-Trough (SPT) mempermudah hidup anda...!) tidak diproses oleh VFP. Jadi untuk query-query yang lebih lengkap dapat anda dapatkan di Help masing-masing SQL server. Untuk mySQL Server dapat anda dapatkan di http://www.mysql.com/documentation
Berikut sebagian kecil query yang dapat digunakan secara umum (berlaku untuk masing-masing SQL Server diatas):

1. SELECT namafield FROM namatabel
Syntax ini berfungsi untuk mengambil data dari server dan disimpan kedalam CURSOR FoxPro. Contoh dalam VFP:

SQLEXEC(namakoneksi,"SELECT field1, field2, field3 FROM tabel1","namacursor")

Kalo kamu bermaksud menampilkan data dari tabel (pada kasus diatas bernama "tabel1") kedalam grid atau listbox misalnya, maka sumber data dari grid atau listbox tersebut adalah "namacursor". Lihat listing contoh dibawah:

* menampilkan data dari tabel tabel1 kedalam grid
* Procedure cmdTampil.CLICK()
xnama=ALLTRIM(THISFORM.txtnama.VALUE)
THISFORM.grid1.RECORDSOURCE=""
SQLEXEC(kon,"SELECT field1, field2, field3 FROM tabel1 WHERE field1=?xnama","cursor1")
THISFORM.grid1.RECORDSOURCE="cursor1"

Dalam contoh diatas, data dari tabel1 diambil dan disimpan kedalam tabel sementara atau CURSOR bernama cursor1. Pengambilan data tersebut di "FILTER" oleh field1 dimana isi field1 tersebut sesuai dengan textbox yang bernama txtnama.

... FROM tabel1 WHERE field1=?xnama","cursor1")

Jika ingin menampilkan semua datanya, syntax WHERE dihilangkan saja.

2. INSERT INTO namatabel(field1, field2, field3...) VALUES(xnama1, xnama2, xnama3...)
Syntax ini berfungsi untuk menyimpan (menyisipkan) data ke server. Contoh dalam VFP:

SQLEXEC(namakoneksi,"INSERT INTO namatabel(field1,field2) VALUES(?xnama1,?xnama2)")

Kamu dapat menghilangkan syntax ...(field1,field2)... HANYA jika ...(?xnama1,?xnama2)... sesuai dengan urutan struktur dalam tabel tersebut! Sebagai contoh:

SQLEXEC(namakoneksi,"INSERT INTO namatabel VALUES(?xnama1,?xnama2)")

Contoh dalam pemakaian di VFP dapat kamu lihat di listing kode berikut:

*menyimpan data ke tabel server
* Procedure cmdSimpan.CLICK()
xnamabaru=ALLTRIM(THISFORM.txtnama.VALUE)
xalamat=ALLTRIM(THISFORM.txtalamat.VALUE)
IF MESSAGEBOX('SIMPAN DATA INI?',36,'COBA SIMPAN DATA')=6 &&konfirmasi penyimpanan data
SQLEXEC(kon,"INSERT INTO tabel1(field1,field3) VALUES(?xnamabaru,?xalamat)")
ENDIF

Perhatikan bahwa data yang disimpan kedalam tabel1 HANYA dari field1 dan field3 saja! Untuk itu setelah perintah INSERT INTO tabel1, nama field1 dan field3 ikut dituliskan.

3. UPDATE namatabel SET field1 = xnama1, field2 = xnama2, field3 = xnama3
Seperti namanya, syntax ini berfungsi untuk melakukan perubahan terhadap data yang sudah ada didalam tabel (update data). Contoh penggunakan dalam VFP:

*mengubah data dalam tabel
* Procedure cmdsave.CLICK()
xkdcust=ALLTRIM(THISFORM.txtkdcust.VALUE)
xnama=ALLTRIM(THISFORM.txtnama.VALUE)
IF MESSAGEBOX("Simpan perubahan data pada KODE CUSTOMER "+xkdcust+" ini?",36,"COBA UPDATE DATA")=6
SQLEXEC(kon,"UPDATE customer SET nama=?xnama WHERE kdcust=?xkdcust")
ENDIF

Perhatikan pada statement ...WHERE kdcust =... tersebut! Syntax diatas berarti : "UBAH NILAI DARI TABEL customer DIMANA FIELD nama MENJADI VARIABEL xnama DIMANA kdcust ADALAH VARIABEL xkdcust". Jika tidak menambahkan klausa ...WHERE..., maka SEMUA data dari tabel customer akan berubah nilai field nama menjadi nilai yang tersimpan dalam variabel xnama!

4. DELETE FROM namatabel
Syntax ini berfungsi untuk menghapus data dari tabel dala m sebuah database. Penggunaan dalam VFP:

*menghapus data dari tabel
*Procedure cmdHapus.CLICK()
xkdcust=ALLTRIM(THISFORM.txtkdcust.VALUE)
IF MESSAGEBOX("Hapus data dengan KODE CUSTOMER "+xkdcust+" ini?",36,"COBA HAPUS DATA")=6
SQLEXEC(kon,"DELETE FROM customer WHERE kdcust=?xkdcust") && hapus data tertentu saja
ENDIF

Perhatikan bahwa klausa ...WHERE kdcust=?xkdcust... ditambahkan setelah ...DELETE FROM customer... Hal ini berarti data yang akan dihapus dari tabel customer HANYA yang mempunyai data dari field kdcust yang bernilai dari variabel xkdcust saja! Jika kamu ingin menghapus SEMUA data dari tabel tertentu, kamu tidak perlu menambahkan klausa ...WHERE... kedalam kode kamu, contoh:

SQLEXEC(kon,"DELETE FROM customer") && hapus semua data