Software Deployment

Hi,
I am working on an msi, which at the moment only contains a VBscript. The script runs fine on its own but when I add it as a custom action I am getting the following error:

Internal Error 2235. ,RuntimeFlags, Select 'Component','RuntimeFlags','KetPath','Attributes'FROM 'Component'WHERE 'Component' = ?

VB script is as follows


strComputer = "."

Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")

Set colFiles = objWMIService. _
ExecQuery("Select * From CIM_DataFile Where Name = 'C:\\oracle\\ora92\\bin\\oraclient9.dll'")

If colFiles.Count <> 0 Then

Set colFiles = objWMIService.ExecQuery _
("Select * From CIM_DataFile Where FileName = 'tnsnames' and Extension = 'ora'")

For Each objFile in colFiles

strNewName = objFile.Drive & objFile.Path & "tnsnames.old"
errResult = objFile.Rename(strNewName)

Next

Else

End If


any help on this would be appreciated.
many thanks
Jimmy