home *** CD-ROM | disk | FTP | other *** search
/ Chip 1999 September / CHIPCD_9_99.iso / software / uaktualnienia / OptionPackPL / iis4_07.cab / StoredProcedures_JScript.asp < prev    next >
Encoding:
Text File  |  1998-04-27  |  1.4 KB  |  62 lines
  1. <%     @ LANGUAGE="JScript"         %>
  2.  
  3. <!--#include file="adojavas.inc"-->
  4.  
  5. <%
  6.     // This example calls the ByRoyalty stored procedure 
  7.     // installed with the PUBS database with Microsoft SQL Server.
  8.  
  9.     // This sample assumes that SQL Server is running on the local machine
  10. %>
  11.  
  12.  
  13. <HTML>
  14.     <HEAD>
  15.         <TITLE>Using Stored Procedures</TITLE>
  16.     </HEAD>
  17.  
  18.     <BODY bgcolor="white" topmargin="10" leftmargin="10">
  19.         
  20.         <!-- Display Header -->
  21.  
  22.         <font size="4" face="Arial, Helvetica">
  23.         <b>Using Stored Procedures</b></font><p>   
  24.  
  25.         <%
  26.             var oConn;        
  27.             var oCmd;        
  28.             var oRs;    
  29.  
  30.             oConn = Server.CreateObject("ADODB.Connection");
  31.             oCmd = Server.CreateObject("ADODB.Command");
  32.  
  33.             
  34.             // Open ADO Connection using account "sa"
  35.             // and blank password
  36.  
  37.             oConn.Open("DSN=LocalServer;UID=sa;PWD=;DATABASE=pubs");
  38.             oCmd.ActiveConnection = oConn;
  39.  
  40.  
  41.             // Setup Call to Stored Procedure and append parameters
  42.  
  43.             oCmd.CommandText = "{call byroyalty(?)}";
  44.             oCmd.Parameters.Append(oCmd.CreateParameter("@Percentage", adInteger, adParamInput));
  45.  
  46.  
  47.             // Assign value to input parameter
  48.     
  49.             oCmd("@Percentage") = 75;        
  50.             
  51.             
  52.             // Fire the Stored Proc and assign resulting recordset
  53.             // to our previously created object variable
  54.             
  55.             oRs = oCmd.Execute();            
  56.         %>
  57.  
  58.         Author ID = <% Response.Write(oRs("au_id")) %><BR>
  59.  
  60.     </BODY>
  61. </HTML>
  62.