Run Time Error -'2147352567(80020009)

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

Good Morning,
I had some issues earlier which were resolved but now I'm running into
another Runtime error stating {Prg Ctrl returned the error: Invalid Property
Value below in brackets:{Me.mainSyncProgressBar = i / rcCountInt * 100}
I am trying to have data sync to produce updated reports.

Dim wrkDefault As Workspace
Set wrkDefault = DBEngine.Workspaces(0)

strSQL = "SELECT tbl_JobInfo.WMS FROM tbl_JobInfo"
Set rs = db.OpenRecordset(strSQL)
wrkDefault.BeginTrans
Me.SetFocus
Me.Repaint
Dim i As Integer
i = 1
Do While Not rs.EOF
Dim strWMS As String
strWMS = Nz(rs.Fields(0), 0)
updateJob strWMS, Cnxn, db
rs.MoveNext
{Me.mainSyncProgressBar = i / rcCountInt * 100}
Me.mainSyncProgressBar.Refresh
Dim istr As String
istr = i
Me.statusText.value = istr + " of " + rcCountStr + " jobs updated "
Me.SetFocus
Me.Refresh
Me.Repaint
i = i + 1
Loop
wrkDefault.CommitTrans
rs.Close

End Sub
 
rcCountInt appears to be an undeclared variable, which means you are
dividing by zero, null, nothing or an empty string.

Odds are that the result of that (#Error?) can't be assigned to the Progress
bar ("Invalid property value").

HTH,
 
The value for rcCountInt = 7620 why is it not declaring it as a value and
what can I do to resolve this.
 
Back
Top