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


Eko <[EMAIL PROTECTED]> wrote:
maaf mas purwedi, klo cara itu sdh saya coba
tapi cb mas perhatikan kondisi field Hd dan field Urut
 
saya ingin membalik urutan data tsb karena klo urutannya tdk dibalik maka ketika akan ditransfer ke tabel lain
maka yang terjadi data di tabel baru lah yg terbalik
 
proses 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 -----
Sent: Friday, February 24, 2006 9:28 AM
Subject: 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




Kirim email ke