Bang Edi,
Script saya buat gini bang,
Private Sub cmdUpdate_Click()
Pesan = MsgBox("Mulai Meng-Update.....", vbInformation + vbYesNo, "Update")
If Pesan = vbYes Then
DoCmd.GoToRecord , , acNewRec
DoCmd.GoToControl "cmbCustomer"
End If
End Sub
Saya pake
DoCmd.GotoControl "cmbCustomer"
karna kalau pake cmbCustomer.SetFocus kadang control langsung ke cmbCustomer tapi record masih tetep record yang pertama, tidak ke record yang baru.
Mohon instruksi nya bang.
Terima kasih.
----- Original Message -----
From: "edi rosadi" <edirosadie@yahoo.com.sg>
Sent: Wednesday, August 03, 2011 5:26 PM
Subject: Re: [belajar-access] Update
Salam,
Edi Rosadi
Algoritma dan PemrogramanPeta Industri dan Wisata Cilegon
Blog Bahasa CilegonFacebook-Perancangan Sistem komersilkan blog atau website anda dengan bergabung di sini atau di sini
--- On Wed, 3/8/11, Mansur Widayat <w-mansur@notes.npr.co.jp> wrote:
From: Mansur Widayat <w-mansur@notes.npr.co.jp>
Subject: Re: [belajar-access] Update [1 Attachment]
To: belajar-access@yahoogroups.com
Date: Wednesday, 3 August, 2011, 9:17 AM
[Attachment(s) from Mansur Widayat included below]
Bang Edi,
Ok Bang,
Maaf bang mau nanya lagi ni, boleh bang ya! masalah
nya kurang lebih sama tapi dalam form kali ini saya tambahin subform, form dan
subform sama2 ambil dr 1table yang sama! bila di klik update maka muncul error
"There is no field named 'cmbCustomer' in the current record." bisa di jelasin
bang maksud dari itu dan refresh nya. contoh terlampir.
Terima kasih.
----- Original Message -----
From: "edi rosadi" <edirosadie@yahoo.com.sg>
To: <belajar-access@yahoogroups.com>
Sent: Tuesday, August 02, 2011 3:17 PM
Subject: Re: [belajar-access]
Update
script event-nya coba pake yang ini:
Private Sub
Command10_Click()
pesan = MsgBox("START", vbYesNo, "UPD")
If pesan = vbYes
Then
DoCmd.GoToRecord , , acNewRec
TXTDATE.SetFocus
Else
End
If
End Sub
Salam,
Edi Rosadi
Algoritma dan
PemrogramanPeta Industri dan Wisata Cilegon
Blog Bahasa
CilegonFacebook-Perancangan Sistem komersilkan blog atau website anda dengan
bergabung di sini atau di sini
--- On Tue, 2/8/11, Mansur
Widayat <w-mansur@notes.npr.co.jp>
wrote:
From: Mansur Widayat <w-mansur@notes.npr.co.jp>
Subject: Re: [belajar-access] Update [1 Attachment]
To:
belajar-access@yahoogroups.com
Date: Tuesday, 2 August, 2011, 2:15
PM
[Attachment(s) from Mansur
Widayat included below]
Bang
Edi,
kalau di klik "yes" ok bang.
tapi kalau di klik "No"
juga langsung menuju ke date bang. gimana bang?
mohon refresh
nya.
terima kasih
----- Original Message -----
From: "edi rosadi" <edirosadie@yahoo.com.sg>
To:
<belajar-access@yahoogroups.com>
Sent: Tuesday, August 02, 2011 8:56 AM
Subject: Re:
[belajar-access] Update
Gunakan event setfocus.
Memberi
nama kontrol jangan menggunakan kata yang menjadi bagian dari
function
access/vba (reserved word). sebaiknya diawali dengan txt untuk
textbox,
cmb untuk combobox, dst. misalnya, textbox diberi nama txtDate,
maka
syntax-nya adalah txtDate.setfocus.
Salam,
Edi
Rosadi
Algoritma dan PemrogramanPeta Industri dan Wisata
Cilegon
Blog Bahasa CilegonFacebook-Perancangan Sistem komersilkan blog
atau website
anda dengan bergabung di sini atau di
sini
--- On Mon, 1/8/11, Mansur Widayat <w-mansur@notes.npr.co.jp>
wrote:
From: Mansur Widayat <w-mansur@notes.npr.co.jp>
Subject: [belajar-access] Update [1 Attachment]
To:
belajar-access@yahoogroups.com
Date: Monday, 1 August, 2011, 2:00 PM
Dear Para
Master-Master
Saya mau tanya gimana caranya membuat coding
update, jika di klik update
maka kursor langsung berpindah pada control
date. file terlampir.
terima
kasih
------------------------------------
SPAM IS
PROHIBITEDYahoo! Groups Links
__._,_.___
SPAM IS PROHIBITED
.
__,_._,___
No comments:
Post a Comment