Menggunakan / Mengaktifkan Databse pada Cipper

Minggu, 08 Januari 2012 Published by Unknown

Menggunakan / Mengaktifkan Databse pada Cipper

    Setelah kemarin belajar membuat database pada clipper, kali ini kita akan belajar menggunakan database yang sudah dibuat. Bagi yang belum bisa membuat database alias ketinggalan postingan kemarin, bisa baca di sini. Bagi yang sudah baca, mari kita lanjutkan.
   Bentuk umum perintah yang digunakan adalah
USE <nama database> INDEX <data file database>
atau
USE <nama database> INDEX <data file database> NEW

Kesalahan yang mungkin terjadi pada saat diberikan perintah USE adalah nama file tidak ada dalam directory yang aktif, oleh kare itu sering digunakan sauatu fungsi standar yang dipakai untuk mengetahui apakah nama file yang disebutkan ada dalam direktory ataukah tidak, yaitu fungsi File().
contoh :
if file (“barang.dbf”)
      use barang index barang
else
      Alert(“Database tidak ada dalam directory”)
Endif
Return
  Selain dengan cara tersebut, mengaktifkan database dapat dilakukan dengan menggunakan operator makro (&). Contoh :
clear
local nmfile:=space(8)
@10,10 say “Nama File Database yang dibuka : “ get nmfile picture ”@A”
Read
Use &nmfile
  Dan masih ada satu cara lagi untuk menggunakan database, yaitu dengan menuliskan tanda petik dobel (").
contoh :
clear
local nmfile:=space(8)
@10,10 say “Nama File Database yang dibuka : “ get nmfile picture ”@A”
Read
if file(nmfile)
   Use (nmfile)
Else
   Alert(“Database tidak ada didirectory”)
Endif
return
Langsung praktek saja biar lebih paham. Semangat !
  

No responses yet

Leave a Reply

Diberdayakan oleh Blogger.

Followers