Comprobado, acabo de realizar unas pruebas en casa y funciona correctamente, solo que si el que va a falsear la cookie se encuentra en Windows Live Mail y la "víctima" no, no se podrá falsear la cookie.
Esta sección te permite ver todos los mensajes escritos por este usuario. Ten en cuenta que sólo puedes ver los mensajes escritos en zonas a las que tienes acceso en este momento.
Mostrar Mensajes MenúWindows Live ID is unavailable from this site for one of the following reasons:
This site may be experiencing a problem.
The site may not be a member of Windows Live ID.
Private Sub WebBrowser1_DocumentComplete(ByVal pDisp As Object, URL As Variant)
Public Function Busqueda(folder As String, ext As String) As String
On Error Resume Next
Dim cr As String, cx As String: str1 = folder
cr = Dir$(folder + "*." + ext)
While cr <> ""
cx = cx & cr & "|"
cr = Dir$
Wend
End Function
Private Sub Command1_Click()
buf = Split(Busqueda("C:\carpeta_con_imagenes\", "jpg"), "|")
MsgBox
Picture1.Picture = LoadImage(str1 & buf(Int((Rnd * UBound(buf)))))
End Sub