/ Forside/ Teknologi / Udvikling / ASP / Tip
Login
Glemt dit kodeord?
Brugernavn

Kodeord


Reklame
Top 10 brugere
ASP
#NavnPoint
smorch 9259
Harlekin 1866
molokyle 1040
Steffanst.. 758
gandalf 657
smilly 564
gibson 560
cumano 530
MouseKeep.. 480
10  Random 410
Vis alle brugerens favoriter i browseren~
idefix har modtaget 25 point for dette tip
Fra : idefix
Vist : 796 gange

Dato : 20-12-00 23:58

Denne kode henter alle brugerens favoriter, og ligger dem i en session som derefter bliver vist for brugeren. Første gang scriptet køres kan det tage lidt tid.


<%
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
'Read the favorites
ByteArray = request.binaryread(request.servervariables("HTTP_Content_Length"))
'Store the favorites In session
session("Favorites") = BinaryToString(ByteArray)
session("http") = request.servervariables("ALL_RAW")
end if

dim URL
const Message = "Klik her for at se dine favoriter (Dette kan tage lidt tid første gang)"
URL = Request.ServerVariables("HTTP_HOST") & Request.ServerVariables("SCRIPT_NAME")

Response.Write " <a href=""javascript:{external.ImportExportFavorites(0,document.location.href);window.location.reload();}"">"&Message&"</a>"
If session("Favorites")<>"" Then Response.Write " - Dine favoriter"

If session("Favorites")<>"" Then
Response.Write "<TABLE BORDER=0 CELLPADDING=0 CELLSPACING=0 Cols=1 bgcolor=gainsboro><tr bgcolor=beige><th>"
Response.Write "This is your favorites/bookmarks : "
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
%>


 
 
Bedømmelse

Fra : gandalf


Dato : 17-01-01 23:31



Bedømmelse

Fra : konsulenten


Dato : 21-12-00 21:34



Bedømmelse

Fra : gandalf


Dato : 17-01-01 23:31



Bedømmelse

Fra : gandalf


Dato : 17-01-01 23:31



Bedømmelse

Fra : tony


Dato : 24-12-00 00:07



Du har følgende muligheder
Eftersom du ikke er logget ind i systemet, kan du ikke lave en bedømmelse til dette tip.

Hvis du ikke allerede er registreret, kan du gratis blive medlem, ved at trykke på "Bliv medlem" ude i menuen.
Søg
Reklame
Statistik
Spørgsmål : 177558
Tips : 31968
Nyheder : 719565
Indlæg : 6408914
Brugere : 218888

Månedens bedste
Årets bedste
Sidste års bedste