ACCESS FEED: Bls: [belajar-access] Table [1 Attachment]

Selasa, 11 Oktober 2011

Bls: [belajar-access] Table [1 Attachment]

[Attachment(s) from Ahmad Satiri included below]

Terima Kasih mas Haer Talib atas Feed Backnya.

1. Kalau kita pakai Query, bukankah data yang ter"sort" adalah data yang ada pada Query? Dan data pada Table tidak akan ter"sort"?

Sedikit cerita, saat ini saya sedang membuat Barcode yang datanya saya ambil dari nomor seri dan telah saya buatkan dengan Access (Membuat Form dengan 2 TextBox). Sedang Software U/ membuat barcodenya hanya membaca data pada Table, tidak bisa ambil dari Query / Report.

2.Saya Lampirkan Filenya untuk lebih jelas dan Home Fun bisa cepat selesai.

Pada dasarnya saya ingin meng-Update data pada SubForm (di Field : Finished (Date)), karena SubForm yang saya buat tidak bisa di-Update (Kenapa Ya?), lalu terpikirkan oleh saya ide ketika saya Click name, data yang akan saya Update akan muncul dari Table untuk saya menginput pada Field Finished (Date).

Ataukah SubForm bisa dibuat untuk mengUpDate data? Settingan pada Propertiesnya? Atau VBA?

Kurang lebih seperti itulah maksud saya. Dan apabila ada kata - kata yang kurang jelas saya mohon maaf dan akan coba saya perjelas lagi.

Dan sekali lagi saya ucapkan banyak Terima Kasih atas Inputannya dan semua ilmu yang saya dapat dari Group ini.

Salam,

Ahmad Satiri

Dari: Haer Talib <haertalib@gmail.com>
Kepada: belajar-access@yahoogroups.com
Dikirim: Rabu, 12 Oktober 2011 11:03
Judul: Re: [belajar-access] Table

1. Pakai query, criteria nya mis: Tanggal = Date()

2. Maksudnya untuk apa ya field diklik lalu muncul data dari record yang sama?

Haer

2011/10/12 Ahmad Satiri <satiri27@yahoo.co.id>

Selamat Pagi Semua,
Salam Sejahtera Untuk Kita Semua.

Langsung aja, ada yang ingin saya tanyakan :

1. Apakah Data pada Table bisa kita munculkan sesuai dengan yang kita inginkan? (Mis. saya ingin yang tampil hanya data hari ini saja. Untuk data yang telah lalu akan terHide.) Caranya bagaimana ya...?
2. Bagaimanakah caranya / VBAnya, apabila ketika saya mengclick pada salah satu Field di SubForm (Data Sheet. Mis : Field Name), Otomatis langsung muncul data pada table dan berada pada Record yang sama Namenya?
Saya pernah menemukan VBAnya pada group ini, seperti yang tertulis di bawah ini:

On Error GoTo PesanError
Dim db As DAO.Database
Dim rs As DAO.Recordset

Set db = CurrentDb()
Set rs = db.OpenRecordset("Data", dbOpenDynaset)
rs.FindLast "[Name]=" & "Name.Value & " '"

If rs.NoMatch Then
MsgBox "Data memang belum pernah diisi !", vbInformation, "Sukses!"
'Tambahkan kode lainnya yang diinginkan disini
Else
MsgBox "Data sudah pernah diisi !", vbInformation, "Hati-hati!"
'Tambahkan kode lainnya yang diinginkan disini
End If

rs.Close
Set rs = Nothing
db.Close
Set db = Nothing

Exit Sub

PesanError:
MsgBox "Terdapat Error, dengan nomor error: " & Err.Number & ","
Resume
End Sub

Tapi Kenapa masih Error ya...?
Apakah caranya bukan seperti ini?

Oh ya, terima kasih atas semua masukannya yang sudah maupun yang ini.
Dan saya berharap rekan - rekan semua tidak bosan untuk selalu memberi ilmu gratisnya kepada saya, karena pastinya akan ada pertanyaan - pertanyaan susulan nantinya.

Salam,

Ahmad Satiri