dim ny_array(500000)
kaka = split(request.cookies("foruminlagg"),"|")
for i = 0 to ubound(kaka)
if not kaka(i) = "" then
kaka2 = split(kaka(i),";")
ny_array(kaka2(0)) = kaka2(1)
end if
next
Vad den gör är att hämta en cookie från datorn och splittar sedan den. Problemet är att vissa får ett felmeddelande som jag inte kan tyda. Felmeddelandet försvinner dock om personen i fråga tömmer sina cookies. För de flesta fungerar det dock bra.
Microsoft VBScript runtime error '800a000d'
Type mismatch: 'kaka2(...)'
/forum/forum.asp, line 197
Line 197 är den tomma raden efter "kaka2=split..."
dim ny_array(500000)
kaka = split(request.cookies("foruminlagg"),"|")
for i = 0 to ubound(kaka)
if not kaka(i) = "" then
kaka2 = split(kaka(i),";")
If IsNumeric(kaka2(0)) Then
ny_array(CInt(kaka2(0))) = kaka2(1)
End If
end if
next