Avatar billede klas Juniormester
05. november 2001 - 15:47 Der er 13 kommentarer og
1 løsning

klik tæller system . ..

Heysan,

Nogle der har et link tæller system, som tæller alle kliks udgående, samt mulighed for at tælle indgående  via noget der ligner en link.asp?partner=side.dk funktion. jeg skal bruge et der viser dag / uge / måned, oversigt.

Modtager links til sourcecodes, færdige scripts eller løsningsforslag.
Avatar billede doomstone Nybegynder
05. november 2001 - 16:07 #1
denne bruger jeg i mit login system til at tælle hvormange gange brugern er logget ind

Const adOpenKeyset = 1
Const adLockOptimistic = 3

    Set rs = Server.CreateObject(\"ADODB.RecordSet\")
    strSQL = \"SELECT * FROM medlemmer WHERE ID = \"& Session(\"login\")
    rs.Open strSQL, Conn, adOpenKeyset, adLockOptimistic

rs(\"gang\") = rs(\"gang\") + 1
rs.Update


    rs.Close
    Set rs = Nothing

Conn.Close
set Conn = Nothing

du kan bruge den og smide noge if\'s ind f.eks.

<% IF request.querystring(\"action\") = \"send\" THEN

pageid=request.querystring(\"pageid\")

og så koden oven over her

Response.Redirect(\"pageid\")
%>

den burte virke!!!
Avatar billede klas Juniormester
05. november 2001 - 16:08 #2
jeg ønsker et mere komplet system.
Avatar billede doomstone Nybegynder
05. november 2001 - 17:24 #3
hmm ok 2 sek
Avatar billede doomstone Nybegynder
05. november 2001 - 17:31 #4
Tabellen i databasen hedder links
pageurl= ardressen på siden
pagedec = kort om siden
pageclik= hvor mange clik

<% IF request.querystring(\"action\") = \"send\" THEN

pageurl=request.querystring(\"pageurl\")


Const adOpenKeyset = 1
Const adLockOptimistic = 3

    Set rs = Server.CreateObject(\"ADODB.RecordSet\")
    strSQL = \"SELECT * FROM links WHERE pageurl = \'%\" & pageurl & \"%\' \"
    rs.Open strSQL, Conn, adOpenKeyset, adLockOptimistic

rs(\"pageclik\") = rs(\"pageclik\") + 1
rs.Update



Response.Redirect(\"pageurl\")

END IF
%>




Her vises linksne
<%
set RS = Conn.Execute(\"SELECT * FROM links ORDER BY ID DESC\")

if not (rs.BOF AND rs.EOF) then


RS.MoveFirst()
while not RS.EOF
%>

<a href=dennesidesnavn.asp?action=send&pageurl=<%=RS.Fields(\"pageurl\")%>><%=RS.Fields(\"tpagedec\")%></a>

<%
    RS.MoveNext()
WEND


else
  response.write \"Der er ingen links\"
end if
%>
Avatar billede klas Juniormester
05. november 2001 - 17:34 #5
Jeg mente et komplet system, hvor man fx. kan gå ind og trække data ud for at se hvor man sender sine besøgende hen, eller hvor man får dem fra, hvor alle data kan vises i dag / uge / måned intervaller
Avatar billede psyclown Nybegynder
05. november 2001 - 18:38 #6
Avatar billede klas Juniormester
05. november 2001 - 18:39 #7
der har jeg kigget.
Avatar billede klas Juniormester
05. november 2001 - 19:36 #9
nope det er jo et system hvor brugere selv kan tilføje links . ..
Avatar billede psyclown Nybegynder
05. november 2001 - 19:51 #10
jeg ved der ligger et, endten på netcoders.dk eller activeserverpages.dk
Avatar billede klas Juniormester
05. november 2001 - 19:52 #11
jeg har ikke kunne finde et ordentligt et på nogle af siderne . .
Avatar billede odegaard Nybegynder
06. november 2001 - 00:10 #12
Hvad er der nu i vejen med SELV at programmere sine løsninger? Dit ønske er så specifikt og lettere omfattende, at det måske var smartere selv at lave det...
Avatar billede klas Juniormester
06. november 2001 - 15:34 #13
jeg har desværre ikke tid til at gå igang med det.
Avatar billede klas Juniormester
14. november 2001 - 20:47 #14
lukket
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