---
title: "Kapa strängar"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/13856-kapa-strängar"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "Zaiboot"
published: "2002-01-17T19:41:00.000Z"
updated: "2002-01-18T11:16:00.000Z"
replies: 13
views: 680
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/13856-kapa-strängar"
---
# Kapa strängar
## #1 — Zaiboot, 2002-01-17T19:41Z
Har ett problem:
plockar data från en databas som skrivits in av ett program värdet ser ut så här: "1020000011123344"
Hur ska jag få ut varje tecken för sig själv?
Typ:
tal1 = "1"
tal2 = "0" osv
Kan inte äns hitta det nånstans, hjälp mig!!
Permalänk: https://www.webforum.nu/p/13856
## #2 — jorgen, 2002-01-17T19:43Z
Hej, för att kunna göra en split måste du ha en avgränsare mellan varje siffra.
Mvh Jörgen :)
Permalänk: https://www.webforum.nu/p/304403
## #3 — Zaiboot, 2002-01-17T19:47Z
Tack Jörgen,
men hur gör jag en split?
Tack för svaret
Tobias
Permalänk: https://www.webforum.nu/p/304404
## #4 — LarsG, 2002-01-17T19:49Z
Skapa en array som innehåller varje enkild siffra.
```
str = cstr(rs("aleb"))
dim arr()
size = len(str)
redim arr(size-1)
for i = 1 to size
arr(i-1) = mid(str,i,1)
next
```
Permalänk: https://www.webforum.nu/p/304405
## #5 — Zaiboot, 2002-01-17T19:52Z
Tackar Lars G
Ska testa det
Permalänk: https://www.webforum.nu/p/304406
## #6 — Zaiboot, 2002-01-17T20:04Z
Jag är novicare än novicast nu kan jag inte ens få en redan skriven kod snutt att funka. Testa Lars G's förslag att den returerar:
Ogiltigt proceduranrop eller argument.: 'mid'
Nån som kan hjälpa en helt förtappad själ?
Permalänk: https://www.webforum.nu/p/304407
## #7 — LarsG, 2002-01-17T20:09Z
Det är mitt fel. Jag skrev lite fel på raden som innehåller mid
```
arr(i-1) = mid(str,i,1)
```
så skall det se ut.
Permalänk: https://www.webforum.nu/p/304408
## #8 — Zaiboot, 2002-01-17T20:24Z
nu klagar han på raden dim arr() och säger: Inkompatibla typer
Har du lust att ta en titt på min "hela" kod och kanske hjälpa mig?
Permalänk: https://www.webforum.nu/p/304409
## #9 — LarsG, 2002-01-17T20:31Z
Om du lägger upp den så.
Permalänk: https://www.webforum.nu/p/304410
## #10 — Zaiboot, 2002-01-17T20:44Z
Här kommer en del av koden
```
<%
Set Connection = Server.CreateObject("ADODB.Connection")
Connection.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("/projekt/idle/log.mdb")
SQL = "SELECT * FROM log1 where datum like '%" & datum & "%' and name like '%" & name & "%' Order by name"
Set RS = Connection.Execute(SQL)
%>
-Projekt sida, Idle log-
<%
Do until RS.EOF
name= rs("name")
ip = rs("ip")
dag = rs("dag")
datum = rs("datum")
%>
Namn: <%= name %>
IP: <%= ip %>
Dag: <%= dag %>
Datum: <%= datum %>
<%
str = cstr(rs("dag"))
dim arr()
size = len(str)
redim arr(size-1)
for i = 1 to size
arr(i-1) = mid(str,i,1)
next
%>
// ska lägga sedan så jag kan använda arr(x) i if satser för att bestämma bg färgen på celler i en tabell
---------------------------
<%
RS.MoveNext
Loop
RS.close
%>
```
Hoppas du kan hjälpa mig.
Permalänk: https://www.webforum.nu/p/304411
## #11 — Zaiboot, 2002-01-17T20:48Z
De ligger här om du vill kolla på fel medelandet:
[Sidan](http://zaiboot.no-ip.com/projekt/idle/lista2.asp)
\[Redigerat av Zaiboot den 17 jan 2002\]
Permalänk: https://www.webforum.nu/p/304412
## #12 — LarsG, 2002-01-17T21:22Z
Jag tror att problemet beror på att du har dim arr() innanför loopen så om du flyttar före do så ...
```
<%
dim arr()
Do until RS.EOF
name= rs("name")
ip = rs("ip")
dag = rs("dag")
datum = rs("datum")
%>
Namn: <%= name %>
IP: <%= ip %>
Dag: <%= dag %>
Datum: <%= datum %>
<%
str = cstr(rs("dag"))
size = len(str)
redim arr(size-1)
for i = 1 to size
arr(i-1) = mid(str,i,1)
next
%>
// ska lägga sedan så jag kan använda arr(x) i if satser för att bestämma bg färgen på celler i en tabell
---------------------------
<%
RS.MoveNext
Loop
RS.close
%>
```
Permalänk: https://www.webforum.nu/p/304413
## #13 — Zaiboot, 2002-01-17T21:53Z
Tack tack, nu funkar det=)
Permalänk: https://www.webforum.nu/p/304414
## #14 — FreeZer, 2002-01-18T11:16Z
Vad är detta för stil? ingen har sagt välkommen till Zaiboot!!!!!
så då säger jag det: Välkommen Zaiboot! :e
\------------------
^FreeZer^
Permalänk: https://www.webforum.nu/p/304415
---
Tråden på webben: https://www.webforum.nu/amne/asp/13856-kapa-strängar