Søg
Avatar billede axkris Nybegynder
19. september 2003 - 21:48 Der er 7 kommentarer og
1 løsning

Arrays - flere værdier

Hej

Jeg er ved at lave et lille scipt, som fortæller mig, hvem der logger ind på min hjemmeside. Men jeg kan ikke finde ud af at anvende arrays. Her er mit udkast til en kode:

IpArray = ["111.111.111.111", "Hugo"], ["222.222.222.222", "Børge"]....


Select Case Request.ServerVariables("REMOTE_ADDR")
    i = 1
    do while not end of array
        Case IpArray[IP][i] then response.write "<br>" & IPArray[Navn][i] & " har logget på i dag og har anvendt ip-adressen" & IpArray[IP][i]
        i = i + 1
    loop
end select

Kan du hjælpe mig med at bygge koden rigtigt... og meget gerne udbygge den, så jeg i arrayen kan definere flere ip-adresse (hvis en bruger har mere end en ip).
Avatar billede nmh Nybegynder
19. september 2003 - 22:16 #1
Du burde nok gemme disse ting i en database.
Hvor havde du tænkt di at gemme dit array, når en bruger logger af?
Avatar billede axkris Nybegynder
20. september 2003 - 08:57 #2
Jeg ønsker ikke at anvende en db, da der kun er tale om få ip-adresser, som man bare kan definere i koden... kan du hjælpe mig?
Avatar billede nmh Nybegynder
20. september 2003 - 16:30 #3
Så vil jeg foreslå, at du gemmer dem i en textfil. Det er også ganske simpelt.
Men kun at gemme i en server-variabel (det skal være en global-asa variabel) er ikke så smart.
Jeg kan godt hjælpe dig med at gemme i en tekstfil, hvis det har interesse.
Avatar billede axkris Nybegynder
20. september 2003 - 16:44 #4
Ja, skriv gerne scriptet, så det gemmmer iperne i en tekstfil og gør det med dem, som beskrevet ovenstående. :-)
Avatar billede axkris Nybegynder
20. september 2003 - 16:46 #5
gør det med dem, som beskrevet ovenstående = få gerne scriptet til at køre iperne igennem, som jeg har beskrevet ovenstående.
Avatar billede nmh Nybegynder
20. september 2003 - 17:14 #6
Her er et par asp-sider, du kan rette til. Det er en side, der gemmer en telefonliste og en side, der viser listen:

Gem.asp:
<%
Option Explicit
Dim navn, adresse, tlfnr, txt, FilSystem, stream

'Data hentes
navn=Request.form("navn")
adresse=Request.form("adresse")
tlfnr=Request.form("tlfnr")

'Filen åbnes, så der tilføjes, når der skrives til den
set FilSystem=Server.CreateObject("Scripting.FileSystemObject")
set stream=FilSystem.OpenTextFile("C:\Inetpub\wwwroot\tlfliste\liste.txt",8,true)

txt=navn & "," & adresse & "," & tlfnr
stream.writeline(txt)
stream.close
Response.Redirect("Indtast.htm")
%>

Vis.asp:
<%
Set FilSystem=Server.CreateObject("Scripting.FileSystemObject")
Set stream=filsystem.openTextFile("C:\Inetpub\wwwroot\tlfliste\liste.txt")
%>
<html>
<body>
<A href="Indtast.htm">Forsæt med indtastningen</A><p><p>
<%
while not stream.AtEndOfStream
  tekst=stream.readline()
  response.write(tekst & "<br>")
wend
stream.close
%>
</body>
</html>

Du kan så let rette den til. Istedet for at gemme navn, adresse og tlf. nummer, så skal du gemme IP-adresse og navn.
Du kan jo gemme, så snart en bruger henter din side. Det vil måsek også være en god ide at gemme dato og tidspunkt.
Avatar billede axkris Nybegynder
20. september 2003 - 17:21 #7
Super - så mangler du blot selve ip-scanning... altså noget med:

Select Case Request.ServerVariables("REMOTE_ADDR")
    i = 1
    do while not end of array
        Case IpArray[IP][i] then response.write "<br>" & IPArray[Navn][i] & " har logget på i dag og har anvendt ip-adressen" & IpArray[IP][i]
        i = i + 1
    loop
end select
Avatar billede nmh Nybegynder
20. september 2003 - 17:33 #8
Mon ikke, du så snat en person logger på på din side,
så gemmer du navnet, IP-adressen og tidspuktet. Du behøver slet ikke at oprette et array.
navn=..... (jegved ikke hvor du har navnnet fra.
IPadr=Request.ServerVariables("REMOTE_ADDR")
Tidspunkkt og dato kan hentes fra ASP-variablen Now.
Hvis du så finder txt således
Txt=Navn & ";" & IPadr & Now
kan du benytte gem.asp til at gemme det fornødne.
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Programmeringssprog kurser
Kurser inden for grundlæggende programmering
Se alle Programmeringssprog kurser

Flere spørgsmål fra ASP kategorien

Titel Indlæg Oprettet Seneste aktivitet
Jeg bakser med noget Database og If Then med ASP - hvad gør jeg galt? Af Peer i ASP 10 25/06/202622:20 04/09/202602:30
Tjek alle checkbox i form Af bsn i ASP 4 18/05/202601:57 19/05/202613:33
Lost focus Af bsn i ASP 1 07/11/202415:34 01/01/202514:58
ASP classic Af bsn i ASP 8 28/10/202423:11 30/10/202422:51
Classic - filer vist med sidste fil først Af bsn i ASP 5 23/05/202409:56 24/05/202400:02
Se alle spørgsmål i kategorien Opret spørgsmål

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Opret Log ind

Du kan også logge ind via nedenstående tjenester

Alle kategorier på Eksperten
Seneste spørgsmål Seneste aktivitet
I dag 11:47 VB script Af Jenshentze i Word
I dag 11:21 Popup ved opstart Af mort1 i Windows
04/0918:50 Slet lokal konto Af ErikHg i Windows
04/0916:05 Ændre tal i en celle Af xvid i Excel
04/0913:47 Dette er ikke en kommerciel session i Windows 11 Af eksmojo i Windows
White papers
Flere white papers »