﻿function SignSessionKey()

	Dim strDataToSign
	
	strDataToSign = ""								
	mSignSessionKey = TRUE   'Must be true to sign and submit
   'Data after signing	
	document.getElementById("hid").value =""
	document.getElementById("ctl00_ContentPlaceHolder1_lblmsg").innerHTML =""	
	if document.getElementById("sessionkey").value  = "" Then
		mSignSessionKey = FALSE
	elseif document.getElementById("sessionkey").value	 <> "" then
		strDataToSign = document.getElementById("sessionkey").value																																									 
	End If																
		
	if mSignSessionKey = TRUE Then
	
		strSign=cntSC.SignTheString(2,strDataToSign)																													
		
		if strsign(1)<> ""  then																																	
		document.getElementById("err").style.visibility="visible"	
	'	msgbox(strsign(1) )												
        document.getElementById("err").InnerHTML="<font size=1 color='#ff0000'><b>" & strsign(1) & "</b></font>"
		
		else
			document.getElementById("hid").value = strSign(0)	
			document.getElementById("signIn").style.visibility ="hidden"	 
			document.getElementById("Pls").style.visibility ="visible"
			document.getElementById("err").style.visibility="hidden"	
			window.err.style.visibility="hidden"																													
		end if
		
		if Len (document.getElementById("hid").value) = 0  then
			 mSignSessionKey = FALSE
		else
			window.err.style.visibility="hidden"
		end if
	End if		
	if msignSessionKey then aspnetForm.submit() end if
End function