|
Coba kasih saran deh
sebenernya gak terlalu sulit menyimpan
sebuah variabel type udt (universal data
types) ke file
daripada menyimpan di registry yang ribet juga
lambat..
mending menyimpan global variable ke
disk
misal kalo mau nyimpen data udt
biodata
'didalam modul (BAS)
type DataMhs
NIM as string * 10
Nama as string * 30
Alamat as string * 50
end type
public Biodata as DataMhs 'di form load cukup dipanggil:
'untuk simpan data
SaveLoadGlobalData("myVar.bin",
true)
'untuk load data SaveLoadGlobalData("myVar.bin", false)
'ini subrutinnya Sub SaveLoadGlobalData(filename As String,
Save As Boolean)
Dim filenum As Integer, isOpen As Boolean On Error Goto Error_Handler filenum = FreeFile Open filename For Binary As filenum isOpen = True If Save Then Put #filenum, , biodata
Else
Get #filenum, , biodata End If Error_Handler: If isOpen Then Close #filenum End Sub IpinZ
semoga membantu
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
YAHOO! GROUPS LINKS
|
- Re: [Programmer-VB] baca dan create direktori ipinz
- Re: [Programmer-VB] baca dan create direktori su_betmen nusaputra
- Re: [Programmer-VB] baca dan create direktori ipinz
- Re: [Programmer-VB] baca dan create direk... su_betmen nusaputra
- [Programmer-VB] OOT - lowongan progra... Robby
- Re: [Programmer-VB] baca dan create d... ipinz
- Re: [Programmer-VB] baca dan cre... su_betmen nusaputra
