modtage værdi fra SP

Den bedste (mest fleksible) måde er at slutte sin sp med at select'e de værdier man gerne vil have ud og så lægge følgende kode i VB:

dim rs as adodb.recordset
set rs = objConn.Execute(sql)
msgbox rs.fields(0).value

Det skal selvfølgelig siges at det til gengæld ikke er den bedste måde at overføre værdier mellem stored procedures, men det er en helt anden historie.

Det jeg godt kunne tænke mig, er at kunne sende en besked tilbage fra SP, om hvad der er gjort.

feks.
set @besked='Der blev slette 2, oprette 7 nye'

Mit problem er hvordan man får fat i @besked, på den bedste måde, i visual basic.

Prøv med

RaisError ('Besked til VB', 16, 1) i SP'en (RaisError er kun med et dobbelt r). Skal selvfølgelig stå til aller sidst i SP'en da det betragtes som en error i SQL


Så i VB

dim rs as adodb.recordset
On Error Resume Next
set rs = objConn.Execute(sql)
msgbox rs.fields(0).value
MsgBox Err.Description

Jeg er ikke sikker på at det virker men prøv det!

//Nolle_K

Jeg synes generelt det er forkert at benytte fejlhåndteringen til ting der reelt ikke er fejl. Prøv i stedet:

I sp'en:

declare @deleted int
declare @inserted int

Insert into ....

set @inserted = @@RowCount

Delete from ...

set @deleted = @@RowCount

select 'Slettet: ' + cast(@deleted as varchar) + ' poster, Oprettet: ' + @inserted + ' poster.'

Eller

select @deleted, @inserted

Og så i VB:

msgbox "Slettet: " & rs.fields(0).value & " poster, Oprettet: " & rs.fields(0).value & " poster.".

Ups, jeg glemte at "modificere" @inserted. Erstat @inserted i select-statementet med cast(@inserted as varchar).

Det synes jeg også men det er da en måde at løse problemet på!

Tak
jeg fik det til at virke...

Hvordan endte det med at du gjorde??