CIO Tech Eksperten IT-JOB IT-Kurser Events Podcast Søg

Log ind eller opret profil

Du kan også logge ind via nedenstående tjenester

elkrog Nybegynder

17. oktober 2001 - 21:02 Der er 17 kommentarer og
1 løsning

Tæl antal klik.

Hej Eksperter

Hvordan får jeg følgende kode til at tælle antal klik på linket der genereres?

<%@ Language=VBScript %>

<%
set Conn = Server.CreateObject(\"ADODB.Connection\")
Conn.Open \"Driver={Microsoft Access Driver (*.mdb)}; DBQ=\" & Server.MapPath(\"database.mdb\")
set rs = Server.CreateObject(\"ADODB.Recordset\")

strRS = \"SELECT * from Test\"

rs.Open strRS, Conn, 1, 3

randomize
linie = int(rs.RecordCount * rnd)

rs.MoveFirst
rs.Move(linie)

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

Response.Write \"<a href=\'\" & rs(\"Url\") & \"\'><img src=\'\" & rs(\"Billede\") & \"\' border=\'0\'></a>\" & vbCrLf

rs.Close
set rs = nothing

Conn.Close
set Conn = nothing
%>

Synes godt om

j.robert Nybegynder

17. oktober 2001 - 21:26 #1

Jeg tror dette link kan hjælpe dig:
http://www.activeserverpages.dk/aspdigital/studies/clickcount.asp

Synes godt om

elkrog Nybegynder

26. oktober 2001 - 15:08 #2

Nææh, desværre ikke.

Synes godt om

j.robert Nybegynder

27. oktober 2001 - 01:47 #3

Jeg går udfra det skulle være ligesom, det jeg har lavet hér:
http://www.digitalweb.dk/links.asp

Synes godt om

elkrog Nybegynder

27. oktober 2001 - 09:59 #4

Måske, men url\'en virker ikke

Synes godt om

j.robert Nybegynder

27. oktober 2001 - 23:15 #5

Næ, jeg har lukket det ned igen, da du havde lukket spørgsmålet.

Synes godt om

elkrog Nybegynder

27. oktober 2001 - 23:41 #6

Nå ja, hvis jeg kan bruge det er der selvfølgelig points til dig,
det finder vi nok ud af :o)

Synes godt om

j.robert Nybegynder

27. oktober 2001 - 23:45 #7

Den er åben.

Synes godt om

j.robert Nybegynder

27. oktober 2001 - 23:46 #8

Tekst kan laves om til et billede i stedet.

Synes godt om

elkrog Nybegynder

27. oktober 2001 - 23:53 #9

Et øjeblik, kigger lige på det.

Synes godt om

elkrog Nybegynder

27. oktober 2001 - 23:56 #10

Det peger på en ID og laver en redirect til url\'en, er det korrekt antaget?

Synes godt om

j.robert Nybegynder

28. oktober 2001 - 00:06 #11

Yep.

Synes godt om

elkrog Nybegynder

28. oktober 2001 - 00:09 #12

Det kan jeg nok desværre ikke bruge.

Det jeg mangler er et system som henter en url fra db, og som tæller visninger og klik.

Denne her tæller visninger, men desværre ikke klik.
Kan det mon flettes ind på en eller anden måde?

<%
set Conn = Server.CreateObject(\"ADODB.Connection\")
Conn.Open \"Driver={Microsoft Access Driver (*.mdb)}; DBQ=\" & Server.MapPath(\"banner.mdb\")
%>
<HTML>
<HEAD>

</HEAD>
<BODY>

<%
set rs = Server.CreateObject(\"ADODB.Recordset\")

strRS = \"SELECT * from Banner\"

rs.Open strRS, Conn, 1, 3

randomize
linie = int(rs.RecordCount * rnd)

rs.MoveFirst
rs.Move(linie)

rs(\"Shown\") = rs(\"Shown\") + 1

rs.Update

Response.Write \"\" & rs(\"url\") & \"\"
Response.Write \"<br>\"
Response.Write \"Vist \" & rs(\"Shown\") & \" gang(e).<br>\"

%>

</BODY>
</HTML>

Synes godt om

j.robert Nybegynder

28. oktober 2001 - 00:15 #13

Det er jo, det jeg har lavet.
Url\'en ligger i databasen.

Jeg bliver nød til at lave en redirect, da jeg lige skal ind på siden igen for at gemme klikket i DB, hvorefter der redirectes.

Synes godt om

j.robert Nybegynder

28. oktober 2001 - 00:17 #14

Kort fortalt(i alm. sprog):

If klik=Id then
Gem klik i db
Update
Redirect
else
Vis random URL+klik fra DB
End if

Synes godt om

elkrog Nybegynder

28. oktober 2001 - 00:20 #15

Mit problem er at jeg ikke kan bruge en redirect (da jeg skal bruge det sammen med javascript)
Så det går desværre ikke.

Synes godt om

j.robert Nybegynder

28. oktober 2001 - 00:24 #16

Det har du jo ikke skevet noget om.
- Rart at vide!

Response.Redirect RS(\"Url\")
=>
strUrl=RS(\"Url\")

Synes godt om

j.robert Nybegynder

28. oktober 2001 - 00:24 #17

Over & Out

Synes godt om

actionman Nybegynder

16. februar 2002 - 18:34 #18

ok...jeg har først lige set det her nu...men jkeg kunne godt tænke mig at vide hvordan man kan gøre det samme som han vil have...MEN kunn med Javascript? Altså en "counter" der tæller hvor mange gange der er blevet kilkket på et link!?

Synes godt om

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.

Følg dette spørgsmål

Opret Preview

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
Lost focus Af bsn i ASP	0	07/11/202415:34	-
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
Optimer MySql table med ASP Af poulmadsen i ASP	4	26/04/202417:16	26/04/202418:37
JSON Af ingeman i ASP	3	07/04/202417:53	08/04/202412:09

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.

Du kan også logge ind via nedenstående tjenester

Alle kategorier på Eksperten

Seneste artiklerRSS

22/11

Test: Den snusfornuftige Volkswagen ID.3 blevet til lidt af el-bisse

22/11

Vil købe tele-løsninger til det offentlige for 370 millioner kroner

22/11

Nørgaard: Det er de neuro-divergente originalers tid

22/11

Sker helt åbenlyst: Ansatte i den kinesiske stat sælger borgernes personlige data på hemmelige internet-fora

22/11

Efterspørgslen på AI-regnekraft er enorm - og det smitter af på priserne: "Vi kan sælge næsten alt, hvad vi får ind"

22/11

Derfor bliver den amerikanske tvangs-opdeling af Google nok ikke til noget

22/11

Nyt værtøj fra Microsoft: Snart kan du reparere nedbrudte Windows-enheder på distancen

22/11

Vi har fundet 10 ledige it-stillinger, som du kan søge netop nu

22/11

Politiet skriver kontrakt på 75 millioner kroner med dansk it-firma: Medarbejdere skal flytte ind hos politiet

22/11

Kombit gør klar til at købe it-konsulenter for 140 millioner kroner - her er planen

22/11

Droner i krig - sådan anvendes de mest effektivt på slagmarken

Vis flere artikler

IT-JOB

Semler Gruppen

Change Manager til Semler Gruppen

ATP

Erfaren Data Governance Manager til ATP Data Foundation

DEIF A/S

DevOps Engineer

Rambøll Management Consulting

Early Talent Software Engineer @ Ramboll Stakeholder Intelligence

PensionDanmark

ML Engineer

Vis flere jobs

Seneste spørgsmål Seneste aktivitet

I går 22:30	Underlig meddelelse på skærmen Af Jordegern i E-mail programmer
I går 15:56	Navigation i Peugeot 3-2008 fra 2017 Af arnepedersen i Andet software
I går 14:10	Outlook henter ikke mails Af TTA i Office & Kontorpakker
I går 13:58	vise billeder i kartotek med store ikoner inklusive optagelsesdato Af Malm i Billedbehandling
I går 13:35	Adobe Elements 2019, Organizer Crasher Af mort1 i Billedbehandling