vba code skips ahead unless I add a msgbox (when using fingerprintscanner)

R

RCGUA

I have an Access 2003 form where I am using a finger print scanner to
enter the users name.
The finger print scanner is Eikon Digital Privacy Manager for PC with
their Protector Suite software.

When I click a button on a form clear the form, I want it to make the
"lstEmployeePayments" listbox invisible >> then > open the finger
print scanner (PassportManger) bit which will get the next persons
finger print. But, the code below completely ignores the first line
and skips ahead to open the finger print thing. If I put a msgbox
after the first line, then it works perfectly.

Forms![frmCASA-4payments].lstEmployeePayments.Visible = False
Set MyPassMgr = CreateObject("PSuiteAX.VtPassportManager")
Set MyPassport = MyPassMgr.OpenPassport("", False)
i = MyPassport.UserName
Me.cboWorkerName = ""

http://www.upek.com/solutions/eikon/default.asp
 
J

John Spencer

Try inserting a DoEvents call after you change the visible property.

Forms![frmCASA-4payments].lstEmployeePayments.Visible = False
DoEvents
Set MyPassMgr = CreateObject("PSuiteAX.VtPassportManager")
Set MyPassport = MyPassMgr.OpenPassport("", False)
i = MyPassport.UserName
Me.cboWorkerName = ""


John Spencer
Access MVP 2002-2005, 2007-2009
The Hilltop Institute
University of Maryland Baltimore County
 
R

RCGUA

Try inserting a DoEvents call after you change the visible property.

Forms![frmCASA-4payments].lstEmployeePayments.Visible = False
DoEvents
Set MyPassMgr = CreateObject("PSuiteAX.VtPassportManager")
Set MyPassport = MyPassMgr.OpenPassport("", False)
i = MyPassport.UserName
Me.cboWorkerName = ""

John Spencer
Access MVP 2002-2005, 2007-2009
The Hilltop Institute
University of Maryland Baltimore County


I have an Access 2003 form where I am using a finger print scanner to
enter the users name.
The finger print scanner is Eikon Digital Privacy Manager for PC with
their Protector Suite software.
Click to expand...
When I click a button on a form clear the form, I want it to make the
"lstEmployeePayments" listbox invisible >> then >  open the finger
print scanner (PassportManger) bit which will get the next persons
finger print.   But, the code below completely ignores the first line
and skips ahead to open the finger print thing.   If I put a msgbox
after the first line, then it works perfectly.
Click to expand...
Forms![frmCASA-4payments].lstEmployeePayments.Visible = False
Set MyPassMgr = CreateObject("PSuiteAX.VtPassportManager")
Set MyPassport = MyPassMgr.OpenPassport("", False)
i = MyPassport.UserName
Me.cboWorkerName = ""
Click to expand...
http://www.upek.com/solutions/eikon/default.asp- Hide quoted text -
Click to expand...

- Show quoted text -
Click to expand...

Excellent ! Thank you, that seems to work. I don't have the
fingerprint scanner with me right now so I can't fully test it until
this evening, but it seems to work, I will test it with the finger
print scanner and write back this evening.
 
R

RCGUA

Try inserting a DoEvents call after you change the visible property.
Click to expand...
Forms![frmCASA-4payments].lstEmployeePayments.Visible = False
DoEvents
Set MyPassMgr = CreateObject("PSuiteAX.VtPassportManager")
Set MyPassport = MyPassMgr.OpenPassport("", False)
i = MyPassport.UserName
Me.cboWorkerName = ""
Click to expand...
John Spencer
Access MVP 2002-2005, 2007-2009
The Hilltop Institute
University of Maryland Baltimore County
Click to expand...
RCGUA said:
I have an Access 2003 form where I am using a finger print scanner to
enter the users name.
The finger print scanner is Eikon Digital Privacy Manager for PC with
their Protector Suite software.
When I click a button on a form clear the form, I want it to make the
"lstEmployeePayments" listbox invisible >> then >  open the finger
print scanner (PassportManger) bit which will get the next persons
finger print.   But, the code below completely ignores the first line
and skips ahead to open the finger print thing.   If I put a msgbox
after the first line, then it works perfectly.
Forms![frmCASA-4payments].lstEmployeePayments.Visible = False
Set MyPassMgr = CreateObject("PSuiteAX.VtPassportManager")
Set MyPassport = MyPassMgr.OpenPassport("", False)
i = MyPassport.UserName
Me.cboWorkerName = ""
http://www.upek.com/solutions/eikon/default.asp-Hide quoted text -
Click to expand...
Click to expand...
- Show quoted text -
Click to expand...

Excellent !   Thank you,  that seems to work.    I don't have the
fingerprint scanner with me right now so I can't fully test it until
this evening, but it seems to work, I will test it with the finger
print scanner and write back this evening.
Click to expand...

I tested this with the fingerprint scanner and everything works
fine. DoEvents fixed the problem.

Thanks Again !
 
R

Rudolf Lamour

Try inserting a DoEvents call after you change the visible property.
Click to expand...
Forms![frmCASA-4payments].lstEmployeePayments.Visible = False
DoEvents
Set MyPassMgr = CreateObject("PSuiteAX.VtPassportManager")
Set MyPassport = MyPassMgr.OpenPassport("", False)
i = MyPassport.UserName
Me.cboWorkerName = ""
Click to expand...
John Spencer
Access MVP 2002-2005, 2007-2009
The Hilltop Institute
University of Maryland Baltimore County
Click to expand...
RCGUA said:
I have an Access 2003 form where I am using a finger print scanner to
enter the users name.
The finger print scanner is Eikon Digital Privacy Manager for PC with
their Protector Suite software.
When I click a button on a form clear the form, I want it to make the
"lstEmployeePayments" listbox invisible >> then > open the finger
print scanner (PassportManger) bit which will get the next persons
finger print. But, the code below completely ignores the first line
and skips ahead to open the finger print thing. If I put a msgbox
after the first line, then it works perfectly.
Forms![frmCASA-4payments].lstEmployeePayments.Visible = False
Set MyPassMgr = CreateObject("PSuiteAX.VtPassportManager")
Set MyPassport = MyPassMgr.OpenPassport("", False)
i = MyPassport.UserName
Me.cboWorkerName = ""
http://www.upek.com/solutions/eikon/default.asp-Hide quoted text -
Click to expand...
Click to expand...
- Show quoted text -
Click to expand...

Excellent ! Thank you, that seems to work. I don't have the
fingerprint scanner with me right now so I can't fully test it until
this evening, but it seems to work, I will test it with the finger
print scanner and write back this evening.
Click to expand...

I tested this with the fingerprint scanner and everything works
fine. DoEvents fixed the problem.

Thanks Again !
 
Top