Forum Discussion

sanjay0288's avatar
sanjay0288
Frequent Contributor
14 years ago

Help Needed in getting text from a notepad

Hi, In one of the scenario i need to fect  particular text from notepad.The entire object is getting higlighted as edit control. Is there any method where I can fetch the text what I am looking for...
praneshm's avatar
praneshm
New Contributor
11 years ago

Use the .TEXTCONTENT property to fetch the value of the Object, say a textbox or a label or any object of your interest(if applicable)

  • praneshm's avatar
    praneshm
    New Contributor
    11 years ago

    Use the below code to read from the entire text file;

    Sub TextfileRead

     Dim tobj, FSO

     Set FSO = CreateObject("Scripting.FileSystemObject")

     Set tobj = FSO.OpenTextFile("C:\SampleText.txt",1)

      Do Until tobj.AtEndOfStream

       content = tobj.Readline

      Msgbox content

     Loop

     Set tobj = Nothing

     Set FSO = Nothing

    End Sub