ASP Function funktioniert nicht ?

[Ralf]

habe Fehler gefunden ;-)

<%
Function getText(str)
            '###### Variablen deklarieren ######
            Dim sql_text, rs_text 'Datenbank
            '###### DB select ######
            sql_text = "SELECT text.text_box1 FROM [text] WHERE (((text.text_id)=" & str & "));"
            '###### Daten erfragen ######
            set rs_text = conn.Execute(sql_text)
            '######  Wert aus der DB an die Variable str übergeben ######
            str = rs_text("text_box1")
End Function
%>

getText = rs_text("text_box1")
und nicht
str = rs_text("text_box1") !!!