Kalo aku malah bingung nentuin panjang array dynamic di VB.
Tapi kalo array dynamic di PB mah giampiang banget, apa lagi yang cuma
satu dimensi. Tinggal declare variable array tanpa menyebutkan
panjangnya.
misal kita mau ngambil nama orang dari table "tblOrang" yang jumlahnya
kita sendiri belum pernah tahu:
string ist_nama,isa_nama[]
long i
declare cr_nama cursor for select nama from tblOrang;
open cr_nama;
i=1
fetch cr_nama into :ist_nama;
isa_nama[i] = ist_nama
if sqlca.sqlcode = 0 then
do while sqlca.sqlcode =0
fetch cr_nama into :ist_nama;
if sqlca.sqlcode = 0 then
isa_nama[i] = ist_nama
i++
end if
loop
end if
close cr_nama;
kemudian buat nge-null in array juga sangat-sangat mudah. Declarin aja
satu dengan panjang yang nggak ditentuin juga
misal mau nge-null-in array di atas
string isa_null[] //null aray
isa_nama = isa_null //assign null array ke yang udah ada isinya
selesai............
On Tue, 13 Dec 2005 09:21:29 -0000, "mulyan" <[EMAIL PROTECTED]> said:
> abang2, bapak2,kaka2... tolong dong saya...
> Kalo di PB ada gak fungsi Setlength kaya di Delphi / VB. Misalnya saya
> punya Array satu dimensi A[3], yang ingin saya tanya : bagaimana
> caranya jumlah array tersebut ( 3 ) bisa dinamic, alias bisa diset
> gitu loh.... ( Tolooong....)
>
>
>
>
>
>
> -----------------------------------------------
> Reuni SMA Negeri 1 Angkatan 1988
> Hari/ Tanggal : Minggu, 18 Desember 2005
> Pukul : 09.00 12.00 WIB
> Lokasi : SMA Negeri 1 Jl. Ir H. Juanda Bandung
> Info lanjut hub.: Udjo 0811140603, Ilo 021 70682007, Ratih 08122129539,
> Alland 0818202247, Happy 08161815734
> -----------------------------------------------
> IndoPB - Indonesia PB User Group
> To Post a message, send it to: [EMAIL PROTECTED]
> To Unsubscribe,send a blank message to: [EMAIL PROTECTED]
> Yahoo! Groups Links
>
>
>
>
>
>
>
--
wihartoyo
[EMAIL PROTECTED]
--
http://www.fastmail.fm - A fast, anti-spam email service.
------------------------ Yahoo! Groups Sponsor --------------------~-->
Fair play? Video games influencing politics. Click and talk back!
http://us.click.yahoo.com/2jUsvC/tzNLAA/TtwFAA/NhFolB/TM
--------------------------------------------------------------------~->
-----------------------------------------------
Reuni SMA Negeri 1 Angkatan 1988
Hari/ Tanggal : Minggu, 18 Desember 2005
Pukul : 09.00 12.00 WIB
Lokasi : SMA Negeri 1 Jl. Ir H. Juanda Bandung
Info lanjut hub.: Udjo 0811140603, Ilo 021 70682007, Ratih 08122129539,
Alland 0818202247, Happy 08161815734
-----------------------------------------------
IndoPB - Indonesia PB User Group
To Post a message, send it to: [EMAIL PROTECTED]
To Unsubscribe,send a blank message to: [EMAIL PROTECTED]
Yahoo! Groups Links
<*> To visit your group on the web, go to:
http://groups.yahoo.com/group/indopb/
<*> To unsubscribe from this group, send an email to:
[EMAIL PROTECTED]
<*> Your use of Yahoo! Groups is subject to:
http://docs.yahoo.com/info/terms/
