Subar och Functioner i ASP

Jag har lite bekymmer med hur man använder subbar och funktioner korrekt.

Det jag vill åstakomma är att innifrån en sub eller funktion ropa efter en databasöppning och stängning osv, osv...
Men funkar det öht.? Jag får det inte att funka varje fall.

Så här kanske det kan se ut (lite grovhugget men ni förstår säkert principen):

' ligger i filen includes_subbar.asp (exempelvis)
sub open_db()
	Set ConnDb1 = Server.CreateObject( "Adodb.Connection" )
	ConnDb1.Provider = "Microsoft.Jet.OLEDB.4.0"
	MdbFilePath = Server.MapPath("databas.mdb") 
	ConnDb1.ConnectionString = "Data Source='" & MdbFilePath & "'"
	ConnDb1.open 
end sub

sub writeStuff(stuffid)

             call open_db()
             sql = "select * from stuff where id = "& stuffid
             set rsstuff = conndb1.execute(sql)
             * osv, osv *
             call close_DB(rsstuff)

end sub

' Ligger på default.asp
<!--#include virtual="/includes_subbar.asp"-->
call writestuff(id)