Type mismatch: 'CreateItem'

[Lynn]

when i try to run this script it says:
c:\run.vbs(7, 1) Microsoft VBScript runtime error: Type mismatch:
'CreateItem'

Set myOlApp = CreateObject("Outlook.Application")
myItem = CreateItem(olMailItem)
Set myReply = myItem.Actions("Reply").Execute

can i know where is wrong? thanks

 

[losmac]

Set myOlApp = CreateObject("Outlook.Application") 'ok
myItem = CreateItem(olMailItem) 'it's not ok
'Set myItem = myOlApp.CreateItem(olMailItem) 'ok,
Set myReply = myItem.Actions("Reply").Execute 'ok

for more information: www.outlookvba.com