Dim FileNum As
Dim DataLine As
String, MYPath As
MYPath = MacScript("return (path to desktop folder) as String")
MYPath = MYPath & "MyFile.txt"
FileNum = FreeFile()
Open MYPath For Input As #FileNum
While Not EOF(FileNum)
Line Input #FileNum, DataLine ' read in data 1 line at a time
Hope this helps
5 people found this reply helpful
Was this reply helpful?
Sorry this didn't help.
Great! Thanks for your feedback.
How satisfied are you with this reply?
Thanks for your feedback, it helps us improve the site.
Thanks for your feedback.