Ver Mensaje Individual
  #2 (permalink)  
Antiguo 26/11/2005, 09:48
wpp
 
Fecha de Ingreso: noviembre-2003
Mensajes: 50
Antigüedad: 21 años, 5 meses
Puntos: 0
He encontrado esto:

Código:
<% 
Set FileObject = Server.CreateObject("Scripting.FileSystemObject") 
strFichero = Server.MapPath("/mdb-database/log.txt") 

apellido1 =""&RS("apellido1")&""
ip = request.ServerVariables("REMOTE_ADDR") 
explorador = request.ServerVariables("HTTP_USER_AGENT") 
fecha = now 

If Instr(explorador, "MSIE") Then 
Browser = "Microsoft Internet Explorer" 
ElseIf Instr(explorador, "Mozilla") and Instr(explorador, "compatible") = 0 Then 
Browser = "Netscape Navigator" 
End If 

Set OutStream = FileObject.CreateTextFile (strFichero, true) 
OutStream.WriteLine("IP: "& ip & " Explorador: " & Browser & " Apellido1: " & apellido1 & " Fecha: "& fecha) 
OutStream.Close 

Set OutStream = Nothing 
Set FileObject = Nothing 
%>
Inserto response.cookies en cada login y quiero que los recupere y los inserte en la línea outstream.writeline, pero he probado varias cosas y no rula.

He probado en la línea esta poner apellido1:

Código:
apellido1 =""&RS("apellido1")&""
ip = request.ServerVariables("REMOTE_ADDR") 
explorador = request.ServerVariables("HTTP_USER_AGENT") 
fecha = now
Y luego escribirlo:

Código:
OutStream.WriteLine("IP: "& ip & " Explorador: " & Browser & " Apellido:" & apellido1 & " Fecha: "& fecha)

Pero no va.

Ruego alguna ayuda.