---
title: "Klrurig sats med strängfunktioner..."
type: "forum-thread"
url: "https://www.webforum.nu/amne/databaser-sql/21003-klrurig-sats-med-strängfunktioner"
topic: "Databaser & SQL"
topic_url: "https://www.webforum.nu/amne/databaser-sql"
author: "Vide"
published: "2000-07-11T08:06:00.000Z"
updated: "2000-07-11T11:30:00.000Z"
replies: 7
views: 525
page: 1
pages: 1
language: "sv-SE"
site: "webForum — webforum.nu"
rights: "Upphovsrätten till varje inlägg tillhör dess författare."
attribution: "Citera som: webForum, https://www.webforum.nu/amne/databaser-sql/21003-klrurig-sats-med-strängfunktioner"
---

# Klrurig sats med strängfunktioner...

## #1 — Vide, 2000-07-11T08:06Z

OK, här kommer någonting som jag har fastnat i... i tabellen referer finns det sökvägar typ: <http://cgi.webforum.nu/wf/Forum11/HTML/000758.html> 

Vad jag vill göra är att skriva ut alla domäner och räkna dessa... så att dom listas:
 <http://henslow.4sale.se/>  \- 67 <http://spel.webforum.nu/>  \- 21 <http://www.stars.com/>  \- 35 <http://www.anima.nu/>  \- 10

Mitt skript nedan gör den inte Distinct... dvs den skriver ut <http://henslow.4sale.se/>  flera gånger... nån som har några förslag?

```
SQL = "Select Distinct referer from userstatistics where referer <> '' ORDER BY referer"
Set RS = databas.execute(SQL)

Set rstmp = Server.Createobject("ADODB.Recordset")
rstmp.Fields.Append "referer", adVariant, 50
rstmp.Fields.Append "cnt", adInteger, 4
rstmp.open

Do until RS.EOF

str = RS("referer")
ht = "http://"
lt = "/"

str = Mid(str, 1, Instr(Instr(str,ht)+7,str,lt,1))

SQL = "Select Count(referer) AS cnt From userstatistics where referer LIKE '" & str & "%'"
Set rs_t = databas.execute(SQL)
var_RS_t = RS_t("cnt")

	rstmp.Addnew
		rstmp("referer") = str
		rstmp("cnt") = var_RS_t
	rstmp.update

RS.MoveNext
Loop

rstmp.sort = "cnt desc"
rstmp.movefirst

Do until rstmp.EOF

	Response.write rstmp("referer") & " - " & rstmp("cnt") & "<br>"

rstmp.MoveNext
Loop

rstmp.close
Set rstmp = nothing
```

Permalänk: https://www.webforum.nu/p/21003

## #2 — @nders, 2000-07-11T08:16Z

jag föreslår att du lägger in typ refererdomain i tabellen, bör ju vara ganska enkelt att plocka fram med asp eller php innan du gör inserten.

```
select count(distinct refererdomain), refererdomain from userstatistics group by refererdomain order by refererdomain
```

Permalänk: https://www.webforum.nu/p/351224

## #3 — Vide, 2000-07-11T08:30Z

Visst det skulle jag ju kunna göra... men nu är det ju så att jag redan har hundratals poster, och jag har ingen lust att gå in och ändra dom...

Jag skapade koden ovan för att gå runt det... men tack ändå... det är väl sånt man skall tänka på när man strukturerar upp databasen... :)

Permalänk: https://www.webforum.nu/p/351225

## #4 — Vide, 2000-07-11T09:47Z

Jag löste det genom att lägga in variabeln som den kommer ihop med redan använda variabler (referer), och sedan kolla detta med i enkel If-sats:

```
If Instr(strtmp, str) = 0 then

rstmp.Addnew
rstmp("referer") = str
rstmp("cnt") = var_RS_t
rstmp.update	

End If

strtmp = strtmp & str
```

Men har ni förslag på förbättringar så är ni bara välkommna... :)

Permalänk: https://www.webforum.nu/p/351226

## #5 — @nders, 2000-07-11T10:53Z

vide är alltså moderator i sql-forumet och använder .addnew istället för insert? är inte det lite som att svära i kyrkan? :)

Permalänk: https://www.webforum.nu/p/351227

## #6 — Vide, 2000-07-11T11:22Z

Kollar du lite mer noga så ser du nog att jag inte kopplar recordsettet till en databas, utan skapar ett disconnected recordset...

Det vore lite dumt av mig att skapa en temporär tabell i databasen varje gång man kolla sidan... :)

Permalänk: https://www.webforum.nu/p/351228

## #7 — @nders, 2000-07-11T11:28Z

okay! där fick jag.

orkade tydligen inte läsa hela koden i ditt tidigare inlägg...

du är härmed förlåten, under förutsättning att du inte använder .addnew på något annat sätt. ;)

Permalänk: https://www.webforum.nu/p/351229

## #8 — Vide, 2000-07-11T11:30Z

Jag lovar på min och wFs heder... :e

Vi borde starta en kampanj mot .addnew-otyg... :)

Permalänk: https://www.webforum.nu/p/351230

---

Tråden på webben: https://www.webforum.nu/amne/databaser-sql/21003-klrurig-sats-med-strängfunktioner
