Asumsi:
2 textbox bernama Nomor1 dan Nomor2
Ada tabel DATAKU dengan Field bernama Nomor bertipe data INTEGER / LONG
Private Sub OK_Click()
For i=Cint(Nomor1.value) to Cint(Nomor2.value)
Docmd.setwarnings false
Docmd.runsql "INSERT INTO DATAKU (Nomor) VALUES (" & I &
")",true
Docmd.setwarnings true
next
End sub
Salam hangat dan jabat erat,
MBA
-----Original Message-----
From: [email protected] [mailto:[email protected]]
On Behalf Of harmandy80
Sent: Thursday, February 04, 2010 15:03 PM
To: [email protected]
Subject: [belajar-access] QUERY APPEND BIKIN MUMET
sore senior dan bapak moderator semua
langsung aja ya:
aku punya kesulitan saat buat query append. misalnya dalam sebuah form ada 1
tombol OK dan 2 field: nomor1 dan nomor2.
FIELD NOMOR1 berisi angka 15
FIELD NOMOR2 berisi angka 35
bgimana caranya agar pas tombol OK ditekan maka append query dijalankan
,sehingga baris pada tabel "DATAKU" akan terisi secara auto sbb:
baris1: 15
baris2: 16
baris3: 17
baris4: 18
baris5: 19
baris6: 20
baris7: 21
dst sampai baris terakhir terisi dengan angka 35
plis dong bantuanya
------------------------------------
SPAM IS PROHIBITEDYahoo! Groups Links
http://groups.yahoo.com/group/belajar-access/
Individual Email | Traditional
http://groups.yahoo.com/group/belajar-access/join
(Yahoo! ID required)
[email protected]
[email protected]
[email protected]
http://docs.yahoo.com/info/terms/