---
title: "Array"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/163897-array"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "devotion"
published: "2007-08-26T16:06:13.000Z"
updated: "2007-08-26T16:12:09.000Z"
replies: 1
views: 285
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/163897-array"
---

# Array

## #1 — devotion, 2007-08-26T16:06Z

Hej!

Jag använder Getrows() för at hämta ut ID från en tabell enligt nedanstående kod. 

Nu vill jag bygga ut det lite och även få med \[Note\].

```
Set Conn=CreateObject("ADODB.Connection")
	Conn.Open Application.sDbConnectionString
	Set Rs=CreateObject("ADODB.Recordset")
	sSQL="SELECT [Id], [Note] FROM [tblArticle]"
	Rs.Open sSQL, Conn
	aRow=Rs.getrows()
	Rs.Close
	Set Rs = Nothing
	for i = 0 to ubound (aRow, 2)
		'sNote= wee
		'if foo <>"" then sNote = vbCrLf&sNote
		sSQL=	"DECLARE @ptrval varbinary(16)" &  vbCrLf _
				& "SELECT @ptrval = TEXTPTR(Note) FROM [tblArticle] WHERE [Id] = " & aRow(0,i) &  vbCrLf _
				& "UPDATETEXT [tblArticle].[Note] @ptrval NULL NULL '" & sNote & "'" & vbCrlf _	
				& "UPDATE [tblArticle] SET [Price] = [Price] * " & fPercentValue & ", [Modified] = GETDATE() WHERE [Id] = " & aRow(0,i)
		Conn.Execute sSQL
	Next
	Set Conn=Nothing
```

Hur får jag ut \[Note\] från arrayen?

Min tanker är att kolla om \[Note\] är tom. Är den det ska infot bara läggas till, Finns något lagrat i \[Note\] ska det läggas till ett vbCrLf först...

Hoppas någon fattar!

Mvh
Henrik

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

## #2 — devotion, 2007-08-26T16:12Z

Hmm, det var ju inte så svårt... :) 

```
if aRow(1,i) <> "" then sNote = vbCrLf & sNote
```

Funkar finfint....

Mvh
Henrik

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

---

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