Minggu, 27 Januari 2013

Operasi File - File Sequential Membuat & Menyimpan Data

A. Membuat File baru dan Menyimpan Data.
 1. > OPEN "O",#1, "ID.DAT" atau OPEN "MHS.DAT" FOR OUTPUT AS #1
 2. > WRITE #1 atau PRINT #1
 3. > CLOSE #1 atau CLOSE 1
 => Penjelasan :
 >> Huruf "O" sebagai output untuk membuat file baru

 >> #1 sebagai nomor penyimpanan file, nomor yang digunakan dapat berupa bilangan/angka dari 1 s/d 255
 >> "MHS.DAT" sebagai nama file yang akan diproses/sebagai nama file
 >> Write #1 sebagai merekam data kedalam file
      Contoh : WRITE #1, nm$, tggl$, umur$
 >> Close #1 sebegai penutup file apabila proses sudah selesai/tidak ada proses lagi.

Contoh Program :
OPEN "O", #1, "ID.DAT"
1 READ nm$, tggl$, umur$
IF nm$ = "xx" THEN 999
PRINT #1, nm$; ", "; tggl$; ", "; umur$
GOTO 1
DATA "Dino", "32/02/92", "20", "Marus", "30/09/94", "18", "xx", "xx/xx/xx", "xx"
999 CLOSE #1
END

Tidak ada komentar:

Posting Komentar