waduh ini rancu deh, bicara database atau tabel ya?, aku anggap tabel deh...
kamun maunya nilai 2 itu sebagai apa? klu nilainya 2 itu sebagai hasil dari
kolom kd, maka perintahnya adalah :
msgbox rs("kd")
tetapi harus kamu perhatikan berapa record sih hasil yang ditampilkan dengan
perintah SQL yang kamu buat? (klu menurutku hasilnya satu record, jika type
data kd didalam tabel itu numeric, klu kd itu string type datanya hasilnya nol)
Klu menurut mu, [hasilnya rs.AbsolutePosisiti on 'Kenapa hasilnya selalu 0]
berarti type data kolom kd itu string)
klu nilai 2 itu maunya sebagai posisi record yang ditampilkan ya hasilnya nol,
krn tidak ada record. Klu jumlah recordnya satu, ya yang ditampilkan adalah
satu juga, klu jumlah recordnya lebih dari satu ya yang ditampilkan juga satu
(slalu record pertama). Jadi nilai 2 yang kamu inginkan itu tidak akan didapat
dengan code yang kamu buat tersebut.
Semoga membantu: =(oVo)=
====================
BaceInside Publisher
Copyright @2007
Not for reproduced, republished.
Thank You
====================
----- Original Message ----
From: ADEX <[EMAIL PROTECTED]>
To: [email protected]
Sent: Thursday, May 10, 2007 2:50:45 PM
Subject: [indoprog-vb] Re: mendapatkan Nomor Record
Absolutposition digunakan untuk mengetahui posisi record yg terpilih
saat itu dari query yg di jalankan. jadi klo query dari mas sony spt
itu ya jelas akan tampil 0 karena cuman ada 1 record.
dan record yg terpilih adalah record pertama.
maksud untuk mendapatkan no record itu gimana, kurang jelas.
--- In indoprog-vb@ yahoogroups. com, sonny marpaung <sonny_mp03@ ...> wrote:
>
> Mas2 aku mau tanya bagai mana caranya untuk mendapatkan nomor record?
> saya untuk konek ke databasenya dengan coding seperti dibawah ini
>
> misalnya isi database DB:
> kd nama
> 1 A
> 2 B
> 3 C
>
> dim con As New ADODB.Connection
> dim rs As New ADODB.Recordset
> Public Sub Buka_Con()
> con.Open "Provider=Microsoft .Jet.OLEDB. 4.0;Data Source=" &
App.Path & "\DB.mdb" & _
> ";Persist Security Info=False;Jet OLEDB:Database
Password="
>
> rs.open("select * from tabel order by kd where kd = 2",cn,1,3)
> msgbox rs.AbsolutePosisiti on 'Kenapa hasilnya selalu 0 bukan 2
> End Sub
>
>
>
>
>
> ------------ --------- --------- ---
> Ahhh...imagining that irresistible "new car" smell?
> Check outnew cars at Yahoo! Autos.
>
> [Non-text portions of this message have been removed]
>
__________________________________________________
Do You Yahoo!?
Tired of spam? Yahoo! Mail has the best spam protection around
http://mail.yahoo.com
[Non-text portions of this message have been removed]
