by ceinj » Mon Sep 09, 2019 4:50 pm
Are you sure? I think this is for setting up your own progress bar in a script but it does not return MM's sync progress.
I went back and modified my script as follows (a snippet):
Case "STA" 'Get Status & Progress Message
Dim ProgressBar
Dim ProgressMsg
Dim ProgressTxt
On Error Resume Next
ProgressMsg = SDB.Device.GetSyncProgress(hand)
If ProgressMsg <> "" Then
ProgressMsg = "(" & Fix(ProgressMsg * 100) & "%)"
End If
... ProgressMsg always returns a value like "(#%)" ...
Set ProgressBar = SDB.Progress
ProgressTxt = ProgressBar.Text
ProgressTxt = Err.Number & " - " & ProgressTxt
... Err.Number is always 0 and ProcessTxt is always blank ...
I tried this script on but an unskinned version of MM and with the Pulse skin with the same results.
Any suggestions?
Are you sure? I think this is for setting up your own progress bar in a script but it does not return MM's sync progress.
I went back and modified my script as follows (a snippet):
Case "STA" 'Get Status & Progress Message
Dim ProgressBar
Dim ProgressMsg
Dim ProgressTxt
On Error Resume Next
ProgressMsg = SDB.Device.GetSyncProgress(hand)
If ProgressMsg <> "" Then
ProgressMsg = "(" & Fix(ProgressMsg * 100) & "%)"
End If
... ProgressMsg always returns a value like "(#%)" ...
Set ProgressBar = SDB.Progress
ProgressTxt = ProgressBar.Text
ProgressTxt = Err.Number & " - " & ProgressTxt
... Err.Number is always 0 and ProcessTxt is always blank ...
I tried this script on but an unskinned version of MM and with the Pulse skin with the same results.
Any suggestions?