How to append contents to text file in QTP

Example -

Below Code will append data in contents variable to text file  in QTP


            content = "This will be in file "

            Set Fo = createobject("Scripting.FilesystemObject")
            Set f = Fo.openTextFile("c:\abc.txt",8,true)     'open in append mode
            f.Write (contents)
            f.Close
            Set f = nothing


This is how we can append the contents to the text file  in QTP.