Parameter syntax til Stored Procedure (SQL server 2000)

If shopID = 0 then
shopID = "null"
end if

If Btekst = "" then
Btekst = "null"
end if

- vil nok virke bedre

ja, men ved du om man skal have  'udenom' ,  eller skal det fjernes så det kun er komma der adskiller?

det er jo fordi SQL serveren skal opfatte null som en variable og ikke et stykke tekst

Åhja!!!

If shopID = 0 then
  shopID = "null"
end if

If Btekst = "" then
  Btekst = null
else
  Btekst = "'" & Btekst "'"
end if

rs1 = myConn.execute( "Exec Soeg " & Btekst & ", " & shopID )

Jeg går udfra at shopID er et tal

det virker næsten nu,

du ved ikke hvad man skal skrive inde i stored procedure for at rekordsættet modtager resultatet korrekt

jeg har tjekket op om de sendte informationer på serveren fungerer, det gør de hvis jeg tester i  SQL Query Analyzer.

Fejlen jeg får i ASP er nu følgende

Error Type:
ADODB.Recordset (0x800A0E78)
Operation is not allowed when the object is closed.

og jeg har ikke lukket sættet

Du vil altså have et recordset ud af din stored procedure, det kan man godt, men jeg har ikke selv brugt det. Giv mig et øjeblik

Du må vise mig asp'en, det er der fejlen er (tror jeg)

Det er faktisk ret simpelt

sub search()

Dim ShopID, Btekst

If shopID = 0 then
  shopID = "null"
end if

If Btekst = "" then
  Btekst = null
else
  Btekst = "'" & Btekst "'"
end if

rs1 = myConn.execute( "Exec Soeg " & Btekst & ", " & shopID )

do while not rs1.EOF
           
Mit indhold hvor jeg udskriver tabeller og indhold

Loop

rs1.close

set rs1=nothing

end sub


-----------


men så vidt jeg ved er det noget med at det er den SP sender antal fundne først og derefter sender den posterne, er dette rigtigt

Prøv med

SET rs1 = myConn.execute( "Exec ...

Nej, det er ikke det med at den sender antal fundne først. Jeg går udfra at det sidste statement i din sp er en SELECT?

Du har vel en rs1.MoveNext i loop'et? og ingen rs1.close i loop'et


Og lige et PS: Din ADO syntaks er en smule forenklet, se her:'

Set myConn = Server.CreateObject("ADODB.Connection")

myConn.Open ConnectionString

Set Com = Server.CreateObject("ADODB.Command")
Set rs1 = Server.CreateObject("ADODB.Recordset")

Com.ActiveConnection = myConn

Dim ShopID, Btekst

If shopID = 0 then
  shopID = "null"
end if

If Btekst = "" then
  Btekst = null
else
  Btekst = "'" & Btekst "'"
end if

Com.CommandText = "Exec Soeg " & Btekst & ", " & shopID


rs1.Open Com, , 0, 1

blabla



rs1.Close
Set rs1 = nothing
Set Com = nothing
myConn.Close
Set myConn = nothing