---
title: "Fråga gällande mina funktioner för databasen"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/72542-fråga-gällande-mina-funktioner-för-databasen"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "mattiasjarnhall"
published: "2003-03-29T16:08:52.000Z"
updated: "2003-03-30T10:03:40.000Z"
replies: 4
views: 243
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/72542-fråga-gällande-mina-funktioner-för-databasen"
---

# Fråga gällande mina funktioner för databasen

## #1 — mattiasjarnhall, 2003-03-29T16:08Z

Hej!

Jag har två stycken funktioner på min sida.. en för att öppna en koppling till databasen:

Function openCon()

	strCon = "driver={MySQL};Server=localhost;Db=DATABASEN;UID=XX;Pwd=XX;option=16384"
	
	Set objTmp = Server.CreateObject("ADODB.Connection")
	objTmp.Open(strCon)
	Set openCon = objTmp
	
End Function

Samt en som stänger en databaskoppling:

Sub closeCon(ByRef objCon)

	objCon.Close
	Set objCon = Nothing
	
End Sub

Sedan använder jag dem på min sida genom att anropa dem såhär:

Set objCon = openCon()

' Do my stuf

closeCon(objCon)

NU TILL FRÅGAN..

Ser funktionerna rätt ut? Kommer databaskopplingarna öppnas och stängas korrekt?
Tex: koppling objTmp.. den stänger jag ju inte, för den "returnerar" jag ju.. så det är väl ok?
Och den jag stänger sen. som skickas som ByRef.. det är väl rätt? Eller stänger jag en "kopia"?

/MJ

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

## #2 — PatrikB, 2003-03-29T19:52Z

Varför inte bygga en VB Script Class som handhar alla databas-requests såsom SELECT, INSERT, UPDATE, DELETE etc ....

Annars, så ser det korrekt ut

Det enda man skulle kunna "klaga på" är att funktionen openCon() borde ha connection-string som argument .... blir mer användbar då.

cya,
/PatrikB

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

## #3 — Josef, 2003-03-29T22:33Z

Jag skulle ha funktionerna så här:

```
Sub openCon() 
     Set objCon = Server.CreateObject("ADODB.Connection") 
     objCon.Open "driver={MySQL};Server=localhost;Db=DATABASEN;UID=XX;Pwd=XX;option=16384"
End Sub
Sub closeCon() 
     objCon.Close 
     Set objCon = Nothing 
End Sub
```

Sedan för att öppna databasen skriver du bara: 

```
openCon()
```

och för att stänga 

```
closeCon()
```

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

## #4 — voigtann1, 2003-03-30T08:45Z

måste man inte skriva call openCon()??

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

## #5 — Josef, 2003-03-30T10:03Z

Nej, det behöver man inte. Fast du kan likaväl göra det. ;)

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/72542-fråga-gällande-mina-funktioner-för-databasen