dude make it like this
sub button1.click()
if rs.BOF then
Messagebox'Maaf data ini adalah data yang pertama'
Messagebox'Maaf data ini adalah data yang pertama'
else
rs.movenext //rs adalah nama recordset yang dipaggil
text1.text=rs.field('nama fild')
text2.text=rs.field('nama fild')
text1.text=rs.field('nama fild')
text2.text=rs.field('nama fild')
end if
end sub
good luck dude
Syamsoel Hidayat <[EMAIL PROTECTED]> wrote:
Syamsoel Hidayat <[EMAIL PROTECTED]> wrote:
coba ketik
sub button1.click()
rs.movenext //rs adalah nama recordset yang
dipaggil
text1.text=rs.field('nama fild')
text2.text=rs.field('nama fild')
if rs.BOF then
Messagebox'Maaf data ini adalah data yang
pertama'
end if
end sub
__________________________________________________
Do You Yahoo!?
Tired of spam? Yahoo! Mail has the best spam protection around
http://mail.yahoo.com
__________________________________________________
Do You Yahoo!?
Tired of spam? Yahoo! Mail has the best spam protection around
http://mail.yahoo.com
Untuk keluar dari millis ini, kirim email kosong ke:
[EMAIL PROTECTED]
YAHOO! GROUPS LINKS
- Visit your group "Programmer-VB" on the web.
- To unsubscribe from this group, send an email to:
[EMAIL PROTECTED]
- Your use of Yahoo! Groups is subject to the Yahoo! Terms of Service.
