First of all next time at least describe errors or problems you encountered. For lack of them I had to to execute your code and ...

 th following line

Exec @status = sp_OAMethod @object, 'CreateTextFile',@objFile,'C:\esps\test1.txt','true'

has...

What do you mean "for writing to a text file". Generally sp_oaXXX methods operate on COM objects, which can do practically anything. I suppose you have a COM object "for...