Sobat Fajarjabrik yang cakep, baik hati, n suka menabung dimanapul kalian berada, sebagai lanjutan dari postingan gue yang sebelumnya yaitu Cara Menghubungkan Database dengan Grid dan Pengaturannya Pada Foxpro Untuk Pemula, disini saya akan menshare tentang menu penginputan pada database yang biasa digunakan, yaitu SAVE, HAPUS dan BARU.
Tanpa Banyak Cingcong, mending langsung kita praktekin aja. Cekipret!
1.Buat database ( free table) lalu masukan ketentuan sebagai berikut n simpan dengan nama 'tabelku.dbf'
Name
|
Type
|
Width
|
nomor
|
number
|
3
|
nama
|
character
|
15
|
alamat
|
character
|
25
|
usia
|
number
|
3
|
2. Buat sebuah form dengan ketentuan sebagai berikut
Object
|
Name
|
Caption
|
Label1
|
Label1
|
(Judul)
|
Label2
|
Label2
|
Nomor urut
|
Label3
|
Label3
|
Nama
|
Label4
|
Label4
|
Alamat
|
Label5
|
Label5
|
Usia
|
Object
|
Name
|
Caption
|
Text1
|
Text1
|
-
|
Text2
|
Text2
|
-
|
Text3
|
Text3
|
-
|
Text4
|
Text4
|
-
|
Object
|
Name
|
Caption
|
Command1
|
Command1
|
Simpan
|
Command2
|
Command2
|
Hapus
|
Command3
|
Command3
|
Baru
|
Command4
|
Command4
|
Keluar
|
Grid1
|
Grid1
| - |
3. Masukin Coding dibawah ini pada Command Buton yang ada
CODING YANG DIGUNAKAN
|
Coding Simpan
|
INSERT INTO tabelku(nomor,nama,alamat,usia);
VALUES (thisform.text1.Value,; thisform.text2.Value,; thisform.text3.Value,; thisform.text4.Value) thisform.grid1.Refresh() |
Coding Hapus
|
SET DELETED ON
SELECT tabelku
jawab=MESSAGEBOX("Yakin nih mo apus datamu?",1+32,"Konpirmasi")
IF jawab=1 thisform.grid1.SetFocus() SELECT tabelku DELETE GO top thisform.grid1.Refresh ENDIF |
Coding Baru
|
thisform.text1.Value=0 thisform.text2.Value='' thisform.text3.Value='' thisform.text4.Value=0 thisform.text1.SetFocus |
Coding Keluar
|
thisform.Release |
Coding Procedur/Property Init (klik ganda form1)
|
thisform.text1.Value=0 thisform.text4.Value=0 thisform.text1.SetFocus() |
4. Jika Semuanya udah dibikin, Koneksikan Grid 1 dengan database yang udah ada. (Kalo belum tau, silahkan buka "Cara Menghubungkan Database dengan Grid dan Pengaturannya Pada Foxpro Untuk Pemula")
Kalo males bikin n masukin codingnya, silahkan sobat download aja projectnya dengan mengklik [DOWNLOAD]
Semoga Bermanfaat.....