[Gambas-user] Problem with Exist & Open functions with filename containing spaces

Tobias Boege taboege at ...626...
Thu Mar 12 11:37:28 CET 2015


On Thu, 12 Mar 2015, Tobias Boege wrote:
> [...] attached script [...]
> 

This time!

-- 
"There's an old saying: Don't change anything... ever!" -- Mr. Monk
-------------- next part --------------
#!/usr/bin/gbs3

Public Sub Main()
  Dim sPath As String = Temp$("with spaces")
  Dim hFile As Stream
  Dim sLine As String

  File.Save(sPath, "some string")

  Debug "Path =";; sPath
  Debug "Exist =";; Exist(sPath)
  Debug "Content ="
  hFile = Open sPath For Input
  For Each sLine In hFile.Lines
    Debug "  "; sLine
  Next
  Close #hFile
End


More information about the User mailing list