Avatar billede tomb3 Nybegynder
08. januar 2004 - 18:49 Der er 5 kommentarer og
1 løsning

Tagwall/message board med IPlog

Nogen der har en tagwall eller messageboard med IP log til at ligge, eller kender en god gratis, man kan bygge lidt videre på?
Avatar billede syntax_hh Nybegynder
08. januar 2004 - 21:10 #1
1. Opret et felt i databsen der hedder ip
2. Når den tilføjer tags, skal du i din sql tilføje ip='"& Request.ServerVariables("REMOTE_ADDR") &"'
3. Sådan?
Avatar billede tomb3 Nybegynder
09. januar 2004 - 23:53 #2
Well.. dette er min SQL setning right?

        strSQL = "SELECT * FROM tagwall WHERE (ID = 0)"
        strDSN = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ="&Server.MapPath("tagwall.mdb")
        rstemp.Open strSQL, strDSN, 1, 3
        If (rstemp.BOF Or rstemp.EOF) Then
            rstemp.AddNew
            rstemp("Navn") = RemoveHTML(strNavn)
            rstemp("Email") = RemoveHTML(strEmail)
            rstemp("Subject") = RemoveHTML(strSubject)
            rstemp("Message") = Replace(RemoveHTML(strMessage), vbCrLf, "<br>")
            rstemp.Update
        End If
        rstemp.Close
        Set rstemp = Nothing


kan sq ik rigtig få det til at du, hvor skriver jeg det?
Avatar billede syntax_hh Nybegynder
10. januar 2004 - 08:43 #3
strSQL = "SELECT * FROM tagwall WHERE (ID = 0)"
        strDSN = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ="&Server.MapPath("tagwall.mdb")
        rstemp.Open strSQL, strDSN, 1, 3
        If (rstemp.BOF Or rstemp.EOF) Then
            rstemp.AddNew
            rstemp("Navn") = RemoveHTML(strNavn)
            rstemp("Email") = RemoveHTML(strEmail)
            rstemp("Subject") = RemoveHTML(strSubject)
            rstemp("Message") = Replace(RemoveHTML(strMessage), vbCrLf, "<br>")
            rstemp("Dit ip felt her") = Request.ServerVariables("REMOTE_ADDR")
            rstemp.Update
        End If
        rstemp.Close
        Set rstemp = Nothing
Avatar billede syntax_hh Nybegynder
10. januar 2004 - 08:44 #4
Dvs at når brugeren tilføjer beskeden, tilføjer den også ip'en...
Husk at oprette et ip felt i databasen og ændre der hvor der står "Dit ip felt her".
Avatar billede tomb3 Nybegynder
10. januar 2004 - 13:59 #5
Hmm meget mystisk.. mener helt sikkert jeg indsatte:
"rstemp("Dit ip felt her") = Request.ServerVariables("REMOTE_ADDR")"

præcis samme sted... men det virkede ikke :|
nå men det virker nu :) thx..
Avatar billede syntax_hh Nybegynder
10. januar 2004 - 14:00 #6
Np dude ;)
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
Kurser inden for grundlæggende programmering

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.

Du kan også logge ind via nedenstående tjenester