alo mas budiman lai,
terima kasih buat info-nya
cmn saya masih blm tahu bagaimana cara menampung byte-byte tsb ke variabel
sementara trus kmdn dibaca sesuai formatnya
misal :
type data long (4 byte) ... 4 byte dikumpulin ke variable sementara, trus kmdn
dibaca sbg long?? gmn caranya ya?
type data date (8 byte) ... dimasukin ke variable sementara, trus kmdn dibaca
sbg date ... msh blm nemu caranya ...
--> kmrn nyoba
dim B as string, C as long, data(4) as byte
for A = 1 to 4
B = B & data(A) ' ngumpulin byte jd 4 byte
next A
C = clng(B)
tapi ngga bisa .. hiks hiks
klo contoh yg mas budiman lai tampilkan, itu utk teks database, krn harusnya
tipe data integer sepanjang 1 byte ngga muncul sbg angka ditampilan ... krn dia
ngga ngikut rumus ascii ... papling munculnya sbg karakter ... klo byte nya pas
dgn rumus ascii
-----Original Message-----
From: [email protected] [mailto:[EMAIL PROTECTED] On Behalf Of
budiman Lai
1. pake metode Open aja dan baca file tersebut dan
simpan dalam bentuk array
contoh:
'========================
' Start Code
'========================
Dim buff() as string
sub ReadFile2Array(filename as string)
Open filename For Binary Access Read As #1
Redim buff(Lof(1))
Get #1, , buff()
Close #1
End Sub
' untuk baca perbyte, bisa menggunkana fungsi seek. gw
'lupa cara penulisan/penggunaan-nya. fungsi ini
berguna 'untuk memindahkan pointer file ke byte
tertentu sesuai 'dengan keinginan kita. klo ga salah
cara pakainya:
' seek #1, byte_ke_berapa
'========================
' End Code
'========================
2. mgkn caranya bisa membaca byte per byte dan
masukkan nilainya ke variable sementara, kemudian
setelah pointer file menemukan karakter spasi, baru
nilai variabel sementara di cek nilainya berupa tipe
apa dengan menggunakan fungsi isnumeric, isdate,
isstring, dan lain-lain.
untuk membuat database sendiri, format headernya bisa
di buat sendiri. misal
nama_field#type_field#panjang_value,
nama_field#type_field#panjang_value, dst
kemudian untuk bagian data juga sudah di tentukan
panjang dari value-nya sesuai dengan structur yg sudah
di buat di header. contoh
' ini header database
id#integer#5, nama#string#15, email#string#25
' ini data dari database
[EMAIL PROTECTED]
[EMAIL PROTECTED]
[EMAIL PROTECTED]
dst...
NB: karakter bintang * diatas itu berupa spasi. sy
tulis * agar mudah di pahami.
smoga membantu.
rgds,
Budi
---------------------------------
Never miss a thing. Make Yahoo your homepage.
