Saving Files For Later Use 1

[Boxster1987]

Is there a way to save files in registry to be called back when you run the program again?

Thanks.

 

[vb5prgrmr]

Look up in your help file SaveSetting and GetSetting. Although I would not try to save the contents of a file to the registry, but I would save the path to it in there.

 

[SurvivorTiger]

Hey Ryan
go to references and then choose microsoft scripting run time and then write these codes:

Dim fso As New FileSystemObject
Dim tstream as TextStream
spath = App.Path & "\NewFile.txt"
Set tstream = fspenTextFile(spath, Forwriting, , TristateFalse)
tstream.Write Text1.Text
tstream.Close
Set fso = Nothing
Set fso = Nothing
'All above would save the file

'For loading wrote these codes:

Dim fso As New FileSystemObject
spath = App.Path & "\NewFile.txt"
Set tstream = fspenTextFile(spath, ForReading, , TristateFalse)
If Not tstream.AtEndOfStream Then
Text1.Text = tstream.ReadAll
tstream.Close
End If

Hope this help!!

 

[Boxster1987]

Thanks Behzad