---
title: "replace"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/45352-replace"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "antar"
published: "2002-06-06T12:31:38.000Z"
updated: "2002-06-07T11:25:07.000Z"
replies: 44
views: 635
page: 1
pages: 3
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/45352-replace"
---

# replace

_Sida 1 av 3._

## #1 — antar, 2002-06-06T12:31Z

hur får jag bort sista \* tecknet i fältet?

Function replace2(stjarna) 
stjarna = replace(right(stjarna,"\*",""),1) 
replace2 = stjarna
End Function

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

## #2 — @nders, 2002-06-06T12:38Z

```
Function replace2(stjarna) 
replace2 = left(stjarna, len(stjarna)-1) 
End Function
```

Förutsätter dock att du inte skickar in ett nullvärde i funktionen.

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

## #3 — antar, 2002-06-06T12:40Z

tack anders :D

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

## #4 — antar, 2002-06-06T12:41Z

varför får jag fel på det här
**Felaktigt matrisindex: 'i'
/main.asp, line 193**

```
<%
Function replace2(stjarna) 
replace2 = left(stjarna, len(stjarna)-1) 
End Function

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")
Addera = "Select * From Medlemmar where id="&session("id")
RecSet.Open Addera, Connect, 3, 3

if not recset("Senastebesokare") = "" then
visitors=Replace2(RecSet("Senastebesokare"))
online=recset("Status")
visit_array=Split(visitors,"*", -1, 1)
For i = 0 to 9
response.write("<img border=""0"" src=""bilder/online.gif"" width=""10"" height=""9""><a href=""#"" onclick=""krypin('krypin.asp?visa=krypin&id=','id_"& visit_array(i) &"',502,303); return false;""><b>" & visit_array(i) & "</b></a><br>")	
next
%>
```

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

## #5 — LAMP, 2002-06-06T12:44Z

kod-taggar

Snälla, söta rara!

Kan ni ej använda kod-taggarna så koden blir läsbar?

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

## #6 — antar, 2002-06-06T12:49Z

bättre nu eller?  :e

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

## #7 — @nders, 2002-06-06T12:51Z

> For i = 0 to 9

Den koden förutsätter att det finns 10 poster i arrayen. Gör det det?

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

## #8 — solbulle, 2002-06-06T12:52Z

Är du säker på att du har 10 poster i din visit_array, med andra ord i din tabell i databasen.
Du bör lägga in en funktion som visar tio poster om det finns, annars visar den de som finns.

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

## #9 — LAMP, 2002-06-06T12:52Z

> *Ursprungligen av antar*  **bättre nu eller?  :e**

Blev genast bättre :D

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

## #10 — antar, 2002-06-06T12:57Z

kör så här

```
'***************** Senaste besökare ****************
Set Connect=Server.CreateObject("ADODB.Connection") 
sConnect = "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("Database/Medlemmar.mdb")&"" 
Connect.Open(sConnect) 

Anvandarnamn= request.querystring("Anvandarnamn") 
id= request.querystring("ID") 

SQL="SELECT Senastebesokare, Anvandarnamn FROM Medlemmar WHERE Anvandarnamn='" & Anvandarnamn & "'" 
Connect.execute(SQL) 
Set Recset=Server.CreateObject("ADODB.Recordset") 
Recset.open SQL, Connect, 3,3 

adda=session("Anvandarnamn")&"*"
happ=adda & recset("Senastebesokare") 

if not recset("Senastebesokare") = "" then
if not left(recset("Senastebesokare"),instr(recset("Senastebesokare"), "*")) = session("Anvandarnamn")&"*" then
if not recset("Anvandarnamn")=session("Anvandarnamn") then
sqlo="UPDATE Medlemmar SET Senastebesokare='" & happ & "' WHERE Anvandarnamn='" & Anvandarnamn &"'" 
connect.execute(sqlo)
else
end if
end if
else
if not recset("Anvandarnamn")=session("Anvandarnamn") then
sqlo="UPDATE Medlemmar SET Senastebesokare='" & happ & "' WHERE Anvandarnamn='" & Anvandarnamn &"'" 
connect.execute(sqlo)
connect.close
set connect = nothing
end if
end if
'******************************************************
```

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

## #11 — @nders, 2002-06-06T13:00Z

Och, mer intressant, hur många poster har du i arrayen visit_array ?

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

## #12 — antar, 2002-06-06T13:04Z

när jag har 10 så får jag inte felmeddelandet men annars får jag!!

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

## #13 — @nders, 2002-06-06T13:05Z

Vill du inte köra for-slingan en gång för varje person som finns i arrayen?

I så fall, prova:

```
For i = 0 to ubound(visit_array)
```

mvh,

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

## #14 — LAMP, 2002-06-06T13:06Z

om den har dynamiskt innehåll kan du väl göra så här:

```
For i = 0 to Ubound(visit_array, 1)

...
...
...
if i > 9 then exit For
Next
```

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

## #15 — antar, 2002-06-06T13:09Z

tack så mycket vet ni hur man fixar så att det här funkar ihop med arrayen 

**online=recset("Status")**

if recset("status") = "online" then else asdsad bla bla end if

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

## #16 — antar, 2002-06-06T13:36Z

kan ingen hjälpa mig ??? eller ni kanske inte fattar vad jag menar??

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

## #17 — solbulle, 2002-06-06T13:50Z

Du vill alltså när du loopar ut visit_array markera om de är online eller inte?
Vart har du informationen om de är online eller inte?
recset("Status")  som du skriver här ovan betecknar väl den användaren man är inne på för stunden, eller?

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

## #18 — antar, 2002-06-06T13:58Z

har den i samma databas som Recset("Senastebesokare")

Online = är när man e online i sidan asså inloggad när man loggar ut blir man offline

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

## #19 — antar, 2002-06-06T14:08Z

hallå kan nån hjälpa

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

## #20 — @nders, 2002-06-06T15:56Z

För det första; att tjata tjänar ingenting till, det får snarast motsatt effekt.

För det andra är din datamodell inte helt hundra då du sparar flera värden i samma kolumn, osv, vilket gör det hela ganska problematiskt.

Som jag ser det måste du i din loop ställa en SELECT-fråga för varje användarnamn, i din loop.

typ:

```
[b]strSQL = "SELECT status FROM Members WHERE WHERE Anvandarnamn='" & Anvandarnamn & "'"
set objRS = Connect.execute(strSQL)[/b]
response.write("<img border=""0"" [b]src=""bilder/" & objRS("status") & ".gif""[/b] width=""10"" height=""9""><a href=""#"" onclick=""krypin('krypin.asp?visa=krypin&id=','id_"& visit_array(i) &"',502,303); return false;""><b>" & visit_array(i) & "</b></a><br>")
```

Jag förutsätter att du har bilder som heter online.gif och offline.gif och att det är de två värden som kan finnas i fältet status.

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/45352-replace  
Nästa sida: https://www.webforum.nu/amne/asp/45352-replace/page2.md