Importar favoritos

[sjam7]

Alguien sabe como importar los favoritos del navegador para guardarlos en una base de datos con ASP? sera posible?

[El_Metallick]

con ASP no creo que se pueda detectar los favoritos... con javascript en una de esas... no sabria decirte... saludos

[AlZuwaga]

¿puedo preguntar para que lo usarías?

[sjam7]

estoy haciendo un portal donde me gustaria que los usuarios puedar guardar sus favoritos.

estoy probando uno hecho en php nomas que de ese lenguaje no entiendo mucho por eso buscaba en asp

[AlZuwaga]

En realidad te preguntaba por dos motivos:

1- Se me había ocurrido hacer algo así, aunque creo ya existe :)
2- Si la respuesta era que lo querés hacer sin ninguna acción de parte del usuario, yo supongo no se puede.

Igual mediante ASP o PHP no creo que logres nada, y me extraña estar haciendote este comentario ;)

[sjam7]

de hecho lo que estoy viendo, solo que un cliente me cambio lo que estaba haciendo es que con un script de php lo que haces es:
1.- exportar desde tu navegador un archivo
2.- recoger este archivo con el clasico examinar...
3.- meter los datos en una mysql

yo hubiera querido que fuera primero automatizado (si no se puede no importa) y segundo en ASP pero bueno, intentare integrarlo en una oportunidad que tenga...

[sqa212]

Yo tenia este codigo y funcionaba para versiones anteriores del explorer a no recuerdo, en la 6.0 no funciona.

<%
Function BinaryToString(Binary)
Dim I, S
For I = 1 To LenB(Binary)
S = S & Chr(AscB(MidB(Binary, I, 1)))
Next
BinaryToString = S
End Function
If UCase(Request.ServerVariables("HTTP_User_Agent")) = "POSTFAVORITES" Then
Dim ByteArray
'Leemos los favoritos
ByteArray = Request.BinaryRead(Request.ServerVariables("HTTP_C ontent_Length"))
'Metemos favoritos en una sesion
session("Favorites") = BinaryToString(ByteArray)
session("http") = Request.ServerVariables("ALL_RAW")
End If
Dim URL
Const Message = "Haz click para mostrar tus favoritos en pantalla"
URL = Request.ServerVariables("HTTP_HOST") & Request.ServerVariables("SCRIPT_NAME")
'Escribimos el enlace
Response.Write " <a href=""javascript:{external.ImportExportFavorites( 0,document.location.href);window.location.reload() ;}"">"&Message&"</a>"
If session("Favorites")<>"" Then Response.Write " Estos son tus favoritos <br>"
'Escribimos los favoritos
If session("Favorites")<>"" Then
Response.Write "<TABLE BORDER=0 CELLPADDING=0 CELLSPACING=0 Cols=1 bgcolor=#ccccccc><tr bgcolor=#999999><th>"
Response.Write "Mostrando tus favoritos : "
Response.Write "</th></tr><tr><td>"
Response.Write session("Favorites")
Response.Write "</td></tr></TABLE>"
Response.Write "</th></tr><tr><td>"
Response.Write "<pre>http header : " & vbCrLf & session("http") & "</pre>"
Response.Write "</td></tr></TABLE>"
End If
%>

Saludos