Need instruction or code

Hi.
I wonder if there is an instruction or code that to certain hour executes a program in PC dmis?

as always, thanks for any information.

perinho over 1 year ago

Dim PCDApp, PCDPartPrograms, PCDPartProgram

Set PCDApp = CreateObject("PCDLRN.Application")
Set PCDPartPrograms = PCDApp.PartPrograms

PCDApp.Visible = True
PCDPartPrograms.Open "Z:\test.PRG", "CMM1"

Set PCDPartProgram = PCDApp.ActivePartProgram

'msgbox "This will start the execution of the partprogram!"
PCDPartProgram.Execute

' PC-DMIS executes the partprogram

PCDPartProgram.Close

' PC-DMIS closes and saves the partprogram

' Cleanup
Set PCDPartProgram = nothing
Set PCDPartPrograms = nothing
Set PCDApp = nothing

Hi,
anything similar that would work for v2012??
Doesn't seem to like .execute. (line 12)
asking for a friend

thanks, p.

vpt.se over 1 year ago

Not sure, don't use it or have the help files for 2012... Execute might have been added in later versions.
Cancel
Vote Up 0 Vote Down

Sign in to reply

Cancel