databaseforbindelse i function

Hvorfor kan følgene ikke virke:
virker:
set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.Mappath("../Db/basen.mdb")
Conn.Open DSN

strSQL = "Select * from Nyhed"
Set nyhed = Conn.Execute(strSQL)

virker ikke:

function open()
set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.Mappath("../Db/basen.mdb")
Conn.Open DSN
End function

open()
strSQL = "Select * from Nyhed"
Set nyhed = Conn.Execute(strSQL)

--------------------------