---
title: "array"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/38721-array"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "crazyl"
published: "2002-02-28T16:08:22.000Z"
updated: "2002-03-01T18:48:41.000Z"
replies: 7
views: 301
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/38721-array"
---

# array

## #1 — crazyl, 2002-02-28T16:08Z

Behöver lite hjälp...är inte så säker på asp?!
Jag vill lägga till posterna ur en tabell till en array. Vet inte riktigt hur jag ska bära mig åt. Har denna kod:

getword = "SELECT seek FROM image_tbl WHERE word = '"& Request.Form("sokord")&"'" 

Set RS=dbconn.Execute(getword) 
   
If RS.EOF Then                
  %\>
  \<script language="javascript"\>
  window.alert("inga träffar!"); 
  \</script\>
  \<%
Else 
   Do until RS.EOF         
      Dim Arr 
      Arr = RS.GetRows()
      RS.MoveNext             
   Loop
End If

Får detta fel på raden RS.MoveNext:

Antingen är BOF eller EOF satt till True, eller så har aktuell post raderats. Den begärda åtgärden kräver en aktuell post.

Tacksam för svar...

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

## #2 — LarsG, 2002-02-28T16:20Z

Getrows hämtar alla poster, så du behöver ingen loop.

```
getword = "SELECT seek FROM image_tbl WHERE word = '"& Request.Form("sokord")&"'" 

Set RS=dbconn.Execute(getword) 

If RS.EOF Then 
%> 
<script language="javascript"> 
window.alert("inga träffar!"); 
</script> 
<% 
Else 
Arr = RS.GetRows() 
End If
```

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

## #3 — PatrikB, 2002-02-28T16:20Z

Dessa rader:

```
<% 
Else 
Do until RS.EOF 
Dim Arr 
Arr = RS.GetRows() 
RS.MoveNext 
Loop
```

Ska se ut så här:

```
<% 
Else 
Dim Arr 
Arr = RS.GetRows()
```

dvs, du behöver inte loopa igenom recordsetet. Det kan du stänga och "förstöra" eftersom du har sparat hela det i arrayen.

Arrayen loopar du så här:

```
<%
If IsArray(Arr) Then
	For I = 0 TO UBound(Arr,2)
		strField1 = Arr(0,I)
		strField2 = Arr(1,I)
		strFieldn = Arr(n,I)

		'## -- visa resultatet --
	Next
Else
	Response.Write "Inget hittades."
End
%>
```

cya,
PatrikB

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

## #4 — lucifer, 2002-03-01T10:02Z

har nu fixat koden till :

```
getword = "SELECT seek FROM image_tbl WHERE word = '"& Request.Form("sokord")&"'" 
Set RS=dbconn.Execute(getword) 

	If RS.EOF Then 
	%> 
	<script language="javascript"> 
	window.alert("inga träffar!"); 
	</script> 
	<% 
	Else 
		Arr = RS.GetRows()
	End If 

	If IsArray(Arr) Then
		For I = 0 TO UBound(Arr,2)s
		strField1 = Arr(0,I)
		strField2 = Arr(1,I)
		strFieldn = Arr(n,I)'## -- visa resultatet --
		Next
		Else
		Response.Write "Inget hittades."
	End If
```

 

får fel mezz(Felaktigt matrisindex: '\[number: 1\]') :
strField2 = Arr(1,I)
varför ä denna matris fel???

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

## #5 — LarsG, 2002-03-01T10:08Z

I och med att du bara hämtar en kolumn så har arrayen bara en kolumn

```
If IsArray(Arr) Then
	For I = 0 TO UBound(Arr,2)
		strField1 = Arr(0,I)
'
'Gör något med strfield1
'
	Next
End If
```

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

## #6 — Eclipse, 2002-03-01T15:37Z

```
strFieldn = Arr(n,I)'## -- visa resultatet --
```

Var kommer **n** i från? Det borde inte fungera...??

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

## #7 — juventus1, 2002-03-01T16:11Z

n är bara ett valfritt positivt tal. Ofta skriver man bara 1,2,3...n

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

## #8 — PatrikB, 2002-03-01T18:48Z

jag tänkte bara vara "lite pedagogisk".
strField1 = Arr(1,I)
strFieldn = Arr(n,I)

"trodde" att "ni" skulle förstå det.  :( 

sorry, my mistake

cya,
PatrikB

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/38721-array