---
title: "funktioner + db koppling...??"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/124134-funktioner-db-koppling"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "Eclipse"
published: "2005-03-10T19:59:10.000Z"
updated: "2005-03-11T09:47:22.000Z"
replies: 4
views: 296
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/124134-funktioner-db-koppling"
---

# funktioner + db koppling...??

## #1 — Eclipse, 2005-03-10T19:59Z

Jag har en sida som jag inkluderar:

inc_addClick.asp

\*\*\*
I denna filen har jag denna kod:

```
<!-- #INCLUDE VIRTUAL="/admin/open.asp" -->
<%
' ## EN HIMLA MASSA FUNKTIONER

' ## B A N N E R
FUNCTION funcAddClickBanner(intBannerID)
	' ## ACTIVE COMPANY
	SQL = "SELECT c.intID, c.strURL, c.intPayPerClick, c.bolPayPerClick, c.strPayPerClickEmail " _
	& ", b.intID, b.strName, b.strURL " _
	& " FROM company c, banner b WHERE " _
	& " b.intCompanyID = c.intID AND " _
	& " ((c.intPayPerClick > 0 AND c.bolPayPerClick = FALSE) OR c.bolPayPerClick = TRUE) AND b.intID = " & intBannerID & ";"

	[b]set mySQL = Conn.Execute(SQL)[/b] rad 17
[cut]
END FUCTION
%>

<!-- #INCLUDE VIRTUAL="/admin/close.asp" -->
```

\*\*\*
När jag kör funktionerna får jag felmeddelandet 

Microsoft VBScript runtime error '800a01a8' 

Object required: 'Conn' 

/admin/inc_addClick.asp, line 17

\*\*\*
I andra sammanhang har funktionerna fungerat på liknande manér... What's the deal this time!?

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

## #2 — oGGo, 2005-03-10T20:04Z

Detta felmeddelande får man när som just felsidan beskriver, inte har definierat Conn.

Det är helt enkelt bara att sätta in koden / includefilen för Databaskopplingen ovanför denna fil så bör det fungera.

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

## #3 — Eclipse, 2005-03-11T08:45Z

```
'## OPEN THE DATABASE
DIM Conn, SQL, mySQL, myPost, myRow, i, j
Set Conn = Server.CreateObject("ADODB.Connection")

'## OPEN THE DATABASE
Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & session("databasePath")

' ## B A N N E R
FUNCTION funcAddClickBanner(intBannerID)
```

Jag förstår inte... !!

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

## #4 — OveRRidE, 2005-03-11T09:42Z

Det skall fungera, vad jag kan se. 

Det är inte så att du kanske stänger/förstör "Conn" i någon av de andra metoder (som du kanske anropar någonstans) ovanför den som felet inträffar i?

Kan du inte posta hela koden, med de andra metoderna också?

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

## #5 — Eclipse, 2005-03-11T09:47Z

```
<!-- #INCLUDE VIRTUAL="/admin/open.asp" -->
<!-- #INCLUDE VIRTUAL="/admin/inc_addClick.asp" -->
<%
' ## REDIRECT.ASP
' ## WILL GET THE USER TO RIGHT PLACE!

IF request("bannerID") <> "" THEN
	returnPath = funcAddClickBanner(CInt(request("bannerID")))
END IF
%>
<!-- #INCLUDE VIRTUAL="/admin/close.asp" -->
<%
' ## GO THERE!
response.redirect returnPath
%>
```

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/124134-funktioner-db-koppling