Pcanywhere OLE delete object problem

[murphyc]

I want to delete the xxxx.chf use the remotedatamanager.deleteobject, after i press the button, it can delete the xxxx.chf file. But it said "Object Required at last line. What's wrong on this code?

Thanks


Private Sub Command2_Click()

Dim RemoteDataManager As Object
Dim RemoteData As Object

Set RemoteDataManager = CreateObject("WINAWSVR.REMOTEDATAMANAGER&quot

RemoteDataManager.ChangeDirectory ("C:\Documents and Settings\All Users\Application Data\Symantec\pcAnywhere\&quot

Set RemoteData = RemoteDataManager.DeleteObject("Remote", 111111)




End Sub