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/

Kirim email ke