untuk ilustrasi sbb :
mission : membaca data sepanjang 24 byte
1. saya punya data sepanjang 24 byte (record length / 1 baris data)
2. data tersebut terdiri dari :
nama 10 byte (10 karakter)
alamat 10 byte (10 karakter)
umur 4 byte (1 long)
3. utk membaca data tsb, saya membuat loop sbb :
for a=1 to 24
if a<=10 then
nama = nama & cstr(sData (a)) 'data byte ke a
elseif a<=20 then
alamat = alamat & cstr(sData(a))
else
umur = ...
end if
next a
masalah timbul waktu membaca umur, karena datanya sepanjang 4 byte
dari byte 21 - 24 sebenarnya satu kesatuan data (tipe long) ... klo dibaca
biasa dia jd karakter sepanjang 4 karakter (4 byte) ... tp saya bingung
tentang bagaimana cara merubah 4 karakter tsb menjadi sebuah angka (tipe
data long)
demikian,
semoga ada pencerahan.
atau mungkin metode saya salah dari awal ya?
cara tradisional sih dgn membuat type data
private type Biodata
nama as string 10
alamat as string 10
umur as long 10
end type
dim sData as Biodata
sData = Teks
nama = sData.nama
alamat = sData.alamat
umur = sData.umur
masalahnya saya blm nemu saya buat type tsb saat run time biar bisa fleksible
pusinggg
-----Original Message-----
From: [email protected] [mailto:[EMAIL PROTECTED] On Behalf Of
Pungki Ninaber
Jadi begini, kami dulu pernah pake cara menkonvert data dari hasil scan RFID
tag yang mana data didapat dari hyper Terminal, dan type datanya long.
Logikanya data asli kamu tahan, lalu dari situ kamu bisa kurangi jumlah data
ato nomernya bukan quantity ya... trus kamu konvert deh tu tipe data nya...
Coba kamu kirim code nya, mungkin rekan 2 lain lebih paham, cos aku paham kalu
itu udah antarmuka pake device tertentu, olah data masih perlu belajar banyak...
Moga membantu...
Pungki N.
---------------------------------
Looking for last minute shopping deals? Find them fast with Yahoo! Search.
