Tag: output

<!–#include file="adovbs.inc" –>

<%

a =0

  Set adocmd=server.createobject("adodb.command")  
  adocmd.activeconnection=conn  
  adocmd.commandtype=adCmdStoredProc  
  adocmd.commandtext="stra"
  adocmd.Parameters.Append   adocmd.CreateParameter("@a",adInteger,adParamInput,,a)
  adocmd.parameters.append   adocmd.createparameter("@b",adVarchar,adparamoutput,30)  
  adocmd.execute  
  Response.Write   adocmd("@b")  

  %>   

下面是存储过程

set ANSI_NULLS ON
set QUOTED_IDENTIFIER ON
GO
ALTER   proc   [dbo].[stra]
 @a int,
 @b   varchar(100)   output  
  as  
  set  
 if @a>1
  begin
  set @b=’as’
  end
 else
  begin
  set @b=’bs’
  end