Post 41360

A Snippet from: CyberCitizen

IfFileExists>%DESKTOP_DIR%\Test.txt
  Let>vCount=1
  While>vLineNum<>##EOF##
    ReadLn>%DESKTOP_DIR%\Test.txt,vCount,vLineNum
    If>vLineNum<>##EOF##
      MessageModal>vLineNum
    Endif
    Let>vCount=vCount+1
  EndWhile
Else
  MDL>File Not Found, Press Ok To Create The File & Run The Script To Try Again
  Let>WLN_NOCRLF=1
  WriteLn>%DESKTOP_DIR%\Test.txt,,123456%CRLF%234567%CRLF%987456%CRLF%234590
  Exit>0
EndIf

Select the code above to paste into your macro. Or: View Raw Text

Link: http://www.mjtnet.com/snip.htm?g=590b267c614d5

Forum Embed Code - click to select all then copy (CTRL-C):
[snippet=590b267c614d5]IfFileExists>%DESKTOP_DIR%\Test.txt Let>vCount=1 While>vLineNum<>##EOF## ReadLn>%DESKTOP_DIR%\Test.txt,vCount,vLineNum If>vLineNum<>##EOF## MessageModal>vLineNum Endif Let>vCount=vCount+1 EndWhile Else MDL>File Not Found, Press Ok To Create The File & Run The Script To Try Again Let>WLN_NOCRLF=1 WriteLn>%DESKTOP_DIR%\Test.txt,,123456%CRLF%234567%CRLF%987456%CRLF%234590 Exit>0 EndIf[/snippet]
When pasting into the forum do NOT modify the script code or it will not match what is in the database - create a new snippet instead!