• Home
 · 
• Files/File Controls/Input/Output
 · 
• Read & load a text file using this code. Useful in installation programs.

Read & load a text file using this code. Useful in installation programs.

Read & load a text file using this code. Useful in installation programs.

API Declarations


'For More info visit my site: http://www.geocities.com/for2not2



Rate Read & load a text file using this code. Useful in installation programs.

• 1
• 2
• 3
• 4
• 5

(1(1 Vote))

'http://www.geocities.com/for2not2

Private Sub Form_Load()
    Msgbox
End Sub

Public Function LoadFile(nFilename as String) as String
    Dim fso as New Scripting.FileSystemObject
    Set hh = fso.OpenTextFile(nFilename, ForReading, False, Tristate as Default)
    dd = hh.ReadAll
    hh.Close
    LoadFile = dd
End Function

End Function