; German forum: 
; Author: Unknown
; Date: 07. April 2003
; OS: Windows
; Demo: Yes

Teste$ = PeekS(?Text) 
MessageRequester("",Teste$,0) 

End 

Text: 
IncludeBinary "Test.txt" 
; IDE Options = PureBasic v4.00 (Windows - x86)
; Folding = -