kalau pakai proses looping seperti itu mungkin modifikasi dibawah ini bisa dipakai
rsPBBDD.MoveLast
For I = rsPBBDD.RecordCount To 1 Step -1
rsPPBD.AddNew
rsPPBD!No_PPB = NoBaru
rsPPBD!HD = rsPBBDD!HD
rsPPBD!urut = rsPBBDD!urut
rsPPBD!BARANG = rsPBBDD!KD_BRG
rsPPBD!QTY = rsPBBDD!QTY
rsPPBD!SATUAN = rsPBBDD!SATUAN
rsPPBD!KD_CAT = rsPBBDD!KD_CAT
rsPPBD!Ket = rsPBBDD!Ket
rsPPBD.Update
rsPBBDD.MovePrevious
Next I
rsPPBD.AddNew
rsPPBD!No_PPB = NoBaru
rsPPBD!HD = rsPBBDD!HD
rsPPBD!urut = rsPBBDD!urut
rsPPBD!BARANG = rsPBBDD!KD_BRG
rsPPBD!QTY = rsPBBDD!QTY
rsPPBD!SATUAN = rsPBBDD!SATUAN
rsPPBD!KD_CAT = rsPBBDD!KD_CAT
rsPPBD!Ket = rsPBBDD!Ket
rsPPBD.Update
rsPBBDD.MovePrevious
Next I
Eko <[EMAIL PROTECTED]> wrote:
maaf mas purwedi, klo cara itu sdh saya cobatapi cb mas perhatikan kondisi field Hd dan field Urutsaya ingin membalik urutan data tsb karena klo urutannya tdk dibalik maka ketika akan ditransfer ke tabel lainmaka yang terjadi data di tabel baru lah yg terbalikproses transfernya kira2 begini (mohon koreksi)For I = 1 To rsPBBDD.RecordCount
rsPPBD.AddNew
rsPPBD!No_PPB = NoBaru
rsPPBD!HD = rsPBBDD!HD
rsPPBD!urut = rsPBBDD!urut
rsPPBD!BARANG = rsPBBDD!KD_BRG
rsPPBD!QTY = rsPBBDD!QTY
rsPPBD!SATUAN = rsPBBDD!SATUAN
rsPPBD!KD_CAT = rsPBBDD!KD_CAT
rsPPBD!Ket = rsPBBDD!Ket
rsPPBD.Update
rsPBBDD.MoveNext
Next I----- Original Message -----From: Purwedi KurniawanSent: Friday, February 24, 2006 9:28 AMSubject: Re: [Programmer-VB] membalik urutan data (Urgen)tambahkan diakhir query: ORDER BY namafield1,namafield2 dst DESC
On 2/24/06, Eko <[EMAIL PROTECTED]> wrote:saya punya data dari
select * from pbbdd where No_PBBD like 'PBBD/02/2006'
No_PBBD Hd Urut Kd_Brg Ket
PBBD/02/2006 k 1 BL/PEB/001
PBBD/02/2006 n Cadangan
PBBD/02/2006 k 2 3ES/004
PBBD/02/2006 k 3 3ES/014
PBBD/02/2006 n perawatan
gimana caranya membalik urutan data tersebut menjadi
No_PBBD Hd Urut Kd_Brg Ket
PBBD/02/2006 n perawatan
PBBD/02/2006 k 3 3ES/014
PBBD/02/2006 k 2 3ES/004
PBBD/02/2006 n Cadangan
PBBD/02/2006 k 1 BL/PEB/001
Relax. Yahoo! Mail virus scanning helps detect nasty viruses!
Wahana Programmer Groups Links
<*> Untuk mengunjungi sponsor milis ini, klik link berikut:
http://wahanaprogrammer.net
<*> Untuk menghubungi owner milis ini, kirim email ke:
[EMAIL PROTECTED]
<*> Konsultasi pemrogramman bisa chat disini:
Yahoo! Messenger: wahanaprogrammer
SPONSORED LINKS
| Programmer | Indonesia | Basic programming language |
| Computer programming languages | Programming languages | Java programming language |
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.
