.
.
.
DirCreate("/My Documents/StructFiles")
addpath="/My Documents/StructFiles/"
OpenFileSelected
.
.
.
Sub OpenFileSelected
ffl=addpath&filebox1.text&".txt"
If FileExist (ffl) = true Then
FileOpen (c1,ffl,cRead)
TxtProj01.text= FileRead (c1)
TxtDesc01.text= FileRead (c1)
TbUser.text= FileRead (c1)
TbDate01.text= FileRead (c1)
LBSelect01.clear
r=FileRead (c1): rr=r
For i = 0 To rr
r=FileRead (c1)
LBSelect01.Add (r)
Next i
LBProcess01.Clear
r=FileRead (c1):rr=r
For i = 0 To rr
r=FileRead (c1)
LBProcess01.Add (r) 'NOT REGISTERING ON DEVICE???
Next i
.
.
.