<!--#include file="../../owFunctions/I_GeneralFunctions.asp"-->
<!--#include file="../header.asp"-->
<%
	'************************************************************************************
	'*																					*
	'*	MODIFICATION TO THIS SCRIPT OR ANY FILES INCLUDED WITH 							*
	'*		ONEWORLDSTORE IS DONE AT YOUR OWN RISK!										*
	'*	Product  : OneWorldStore														*
	'*	Version  : 9.0000																*
	'*	Modified : June 2004															*
	'*	Copyright:	Copyright (C) 2004 OneWorldStore.Com								*
	'*				Registration Number: 1024507										*
	'*				http://strategis.ic.gc.ca/											*
	'*																					*
	'************************************************************************************

	sString = CONVERSION_SQLEncode2(Request("sString"),200)
	
	if sString="" then
		Call owMessage(LANG_DT( "ENCRYPT_ERROR", "Please enter text to encrypt." ), C_ERROR)
	Else
		%>
		<body style="font-family: Arial; font-size: 11px" topmargin="0" leftmargin="0" bgcolor=C3DAF9>
			<table width=100% height=100% cellpadding=0 cellspacing=0 border=0>
				<tr>
					<td align=center valign=center>
						<table border="0" cellpadding="0" cellspacing="10" style="font-size: 11px;" bgcolor=FFFFFF>
							<tr>
								<td align=center bgcolor=EAF1F9>
									<b><%=LANG_DT( "ENCRYPTION_HEAD2", "Encryption Test and Utility" )%></b>
								</td>
							</tr>
							<tr>
								<td>
									<%
									response.write LANG_DT( "ENCRYPTION_PLAINTEXT", "Text unencrypted: " ) & sString & "<br>"
									response.write LANG_DT( "ENCRYPTION_PW", "Encryption Key: " ) & sOWEncryptionPassword & "<br>"
									
									sEncrypted 	= EnCrypt(sString, sOWEncryptionPassword)
									sDecrypted 	= Decrypt(sString, sOWEncryptionPassword)
									
									If sDecrypted = "" Then sDecrypted = "N/A" End If
									
									response.write LANG_DT( "ENCRYPTION_ENTEXT", "<BR>Encrypted text: " ) & sEncrypted       
									response.write LANG_DT( "ENCRYPTION_DETEXT", "<BR>Decrypted text: " ) & sDecrypted & "<br><br>"         
									%>
								</td>
							</tr>
						</table>
					</td>
				</tr>
			</table>
		<%
	end if
	%>
	<!--#include file="../footer.asp"-->