Senin, 02 April 2012

Re: [belajar-access] membuat duplicated record dengan jumlah yang di inginkan user [1 Attachment]

 
[Attachment(s) from Sofyan Efendi included below]

Bisa menggunakan query append + looping for...next.. misal:

Private Sub Command8_Click()
If IsNull(Me![jumlah copy]) Then
MsgBox "isi dulu jumlah copynya"
Exit Sub
End If
Dim i As Long
DoCmd.SetWarnings False
For i = 1 To Me![jumlah copy]
DoCmd.RunSQL "INSERT INTO Table1 ( [No], tgl, type )" & _
"SELECT '" & Me![No] & "', #" & Format(Me!tgl, "mm/dd/yyyy") & "#,
'" & Me!type & "';"
Next i
DoCmd.SetWarnings True
MsgBox "Selesai."
End Sub

Contoh bisa didownload di attachment file.

Wassalaamu'alaikum Warahmatullahi Wabarakatuh,
Sofyan Efendi
http://imopi.wordpress.com/
----- Original Message -----
From: "just_lie_what" <b4yunur471@yahoo.com>
To: <belajar-access@yahoogroups.com>
Sent: Monday, April 02, 2012 9:38 PM
Subject: [belajar-access] membuat duplicated record dengan jumlah yang di
inginkan user

> MOHON BIMBINGAN PARA MASTER
> salam kenal sebelumnya
> saya ingin membuat database sebagai berikut
>
> No | tgl | type|
>
> dan kemudian saya ingin menduplicate data tersebut dengan jumlah yang di
> inginkan user mislahkan disitu akan ada kolom |jumlah copy|. mohon
> bantuanya dari para master
> terimakasih
>
>
>
> ------------------------------------
>
> SPAM IS PROHIBITEDYahoo! Groups Links
>
>
>

__._,_.___

Attachment(s) from Sofyan Efendi

1 of 1 File(s)

Recent Activity:
SPAM IS PROHIBITED
.

__,_._,___

Tidak ada komentar:

Posting Komentar