Let the agent waiting for a LotusScript function to run again

xiaoxiao2021-03-14  193

sub PauseTime (seconds As Integer) 'Wait (loop and do nothing) for "seconds" seconds - used to make sure' a file system command happened Dim start As New notesdatetime ( "") Dim finish As New notesdatetime ( ""). Dim elapsedseconds As Integer Dim i As Integer start.setnow finish.setnow elapsedseconds = finish.timedifference (start) While elapsedseconds

转载请注明原文地址:https://www.9cbs.com/read-129230.html

New Post(0)