11/17/2014

Cara membuat Menu Login Pada Visual Foxpro [Total]


Agar program foxpro hanya dapat diakses oleh orang tertentu, maka menu login wajib nongol. untuk itu, ane akan share tahapannya dibawah ini. sobat fajarjabrik, pantengin terus ya,,,..

Gini Nih Caranya:

1.Buat database sebagai tempat penyimpanan username dan password (Biar lebih gampang, bikin lewat Free Table) lalu simpan (misal: login.dbf)


2. Masukan userid n password kamu kedalam tabel login. Kalo belum tau, gini caranya ( Pilih pada free table "login" >> Klik Browse >> Tekan Ctrl+Y) Misal:userid : user | pasword: 123

3.Biki Form untuk menginputkan user n pasword, kayak gini nih contohnya


4. Masukan Coding Login Dibawah ini Pada Command button "Login"

Coding Login
USE login IN 0
    LOCATE FOR userid=ALLTRIM(thisform.text1.Value).and.pasword=ALLTRIM(thisform.text2.Value) 
IF FOUND()    
    MESSAGEBOX("Kamu Berhasil Login.. Selamat Ya!",0,"PEMBERITAHUAN")    
    thisform.Release    
    Do Form form2
ELSE
    MESSAGEBOX("Username atau Passwordmu Salah/Belum Kamu Isi",1,"PERHATIAN")

    thisform.text1.Value=''    
    thisform.text2.Value=''    
    thisform.text1.SetFocus()
ENDIF 
USE

Keterangan Dari Coding Diatas

USE login IN 0 (login adalah nama database (free table) tempat penyimpanan id n pasword) 
LOCATE FOR userid=ALLTRIM(thisform.text1.Value).and.pasword=ALLTRIM(thisform.text2.Value)
(userid/pasword adalah userid/pasword yang ada pada tabel database login) 

IF FOUND() 
   MESSAGEBOX("Kamu Berhasil Login.. Selamat Ya!",0,"PEMBERITAHUA")  
                                     => Pesan yang muncul bila pasword benar 
   thisform.Release   => form pasword akan tertutup bila id/pasword benar 
   Do Form form2      => form yang akan di panggil bila id/pasword benar 

ELSE

   MESSAGEBOX("Username atau Passwordmu Salah/Belum Kamu Isi",1,"PERHATIAN")  
                                                    => Pesan yang muncul bila id/pasword salah 
   thisform.text1.Value=''       => Input Text1 (pada userid) akan kosong bila id salah 
   thisform.text2.Value=''      => Input Text2 (pada pasword) akan kosong bila pasword salah
   thisform.text1.SetFocus()  => Fokus input akan berada pada text1

ENDIF
USE             

Bagi Yang Pengen Langsung Liat Projectnya, Silahkan Klik [Download]


1 comment:

  1. kami sekeluarga tak lupa mengucapkan puji syukur kepada ALLAH S,W,T
    dan terima kasih banyak kepada AKI atas nomor togel.nya yang AKI
    berikan 4 angka 4180 alhamdulillah ternyata itu benar2 tembus AKI.
    dan alhamdulillah sekarang saya bisa melunasi semua utan2 saya yang
    ada sama tetangga.dan juga BANK BRI dan bukan hanya itu AKI. insya
    allah saya akan coba untuk membuka usaha sendiri demi mencukupi
    kebutuhan keluarga saya sehari-hari itu semua berkat bantuan AKI..
    sekali lagi makasih banyak ya AKI… bagi saudara yang suka main togel
    yang ingin merubah nasib seperti saya silahkan hubungi AKI SOLEH,,di no (((082-313-336-747)))
    insya allah anda bisa seperti saya…menang togel 275
    juta, wassalam.


    dijamin 100% jebol saya sudah buktikan...sendiri....







    Apakah anda termasuk dalam kategori di bawah ini !!!!


    1"Dikejar-kejar hutang

    2"Selaluh kalah dalam bermain togel

    3"Barang berharga anda udah habis terjual Buat judi togel


    4"Anda udah kemana-mana tapi tidak menghasilkan solusi yg tepat


    5"Udah banyak Dukun togel yang kamu tempati minta angka jitunya
    tapi tidak ada satupun yang berhasil..







    Solusi yang tepat jangan anda putus asah....AKI SOLEH akan membantu
    anda semua dengan Angka ritwal/GHOIB:
    butuh angka togel 2D 3D 4D SGP / HKG / MALAYSIA / TOTO MAGNUM / dijamin
    100% jebol
    Apabila ada waktu
    silahkan Hub: AKI SOLEH DI NO: (((082-313-336-747)))




    atau klik langsung di KLIK DSINI BOCORAN TOGEL




    angka GHOIB: singapur 2D/3D/4D/



    angka GHOIB: hongkong 2D/3D/4D/



    angka GHOIB; malaysia



    angka GHOIB; toto magnum 4D/5D/6D/



    angka GHOIB; laos

    ReplyDelete

Tolong tinggalkan sedikit komentar untuk koreksi blog ini.
Harap tidak memberikan komentar :
1. Sara dan pornografi
2. Spam Content (Konten Sampah)
3. Penghinaan dan Pelecehan
4. OOT (Out Of Topic)