Script doesn't ant effect

Hi.
I write fowllowing script in OP (OP is OP012)

'****************************************************************************************
Dim objFSO,objFile
Dim strText

Set objFSO=CreatObject("Scripting.filesystemobject")
Set objFile=objFSO.OpenTextFile("F:\Test.txt",8,True) ' 8 -> ForAppending

strText="My Text"
objFile.WriteFile("strText)
objFile.Close

'****************************************************************************************

I run Script then check file F:\Test.txt , it is empy
and i don't recieve any alarm when script ran.
What's the problem?
Thanks