Como llamar una función scalar de sql server desde VB6
Publicado por Gabriel (2 intervenciones) el 18/03/2021 04:26:57
Buenas tardes amigos.
Yo tengo una función en sqlserver 2008 que posee 2 parámetros: quisiera si alguno de ustedes sabe como llamar esa funcion desde VB6.
si podrían escribir un ejemplo me sería de mucha utilidad.
ésta es la función:
como hago para llamarla y pasarle los parámetros y capturar el resultado
Yo tengo una función en sqlserver 2008 que posee 2 parámetros: quisiera si alguno de ustedes sabe como llamar esa funcion desde VB6.
si podrían escribir un ejemplo me sería de mucha utilidad.
ésta es la función:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
ALTER FUNCTION [dbo].[fn_calendario](@fecha datetime, @valor int)
RETURNS varchar(10)
AS
BEGIN
-- @valor 1 = anocon
-- @valor 2 = mescon
-- @valor 3 = semcon
-- @valor 4 = fecini
-- @valor 5 = fecfin
-- @valor 6 = anopro
-- @valor 7 = mespro
DECLARE @vlreturn varchar(10)
DECLARE @vlfecha datetime = convert(date,@fecha,103)
select @vlreturn = case @valorwhen 1 then cast(anocon as varchar(4))
when 2 then cast(mescon as varchar(2))
when 3 then cast(semcon as varchar(2))
when 4 then convert(varchar(10),fecini, 103)
when 5 then convert(varchar(10),fecfin, 103)
when 6 then cast(anopro as varchar(4))
when 7 then cast(mespro as varchar(4))
end
from dbo.Calendariowhere @vlfecha >= fecini
and @vlfecha <= fecfin
return @vlreturn
END
como hago para llamarla y pasarle los parámetros y capturar el resultado
Valora esta pregunta
0