4. FA LIBRARY B-75044EN/02
-164-
Starting the LogServer by the log library
Set LogLib = CreateObject("LogClient.Library")
Rtn = LogLib.InvokeLogServer("")
'FA library start processing
Set FALib = CreateObject("FanucCom.Library")
Rtn = FALib.Begin() 'Initialization
Rtn = FALib.CreateCommunication() 'Start of communication
process
'Execute FA library services.
'FA library termination processing
FALib.TerminateCommunication("") ''Termination of
communication process
FALib.End 'End processing
Set FALib = Nothing
Terminating the LogServer by the log library
LogLib.TerminateLogServer
Set LogLib = Nothing