quando non viene restituito nessun recordset....

[paxxx80]

scusate come faccio a testare il fatto che una stored procedure non mi restituisca nessun recordset?

esempio:
store:
CREATE PROCEDURE dbo.spprova
AS

RETURN
GO


pagina asp:

dim rec
set cn=Server.CreateObject("ADODB.Connection")
set rec=Server.CreateObject("ADODB.recordset")
Set com = Server.CreateObject("ADODB.Command")
cn.ConnectionString = DSN_DB1
cn.open

strsql = "" & DB_Ristorazione & "..spprova "

com.ActiveConnection = cn
com.CommandText = strSql
Set rec = com.Execute


'rec.Open strsql,cn

if not rec.EOF then
if rec("messaggio") <> "" and rec("messaggio") <> "OK" then
Response.Write "<div class=m-err><center>" & rec("messaggio") & "</center></div>"
Response.End
end if
end if



rec.Close
cn.Close
set cn=nothing


mi dà questo errore
Operation is not allowed when the object is closed.
quando cerco di testare l'EOF, effettivamente nel caso in questione il recordset non esiste ancora,c'è una qualche funzione che mi restituisce questo caso?
grazie 1000

[Roby_72]

if IsObject(rec) ??

Roby

[paxxx80]

però isObject(rec) mi torna true!!!!!!

cioè se io scrivo

Response.Write "qui:" & IsObject(rec) & br
Response.Write rec.RecordCount

alla prima riga mi dà true,alla seconda (cioè sul recordcount) quel cavolo di errore....sto diventando matta....
idee??

[Roby_72]

Ma la SP cosa fa?

Roby

[paxxx80]

fa degli insert vari...se sbaglia in qualcosa torna un recordset con un messaggio,se fa tutto giusto finisce con
RETURN
ma niente recordset...ovviamente la sp è intoccabile causa comandi dall'alto, altrimenti non sarei in sto casino, la prova cmq si può fare creando semplicemente una sp di questo tipo:

CREATE PROCEDURE dbo.spprova
AS

RETURN
GO


è esattamente quello che fa se tutte le operazioni vanno a buon fine

[optime]

paxxo, la riga

Set rec = com.Execute


NON apre nessun recordset. quindi asp fa bene a lamentarsi se cerchi di chiuderlo

[paxxx80]

allora perchè se al posto di quello uso:
rec.Open strsql,cn

mi dà lo stesso identico errore????????

[Roby_72]

Se fai?

com.Execute, , adExecuteNoRecords

Roby

[paxxx80]

e il record dove lo metto?
per il caso in cui esca fuori intendo...se faccio come dici tu poi rec cosa centra??
scusami ma mi sa ke mi sono persa qualcosa....

com.ActiveConnection = cn
com.CommandText = strSql
com.Execute, , adExecuteNoRecords


Response.Write "qui:" & IsObject(rec) & br
'Response.Write rec.RecordCount
if IsObject(rec) then
if not rec.EOF then
if rec("messaggio") <> "" then
Response.Write "<div class=m-err><center>" & rec("messaggio") & "</center></div>"
Response.End
end if

end if
end if