---
title: "splitta"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/45070-splitta"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "antar"
published: "2002-06-02T17:08:35.000Z"
updated: "2002-06-03T14:31:14.000Z"
replies: 17
views: 395
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/asp/45070-splitta"
---

# splitta

## #1 — antar, 2002-06-02T17:08Z

snälla kan nån hjälpa mig 
hur sliptrar jag ord i samma kolumn
så här ser det ut!!
Senaste besökare:

antar\*antar2\*antar3\*antar4\*

hur slipptrar jag det helst ingen replace .
har en fält som kollar om man e online eller offline! vill att typ den också ska funka typ \<%if recset("online") = "ja" then%\>online\<%\<%else%\>offline\<%end if%\>

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

## #2 — LAMP, 2002-06-02T17:18Z

```
arrMyArray = Split("antar*antar2*antar3*antar4*", "*")
```

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

## #3 — antar, 2002-06-02T17:21Z

ja men antar\*antar2\*antar3 är senaste besökarna det ändras ju hela tiden

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

## #4 — LAMP, 2002-06-02T17:29Z

Det är typiskt dåligt att ha \* separerade strängar i en kolumn i databasen. Gör en separat tabell där du lagrar medlemmar som är online istället. Det tjänar du på i längden.

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

## #5 — cyprys, 2002-06-02T17:29Z

eh
Visualisera det på det här sättet istället då.
x = "antar1"
x = x & "\*antar2"
x = x & "\*antar3"

arr = split(x, "\*")
Nu har du en array.
arr(0) = "antar1"
arr(1) = "antar2"
osv

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

## #6 — antar, 2002-06-02T17:32Z

har gjort så här
\<%myString = recset("Senastebesokare")%\>
\<%
myArray = split(myString,"\*")
For i = 0 To Ubound(myArray)
Response.Write myArray(i)
Next%\>

hur får jag br och funka??

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

## #7 — LAMP, 2002-06-02T17:50Z

Menar du så?

```
<%myString = recset("Senastebesokare")%> 
<% 
myArray = split(myString,"*") 
For i = 0 To Ubound(myArray) 
Response.Write " " & myArray(i) & "<br>"
Next%>
```

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

## #8 — antar, 2002-06-02T17:55Z

gjorde såhär

\<%visitors=recset("Senastebesokare")
			visit_array=Split(visitors,"\*", -1, 1)
			'ta bort sista,				
			lay=2
			for p=0 to lay 
				response.write("\<a href=""profil.asp?se=" & visit_array(p) & \_
					   """\>" & visit_array(p) & "\</a\>\<br\>")	
			next%\>

hur får jag fram online eller offline?

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

## #9 — antar, 2002-06-02T18:54Z

halllå   §e

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

## #10 — antar, 2002-06-02T19:27Z

kan nån hjälpa det här e säkert enkelt vill koppla databasen med arrayen

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

## #11 — solbulle, 2002-06-02T19:36Z

Varför inte bara lista de som är online från start så att säga?

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

## #12 — antar, 2002-06-02T19:49Z

vad menar du???????

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

## #13 — solbulle, 2002-06-02T19:51Z

Det verkar ju som om du har alla medlemmar i databasen samt ett fält där det står om de är online eller offline. I så fall kan du väl lista de som är online direkt ur databasen!?!
Men jag kanske har missat något?
Hur vet man vilka som är online?

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

## #14 — antar, 2002-06-02T20:00Z

jag kör med split ju

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

## #15 — cyprys, 2002-06-02T21:16Z

Den här tanken menas antar jag.
\<%
set RS = conn.execute("SELECT \* FROM tabell WHERE online = 'true'")
do until RS.eof
response.write RS("namn") & "\<br\>"
RS.movenext
Loop
%\>

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

## #16 — antar, 2002-06-03T01:01Z

vart ska jag lägga in det där?

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

## #17 — cyprys, 2002-06-03T07:27Z

Visa all kod du har i ärendet så blir det mycket lättare.

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

## #18 — antar, 2002-06-03T14:31Z

krypin.asp
'\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\* 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)
end if
end if
'\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*

index.asp

\<%
on error resume next
if not recset("Senastebesokare") = "" then
visitors=recset("Senastebesokare")
visit_array=Split(visitors,"\*")
lay=9
For i = 0 To lay
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

else%\>

\<font face="Tahoma"\>\<img border="0" src="Bilder/1pxtrans.gif"\>Tyvärr, Ingen har besökt ditt krypin ännu!\<br\>
\<img border="0" src="Bilder/Community/Smileys/ledsen.gif"\>
\<%end if%\>

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/45070-splitta
