# db open and read test.bas draw -1 p$="new" t=open p$ ' opens db! print t if t<0 then ? "File not found" a$=db$(p$,2,1) print a$ end
# db open and read test.bas draw -1 p$="new" t=open p$ ' opens db! print t if t<0 then ? "File not found" a$=db$(p$,2,1) print a$ end
|
|
|
|
|