Visual Basic - Como llamar una función scalar de sql server desde VB6

Life is soft - evento anual de software empresarial
 
Vista:
sin imagen de perfil
Val: 4
Ha disminuido su posición en 5 puestos en Visual Basic (en relación al último mes)
Gráfica de Visual Basic

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:
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 @valor
							when 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.Calendario
	where	@vlfecha >= fecini
	and		@vlfecha <= fecfin
 
	return @vlreturn
 
END

como hago para llamarla y pasarle los parámetros y capturar el resultado
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder