Quantcast
Channel: Internet Explorer Web Development forum
Viewing all articles
Browse latest Browse all 3527

Activex GUI doesn't show at first time in IE9 and IE10.

$
0
0

i had developed an activex component for fingerprint capture in IE. the activex dll loads the scanner dll and initialize the scanner for fingerprint capture. if the scanner initialized then i show a popup which was created using c++ showdialog method. the popup appears then user place the fingerprint and the user place the finger on the scanner and fingerprint captures, for the following process i created a function named scannerTest() in activex dll. Then i created a obj for activex dll class using VB script, in the button click event i call scannerTest() function. The fingerprint capture popup shows properly when the capture button click in IE8. while the same thing i did in IE9 the popup not appears at first time and the popup appears in the next click.while i run my app in ie9 compatibility mode the popup appears. The same issue in IE10 also. how can i rectify this. sorry for my bad English and thanks in advance. please do the needful. my sample code is given below.

 

HTML:

   
<! DOCTYPE html>        <head>        	<script language="vbscript" type="text/vbscript" src="LegendScript.vbs"> </script>        </head>        <body>            	<input type="hidden" id="ijkl" name="921" Value = "1"/>    	<input type="hidden" id="lmno" name="18947" Value = "1"/>    	<input type="hidden" id="fid" name="fid" Value = "1"/>    	<input type="hidden" id="txtEnrol" name="efgh" />	    	<input type="hidden" id="txtHiddenImage" name="mnop" />     	<input type="hidden" id="txtRecog" name="abcd" />    	<input type="button" language = "vbscript" id="btnEnrol" value="Generalization" onclick="GetFeatureAccrual ijkl.Value, fid.Value, txtEnrol, txtHiddenImage" />    	<input type="button" language = "vbscript" id="btnRecog" value="Recognition" onClick="GetFeature lmno.Value, fid.Value, txtRecog" />                </body>        </html>


VBScript:

   
 Function scannerTest(sTellerID, sFingerID, IdOfHiddenTextField)        	Dim Obj    		    	If (IdOfHiddenTextField Is Nothing) Then        		MsgBox "Invalid Hidden Fiedld ID Received", vbInformation, "BOB FI BMA Application"    		    	ElseIf (sTellerID = "") Then    	    		MsgBox "TellerID ID Is Empty", vbInformation, "BOB FI BMA Application"        	Else    	    		Set Obj = CreateObject ("BOB_FI_API.Legend")        		Dim ret    		Dim length    		Obj.EnableLog = 1    		Obj.GetFeature sTellerID, cLng("1")        		IdOfHiddenTextField.Value = Obj.Feature        		Dim sContent        		obj.ServerData = "1234567"        		sContent = obj.DllData        		If (IdOfHiddenTextField.Value <> "") Then        			MsgBox "Scanner working properly"     			    		End If        	End If        End Function



Viewing all articles
Browse latest Browse all 3527

Trending Articles



<script src="https://jsc.adskeeper.com/r/s/rssing.com.1596347.js" async> </script>