Sabtu, 28 April 2012

Bls: [belajar-access] Mohon Banuannya...

 

Dear Hendra...

Coba Script Ini Mas... (Form Menggunakan Type Continuous, ada object txtCari (textbox) dan Button "CmdCari"), Script ditaruh pada event on click pada cmdCari.

Private Sub CmdCari_Click()
Dim SQRY as String

If not Isnull(me!txtCari) then 'Jika txtCari tidak kosong
   If IsNumeric(Me!txtCari) then ' Jika TxtCari berisi Numeric maka SQLnya sbb (Pastikan Fied Kriteria Pencairan juga type Numeric(Angka)
   
    SQRY="SELECT * FROM (Nama Tabel/Query) WHERE (Field untuk Criteria)=" & me!txtCari
   elseif IsDate(Me!txtCari) then    ' Jika type data Tanggal
   
    SQRY="SELECT * FROM (Nama Tabel/Query) WHERE (Field untuk Criteria)=#" & me!txtCari & "#"
   else ' Jika type data berupa text/string
   
    SQRY="SELECT * FROM (Nama Tabel/Query) WHERE (Field untuk Criteria)='" & me!txtCari & "'"
   end if
Me.RecordSource=SQRY
Me.Requery
Else

Msgbox "Isi Dulu Data yang akan dicari"

End if
 
Catatan : yang tercetak tebal silahkan ganti dengan Nama Tabel/Query yang dijadikan sumber data pencarian. Field sebagai Kriteria pencarian.

Semoga Membantu

Terima Kasih

Salam,
Syarief Nyong


Dari: Hendra Purwaning Dumadi <hendrapurwaningdumadi@gmail.com>
Kepada: belajar-access@yahoogroups.com
Dikirim: Jumat, 27 April 2012 18:59
Judul: Re: [belajar-access] Mohon Banuannya...

 
Suhu bagaimana caranya membuat prsedure tombol serching dengan kata kunci yang kita ketik di text box...?

Pada 22 April 2012 21:15, Hendra Purwaning Dumadi <hendrapurwaningdumadi@gmail.com> menulis:
 
[Attachment(s) from Hendra Purwaning Dumadi included below]
Pagi Pak..

Benar Pak

Kalau Saya boleh memberikan penjelasan, ketika kita masuk ke menu input data tanah bangunan dan memilih jenis properti tanah kosong, maka estimasi bangunan /m2 menjadi disible, dan pada saat kita memilik posisi properti pada penawaran maka harga transaksi menjadi disible juga, mohon penceraahan Pak

Hendra

Pada 22 April 2012 21:00, Sofyan Efendi <sofyanefendi@gmail.com> menulis:
 
Halo Pak Hendra. Maksudnya hendak membuat disable text box bila pilih suatu
pilihan di combo box, atau gimana ya? Bisa send contoh filenya?

Wassalaamu'alaikum Warahmatullahi Wabarakatuh,
Sofyan Efendi
http://imopi.wordpress.com/

----- Original Message -----
From: "hendra" <hendrapurwaningdumadi@gmail.com>
To: <belajar-access@yahoogroups.com>
Sent: Saturday, April 21, 2012 5:32 PM
Subject: [belajar-access] Mohon Banuannya...

> Sore... Para Suru...
>
> Ada hal yang mau saya tanyakan, kalau saya memilih salah satu dari dalam
> combobox maka text box di form yang sama menjadi disible.
>
> Mohon pencerahan...
>
>
>
> ------------------------------------
>
> SPAM IS PROHIBITEDYahoo! Groups Links
>
>
>





__._,_.___
Recent Activity:
SPAM IS PROHIBITED
.

__,_._,___

Tidak ada komentar:

Posting Komentar