Hola Shiryu_Libra,
Esa es una de las páginas que había consultado y no he conseguido solucionarlo.
La dll la he hecho yo, la he conseguido de http://p2p.wrox.com/classic-asp-basics/77007-solution-impersonation-classic-asp.html.
Por lo visto no se registra con el regsvr32, sino con el comando regasm fichero.dll /tlb, que aparentemente me lo hace bien. Segun lo leido es un ensamblado.
La dll la he puesto en una carpeta del servidor y los dos usuarios que tienen que ver con el IIS tienen permiso de lectura y ejecución.
Mi código llega hasta myObject = Server.CreateObject("myDLL.myClass") y por ahí no pasa.
Tengo un w2003 server 64 bits y el .net framework 2,3,3.5 y 4 instalados en sus versiones de 32 y 64 bits
No me da ningún tipo de error, se ve que se sale del código al llegar a ese punto.
Esta es mi función:
function usuarioYPassDM (strUsuario, strClave)
Dim objLogon, resultado
response.write("<SCRIPT LANGUAGE='JavaScript'>alert('empezamos ');</SCRIPT>")
Set objLogon = Server.CreateObject("Impersonate.UserLogon")
response.write("<SCRIPT LANGUAGE='JavaScript'>alert('Objeto creado');</SCRIPT>")
objLogon.Logon "prueba", "pass", "dm"
objLogon.Logoff
response.write("<SCRIPT LANGUAGE='JavaScript'>alert('dll abierta " & resultado & "');</SCRIPT>")
usuarioYPassDM=1
end function
¿alguna ayuda más?
Cita:
Iniciado por Shiryu_Libra
un poquitin de lectura aqui
[url]http://www.tizag.com/aspTutorial/aspDLL.php[/url]
del cual dice..
registrar el DLL en el servidor
Permisos para el usuario IIS para utilizar este DLL
y en tu ASP
algo como esto
Código ASP:
Ver original<%
'Note this is example code, it will not work
' unless you create a myDLL, myClass, and a myMethod
Dim myObject
myObject = Server.CreateObject("myDLL.myClass")
myObject.myMethod("something")
myObject = nothing
%>
saludos