Re: VolRefNum Revisited
Quote from Forum Archives on December 9, 1997, 7:00 pmPosted by: tech <tech@...>
GBeckman wrote:>Sorry to be a broken record, but I really need this one solved.
(snip)
Thank goodness I keep scraps around... 😉
'using FN MakeAlias & FN UseAlias with the OPEN command
DIM spec;0,vRefNum%,parID&,filename$;64LONG IF FN useAlias(1000,spec)
PARENTID = parID&
OPEN "R",1,filename$,,vRefNum%
END IF
PARENTID = 0(This message was constructed without the use of any Microsoft products)
|------------------------------------------------------------------------|
| David Blache - STAZologist / STAZ Software Technical Support |
|------------------------------------------------------------------------|
| STAZ Software * 4387 Leisure Time Drive * Diamondhead, MS 39525 |
|------------------------------------------------------------------------|
| Orders 800-348-2623 Email: sales@stazsoftware.com |
| Technical Support 601-255-7085 Technical: tech@stazsoftware.com |
| FAX 601-255-7086 WWW: www.stazsoftware.com |
|------------------------------------------------------------------------|
| Join the FutureBASIC programming community now! Send any email to: |
| futurebasic-subscribe@welovegod.org. |
|------------------------------------------------------------------------|
Posted by: tech <tech@...>
>Sorry to be a broken record, but I really need this one solved.
(snip)
Thank goodness I keep scraps around... 😉
'using FN MakeAlias & FN UseAlias with the OPEN command
DIM spec;0,vRefNum%,parID&,filename$;64
LONG IF FN useAlias(1000,spec)
PARENTID = parID&
OPEN "R",1,filename$,,vRefNum%
END IF
PARENTID = 0
(This message was constructed without the use of any Microsoft products)
|------------------------------------------------------------------------|
| David Blache - STAZologist / STAZ Software Technical Support |
|------------------------------------------------------------------------|
| STAZ Software * 4387 Leisure Time Drive * Diamondhead, MS 39525 |
|------------------------------------------------------------------------|
| Orders 800-348-2623 Email: sales@stazsoftware.com |
| Technical Support 601-255-7085 Technical: tech@stazsoftware.com |
| FAX 601-255-7086 WWW: http://www.stazsoftware.com |
|------------------------------------------------------------------------|
| Join the FutureBASIC programming community now! Send any email to: |
| futurebasic-subscribe@welovegod.org. |
|------------------------------------------------------------------------|