---
title: "Senastebesökare"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/62783-senastebesökare/page2"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "antar"
published: "2002-12-20T19:02:45.000Z"
updated: "2002-12-30T02:43:24.000Z"
replies: 38
views: 674
page: 2
pages: 2
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/asp/62783-senastebesökare"
---

# Senastebesökare

_Sida 2 av 2._

## #21 — antar, 2002-12-26T01:39Z

mm jag förstår =) men e det inte bättre och göra som jag gör eller?

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

## #22 — antar, 2002-12-28T19:26Z

nån som vet hur man gör det blir samma värden på alla medlemmarnas senastebesökare?

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

## #23 — OveRRidE, 2002-12-29T13:02Z

> mm jag förstår =) men e det inte bättre och göra som jag gör eller?

Nej du förstår tydligen inte. :D

Det är *inte* bättre att göra så som du säger. Gör om funktionen, annars kommer du ha problem med det där resten av tiden du jobbar med applikationen. ;)

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

## #24 — antar, 2002-12-29T18:13Z

men jag vill inte hålla på och ändra i databasen och sånt!

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

## #25 — OveRRidE, 2002-12-29T18:37Z

Nehe.

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

## #26 — cyprys, 2002-12-29T18:47Z

Då blev det helt plötsligt svårt igen :x

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

## #27 — antar, 2002-12-29T19:20Z

det är en admin funktion så jag vill få igång!
tar bort ett ord i fält som ser ut så här Gustav,pelle,antar !!

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

## #28 — OveRRidE, 2002-12-29T19:52Z

Ok, då gör vi väl så då:

1\. Du kan inte skriva ett UPDATE-statement utan en WHERE i, då uppdateras alla poster precis som du skriver.
2\. Testa det här:

```
Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("../Database/Medlemmar.mdb")&""
set recset = server.createobject("Adodb.recordset")
sql = "select * from medlemmar"
recset.open sql,connect,3,3
arr = Split(recset("Senastebesokare"),",") 
For i = 0 To Ubound(arr)
If lcase(arr(i)) <> lcase(recset("Senastebesokare")) Then 
newstr = newstr & arr(i) & ","
End If 
Next 

Connect.Execute("UPDATE Medlemmar SET Senastebesokare = '"& newstr &"' [red]WHERE kolumn = '" & nån_variabel & "'[/red] ")
connect.close
set connect = nothing
```

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

## #29 — solbulle, 2002-12-29T21:42Z

> **solbulle skrev:**
>
> Du får i din sqlfråga lägga till en "Where-sats" så att du bara plockar ut en viss persons besökare, eller loopa dig igenom hela databasen.
> ...

Får se om han lyssnar nu då.  :e

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

## #30 — antar, 2002-12-29T23:44Z

nope funkar inte?

```
arr = Split(recset("Senastebesokare"),",") 
For i = 0 To Ubound(arr)
If lcase(arr(i)) <> lcase(recset("Senastebesokare")) Then 
newstr = newstr & arr(i) & ","
End If 
Next 

Connect.Execute("UPDATE Medlemmar SET Senastebesokare = '"& newstr &"' where not Senastebesokare='"&request.form("Anvandarnamn")&"'")
connect.close
set connect = nothing
```

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

## #31 — solbulle, 2002-12-29T23:45Z

Vad funkar inte? Vad händer? Felmeddelande?

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

## #32 — antar, 2002-12-29T23:51Z

inga felmeddelande men blir samma värde i alla fält? och extra ,,,

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

## #33 — solbulle, 2002-12-30T00:05Z

Släng in lite testutskrifter:

```
arr = Split(recset("Senastebesokare"),",") 

response.write (recset("Senastebesokare") & "<p>"

For i = 0 To Ubound(arr)
If lcase(arr(i)) <> lcase(recset("Senastebesokare")) Then 
newstr = newstr & arr(i) & ","
End If 
Next 

response.write newstr  & "<p>"
response.end

Connect.Execute("UPDATE Medlemmar SET Senastebesokare = '"& newstr &"' where not Senastebesokare='"&request.form("Anvandarnamn")&"'")
connect.close
set connect = nothing
```

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

## #34 — solbulle, 2002-12-30T00:06Z

Vad får du ut?

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

## #35 — antar, 2002-12-30T00:28Z

nu blir det så här
pelle,gustav,antar,,,,,

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

## #36 — solbulle, 2002-12-30T00:35Z

visa alla utskrifter:

response.write (recset("Senastebesokare") & "\<p\>"
 samt 

response.write newstr  & "\<p\>"

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

## #37 — solbulle, 2002-12-30T00:38Z

Kanske kan man göra något likt detta för att få bort de tomm posterna, finns säkert bättre sätt:

```
arr = Split(recset("Senastebesokare"),",") 

	For i = 0 To Ubound(arr)
	If lcase(arr(i)) <> lcase(recset("Senastebesokare")) Then
		If  len(arr(i)) > 2 then 
			newstr = newstr & arr(i) & ","
		End If
	End If 
Next
```

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

## #38 — antar, 2002-12-30T02:32Z

solbulle\> nu hänger jag inte med vilken kod ska jag välja?

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

## #39 — antar, 2002-12-30T02:43Z

gustav går fortfarande inte bort!

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/62783-senastebesökare/page2  
Föregående sida: https://www.webforum.nu/amne/asp/62783-senastebesökare.md
