MS SQL und Access

[tschueepp]

Wie kann ich mit VBA (Access) an eine MS SQL Funktion den Wert einer Variable übergeben?

Die Code der Funktion könnte so aussehen:

CREATE FUNCTION dbo.funkt (@input INT)
AS
DECLARE @return INT
SELECT @return = count(*) FROM tb1 WHERE idfk=@input

RETURN @return

Der Parameter @input soll den Wert einer Variable(in VBA Code) bekommen

Danke..........

 

[mage]

Du musst eine SQL Pass-Through Abfrage erstellen um direkt auf einen Stored Procedure auf einem MS SQL Server auszuführen.

Oder du meinst eine Accessfunktion:
In einem Modul eine Funktion erstellen:

Public Function funkt(input as Integer) as Integer

dim rs as Recordset

set rs = currentdb.OpenRecordset( "SELECT count(*) As Anz FROM tb1 WHERE idfk=" & input)

if not rs.BOF and not rs.EOF then
    funkt = rs!Anz
else
    funkt = 0
end if
End function