Logge sql 2

Hej

Som jeg skriver i http://www.eksperten.dk/spm/830871 har jeg brug for at logge hvad der bliver kørt på min sql-server via mine asp-scripts

jeg vil derfor gerne lave en funktion jeg eksempelvis kalder baseexecute(sql) - ikke at forveksle med base.execute(sql)

jeg bruger flg til at connecte:
Set base = Server.CreateObject("ADODB.Connection")
base.Open "Provider=SQLOLEDB.1;Server=xx;database=u;uid=u;pwd=x;network=DBMSSOCN"

pt skriver jeg så eksempelvis

set rs = base.execute(Sql)
while not rs.eof
response.write rs("felt")
rs.movenext
wend

og så ville jeg gerne kunne skrive
set rs = baseexecute(Sql)
while not rs.eof
response.write rs("felt")
rs.movenext
wend

jeg har forsøgt at lave flg:
function baseexecute(sql)
baseexecute = base.execute(sql)
end function

det du'r ikke...

nogen forslag?