Advanced Search

ACCESS Status Bar como Progress Bar

/ Published in: Visual Basic
Save to your folder(s)

Expand | Embed | Plain Text

Copy this code and paste it in your HTML 
  1. 'Dentro del loop que recorre un recordset
  2.     If rs.AbsolutePosition + 1 = 1 Then
  3.        x = SysCmd(acSysCmdInitMeter, "process:", TotalRecords)
  4.     Else    
  5.       x = SysCmd(acSysCmdUpdateMeter, rs.AbsolutePosition + 1)
  6.     End If

Report this snippet


Comments

RSS Icon Subscribe to comments

You need to login to post a comment.