Program Asas DBMS- Windows & Dos For Foxpro Version
Homepage

Locate Dan Seek Atau Find


Didalam mencari data didalam database,fungsi carian seperti locate,seek dan find sering digunakan untuk memastikan pointer data dapat dilakukan dengan berkesan. Seek Atau Find berfungsi sebagai pencari dengan menggunakan index sebagai pointer dan ianya perlu dikemaskini dari masa kesemasa oleh software yang dibina.Bagi locate pula ia mempunyai keupayaan yang lemah sedikit tetapi dapat menjana pencarian yang lebih baik dan ianya amat berguna didalam intergrasi multiuser.Tidak mengira apa jenis cara yang ada, ianya hanya sebagai pointer rekod. Command ini boleh dibuat dengan beberapa cara seperti berikut :-



Locate

        set talk off
        do while .t.
        Close all
        @10,10 say  'Nama Daging :' get ayam
        read
        use itek
        locate for ano = ayam
        if .not. found()
        @15,10 say 'Tiada Rekod '
        wait ''
        clear
        loop
        endif
        @10,10 say 'Nama Daging :'+ano
        wait ''
        clear
        loop
        endif
        enddo
        
Dengan cara demikian, data yang diperlu akan dicari satu persatu didalam rekod database

Seek Atau Find

        set talk off
        clear
        do while .t.
        Close all
        set exclusive on
        use itek
        use itek index iteks
        reindex
        @10,10 say 'Nama Daging ' get itekk
        find itekk
        if .not. found()
        @ 15,10 say 'Tiada Rekod '
        wait ''
        clear
        loop
        endif
        @10,10 say 'Nama Daging '+ ano
        wait ''
        clear
        loop
        set exclusive off
        enddo
        
Anda boleh mengantikan find dengan seek untuk mencari data dari database.Dalam bentuk index,teknik command Order boleh juga digunakan.

.
Didalam menggunakan command seek atau find,seorang programmer perlu membuat index dan ianya dilaksanakan didalam exclusive mode.Bagi command locate for pengguna lain boleh menjalankan proses semasa dengan serentak.Waktu membina program hendaklah diolah supaya memberi peluang kepada pengguna dapat membuat secara serentak dan dapat dilaksanakan didalam enviroment networking.
Ke Atas