Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

Miele

Componentes

Recommended Posts

Usando o exemplo de Criptografia, estou tentando acessar polo asp eestou tendo erro. Alguém pode ajudar?Qual o erro?O que estaria faltando?Com este exemplo não funciona: -------------------------------------- - Poderia chamar o componente duas vezes? set objCrypt = server.CreateObject("CriptoASP.clsCryptASP") strcriusu = objCrypt.CriptSenha(strusu) '--> ???? strcrisen = objCrypt.CriptSenha("strsenha") 'Response.Write (strcriusu + " - " + strcrisen) Response.Write (strcriusu) Response.End - A função: Dentro da DLL - Componente: ----------- Public Function CriptSenha(Psenha As String) As Variant - O erro: ---------Tipo de erro:Erro de tempo de execução do Microsoft VBScript (0x800A000D)Tipos incompatíveis: 'objCrypt.CriptSenha'/Desenv_ASP/Desenv_ASP/PRGs/brsd_menu_01.asp, line 155Criei este arquivo em html e funcionou:-----------------------------------------------<%@ LANGUAGE="VBScript" %><% Option Explicit %><%dim objCryptdim strCriif Request("senha") <> "" then set objCrypt = server.CreateObject("CriptoASP.clsCryptASP") strCri = objCrypt.CriptSenha(Request("senha"))else strCri = "" end if%><html><head><title>Criptografia</title></head><body bgcolor="#FFFFFF" text="#000000"><center><form name="form1" method="post" action="CriptAsp.asp"><table border="0" width="212"><tr><td><font face="Arial" size="2"><b>Senha: </b></font>  <input type="text" name="senha" maxlength="10"></td></tr><tr><td align="center"><font face="Arial" size="2"><b><%=strCri%></b></font></td></tr><tr><td align="center"><font face="Arial" size="2"><INPUT TYPE="text" NAME="txtsenha" SIZE="10" MAXLENGTH="50" value="<%=strCri%>"></font></td></tr><div align="center"><input type="submit" name="Submit" value="Criptografar"></div></td></tr></table></form></center></body></html>Grato

Compartilhar este post


Link para o post
Compartilhar em outros sites

×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.