---
title: "Stänga Recordset"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/139501-stänga-recordset"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "devotion"
published: "2005-12-18T09:03:28.000Z"
updated: "2005-12-18T12:02:53.000Z"
replies: 6
views: 333
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/139501-stänga-recordset"
---

# Stänga Recordset

## #1 — devotion, 2005-12-18T09:03Z

Hej!

I följande kod; behöver man stänga recordsetet efter varje fråga?

```
	Set objConn = Server.CreateObject("ADODB.Connection")
	objConn.ConnectionString = "DSN=uppdragNu"
	objConn.Open
	
	Set objRS = objConn.Execute ("SELECT nextId FROM tblNextId WHERE table = 'tblTask'")
	iTaskId = Cint(objRS("NextId")) 	
	
	objRS.Close
	Set objRS = Nothing
	
	Set objRS = objConn.Execute ("SELECT * FROM tblSettings WHERE key = 'NextTaskNr'")
	sNextTaskNr = objRS("Value")
	
	objRS.Close
	Set objRS = Nothing
	
	Set objRS = objConn.Execute ("SELECT * FROM tblSettings WHERE key = 'TaskNrPrefix'")
	sTaskNrPrefix = objRS("Value")
	
	objRS.Close
	Set objRS = Nothing

	objConn.Close
	Set objConn = Nothing
```

eller kan man göra på annat vis?

Mvh
henrik

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

## #2 — m_soderlund, 2005-12-18T09:13Z

Ska du köra alla tre SQL-frågorna samtidigt vid varje anrop?

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

## #3 — devotion, 2005-12-18T09:25Z

hmmm, jag tror det... 

Henrik

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

## #4 — m_soderlund, 2005-12-18T09:51Z

I så fall kan du göra om de där SQL-frågorna till en SQL-fråga.

```
SQL = "SELECT nextId,
(SELECT value FROM tblSettings WHERE key = 'NextTaskNr') as value1,
(SELECT value FROM tblSettings WHERE key = 'TaskNrPrefix') as value2
FROM tblNextId WHERE table = 'tblTask'"

set objRs = Cn.Execute(SQL)

objRs.Close : Set objRS = Nothing
objConn.Close : Set objConn = Nothing
```

sen kommer du åt värdena genom objRs("value1"), objRs(value2") och så objRs("nextId").

En nyfiken fråga - vad är det du ska få ut genom att plocka ut value-kolumnen där key är NextTaskNr eller TaskNrPrefix?

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

## #5 — Erik Juhlin, 2005-12-18T10:17Z

Du kan också skippa att ha ett recordset.

```
Set objConn = Server.CreateObject("ADODB.Connection")
objConn.ConnectionString = "DSN=uppdragNu"
objConn.Open

iTaskId = CLng( objConn.Execute("SELECT nextId FROM tblNextId WHERE table = 'tblTask'")("NextId") )	

sNextTaskNr = objConn.Execute("SELECT * FROM tblSettings WHERE key = 'NextTaskNr'")("Value")

sTaskNrPrefix = objConn.Execute("SELECT * FROM tblSettings WHERE key = 'TaskNrPrefix'")("Value")

objConn.Close
Set objConn = Nothing
```

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

## #6 — devotion, 2005-12-18T10:37Z

Hej!

Det där såg ju lite snyggare ut...

> En nyfiken fråga - vad är det du ska få ut genom att plocka ut value-kolumnen där key är NextTaskNr eller TaskNrPrefix?

tblSettings innehåller två kolumner "key" ocjh "value" 
NextTaskNr är helt enkelt nästa löpnummer på uppdraget
TaskNrPrefix är uppdragsprefixet
dvs sTaskNr = TaskNrPrefix & NextTaskNr

En konstig lösning kan tyckas men dbstrukturen  går det inte att göra något åt...

Mvh
henrik

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

## #7 — m_soderlund, 2005-12-18T12:02Z

Läckert Erik Juhlin! Tack för den (y)

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/139501-stänga-recordset