On 12/03/15 12:19, Benoît Minisini wrote:
> Le 12/03/2015 13:11, John Rose a écrit :
>> On 12/03/15 11:38, Tobias Boege wrote:
>>> On Thu, 12 Mar 2015, John Rose wrote:
On 12/03/15 10:37, Tobias Boege wrote:
> Public Sub Main()
>Dim sPath As String = Temp$("with spaces")
>D
Le 12/03/2015 13:11, John Rose a écrit :
> On 12/03/15 11:38, Tobias Boege wrote:
>> On Thu, 12 Mar 2015, John Rose wrote:
>>> On 12/03/15 10:37, Tobias Boege wrote:
Public Sub Main()
Dim sPath As String = Temp$("with spaces")
Dim hFile As Stream
Dim sLine As String
>>>
On 12/03/15 11:38, Tobias Boege wrote:
> On Thu, 12 Mar 2015, John Rose wrote:
>> On 12/03/15 10:37, Tobias Boege wrote:
>>> Public Sub Main()
>>> Dim sPath As String = Temp$("with spaces")
>>> Dim hFile As Stream
>>> Dim sLine As String
>>>
>>> File.Save(sPath, "some string")
>>>
>>> Deb
On Thu, 12 Mar 2015, John Rose wrote:
> On 12/03/15 10:37, Tobias Boege wrote:
> > 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 =";
On 12/03/15 10:37, Tobias Boege wrote:
> 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 sPat
On Thu, 12 Mar 2015, Tobias Boege wrote:
> [...] attached script [...]
>
This time!
--
"There's an old saying: Don't change anything... ever!" -- Mr. Monk
#!/usr/bin/gbs3
Public Sub Main()
Dim sPath As String = Temp$("with spaces")
Dim hFile As Stream
Dim sLine As String
File.Save(sPa
On Thu, 12 Mar 2015, John Rose wrote:
> I have coding of:
> sPlainPath = User.Home &/ "plain out"
> Print "PlainPath=" & sPlainPath
> If Exist(sPlainPath) Then
> Print sPlainPath & " exists"
> Else
> Print sPlainPath & " does not exist"
> Endif
> hPlain = Open sPlainPath For Inp
I have coding of:
sPlainPath = User.Home &/ "plain out"
Print "PlainPath=" & sPlainPath
If Exist(sPlainPath) Then
Print sPlainPath & " exists"
Else
Print sPlainPath & " does not exist"
Endif
hPlain = Open sPlainPath For Input
While Not Eof(hPlain)
Line Input #hPlain, sLine
