Como executar o SQL Server armazenadas procedimentos a partir de uma página ASP

Exemplo passo a passo

1. Execute a seguinte consulta no SQL Server Query Analyzer ou o SQL Server Management Studio na base de dados Pubs:

   CREATE proc MyProc
   (
   	@price smallint,
   	@out smallint OUTPUT
   )
   AS
   Select @out = count(*) from titles where price < @price
   GO
   						

   o procedimento armazenado ("MyProc") utiliza um parâmetro de entrada ("@ Preço") e devolve uma saída parâmetro ("@ out").
   
   Nota Por predefinição, a base de dados de exemplo Adamastor e as bases de dados de exemplo pubs não são instalados no SQL Server 2005. Estas bases de dados podem ser transferidos a partir do Centro de transferências da Microsoft. Para obter mais informações sobre como transferir a base de dados de exemplo Adamastor e a base de dados de exemplo pubs, visite o seguinte Web site da Microsoft:
   http://msdn2.microsoft.com/en-us/library/ms143221.aspx (http://msdn2.microsoft.com/en-us/library/ms143221.aspx)
2. O seguinte código ASP de exemplo chama o procedimento armazenado recém-criado. Pode utilizar este código ASP para configurar o parâmetro de entrada e executar a consulta.
   1. Utilize o método CreateParameter para criar parâmetros no Microsoft ActiveX Data Objects (ADO) da seguinte forma:

      Set myParameter = Command.CreateParameter (Name, [Type], [Direction], [Size], [Value])
      						

   2. Acrescentados o parâmetro a colecção de parâmetros da seguinte forma:

      Command.Parameters.Append myParameter
      							

      Nota : os parâmetros na colecção de parâmetros devem corresponder à ordem dos parâmetros no procedimento armazenado.
   3. Execute o comando para passar valores de parâmetro e de procedimento armazenado da seguinte forma:

      <%
      Dim cmd
      Dim ln
      Dim retCount
      
      Set cmd = Server.CreateObject("ADODB.Command")
      	
      With cmd
          .ActiveConnection = "Paste your connection string here"
          .Commandtext = "MyProc"
          .CommandType = adCmdStoredProc
          .Parameters.Append .CreateParameter("@price", adSmallInt, adParamInput, 10)
          .Parameters("@price") = 22
          .Parameters.Append .CreateParameter("@retValue", adSmallInt, adParamOutput, 10)
          .Execute ln, , adExecuteNoRecords
          retCount = .Parameters("@retValue")
      End with
      
      Response.Write retcount
      
      Set cmd = Nothing
      %>
      						

   NOTA: As constantes que são utilizadas neste exemplo podem ser encontradas no ficheiro Adovbs.inc. Este ficheiro é instalado durante a configuração do Active Server Pages e colocado na pasta \Aspsamp\Samples, que normalmente está localizada na pasta \Inetpub. Recomenda-se prática de programação para utilizar as constantes em vez dos valores numéricos quando chamar o procedimento armazenado para que seja mais fácil de ler e manter o código.

   <%@ LANGUAGE = VBScript %>
   <!-- #INCLUDE VIRTUAL="/ASPSAMP/SAMPLES/ADOVBS.INC" -->
   					

3. Modificar a cadeia de ligação ADO conforme apropriado para o ambiente.
4. Guarde a página ASP e visualizar no browser.
   
   NOTA: Pode ser difícil determinar a correctamente chamar um procedimento armazenado não utilizam informações de parâmetros do procedimento armazenado. Sem as informações correctas, não pode criar correctamente os parâmetros do ADO. Pode utilizar o método Actualizar o objecto de parâmetro para povoar a colecção de parâmetros automaticamente, baseado na definição do procedimento armazenado no servidor. Por exemplo:

   Command.Parameters.Refresh
   					

Voltar ao topo