Append and CreateParameter Methods Example (JScript)

This example uses the Append and CreateParameter methods to execute a stored procedure with an input parameter. Cut and paste the following code to Notepad or another text editor, and save it as AppendJS.asp.

<!-- BeginAppendJS -->
<%@LANGUAGE="JScript" %>
<%// use this meta tag instead of adojavas.inc%>
<!--METADATA TYPE="typelib" uuid="00000205-0000-0010-8000-00AA006D2EA4" -->

<html>
<head>
   <title>Append and CreateParameter Methods Example (JScript)</title>
<style>
<!--
body {
   font-family: 'Verdana','Arial','Helvetica',sans-serif;
   BACKGROUND-COLOR:white;
   COLOR:black;
    }
-->
</style>
</head>

<body>
<h1>Append and CreateParameter Methods Example (JScript)</h1>
<%
   // verify user-input 
   var iRoyalty = parseInt(Request.Form("RoyaltyValue"));
   if (iRoyalty > -1)
   {

      // connection, recordset and command variables
      var strCnxn = "Provider=sqloledb;Data Source=" + Request.ServerVariables("SERVER_NAME") + ";" +
         "Initial Catalog=Pubs;User Id=sa;Password=;"
      var Cnxn = Server.CreateObject("ADODB.strCnxnion");
      var cmdByRoyalty = Server.CreateObject("ADODB.Command");
      var rsByRoyalty = Server.CreateObject("ADODB.Recordset");
      var rsAuthor = Server.CreateObject("ADODB.Recordset");
      // display variables
      var strMessage;
      
      // open connection and set cursor location
      Cnxn.Open(strCnxn);
      Cnxn.CursorLocation = adUseClient;
   
      // command object initial parameters
      cmdByRoyalty.CommandText = "byroyalty";
      cmdByRoyalty.CommandType = adCmdStoredProc;
      
      // create the new parameter and append to
      // the Command object's parameters collection
      var prmByRoyalty = cmdByRoyalty.CreateParameter("percentage", adInteger, adParamInput);
      cmdByRoyalty.Parameters.Append(prmByRoyalty);
      prmByRoyalty.Value = iRoyalty;
      
      cmdByRoyalty.ActivestrCnxnion = Cnxn;
      
      // execute command
      rsByRoyalty = cmdByRoyalty.Execute();
      
      // display results
      rsAuthor.Open("Authors", Cnxn);
   
      
      while (!rsByRoyalty.EOF)
      {
         rsAuthor.Filter = "au_id='" + rsByRoyalty.Fields("au_id") + "'";
         
         // start new line
         strMessage = "<P>";
            
         // recordset data
         strMessage += rsAuthor.Fields("au_fname") + " "; 
         strMessage += rsAuthor.Fields("au_lname") + " ";
            
         // end the line
         strMessage += "</P>";
         
         // show result
         Response.Write(strMessage);
            
         // et next record
         rsByRoyalty.MoveNext;

      }
   
      // clean up
      rsByRoyalty.Close;
      rsAuthor.Close
      Cnxn.Close
   }
%>

<hr>


<form method="POST" action="AppendJS.asp" id=form1 name=form1>
  <p align="left">Enter royalty percentage to find (e.g., 40): <input type="text" name="RoyaltyValue" size="5"></p>
  <p align="left"><input type="submit" value="Submit" name="B1"><input type="reset" value="Reset" name="B2"></p>
</form>
&nbsp;


</body>

</html>
<!-- EndAppendJS -->

Append and CreateParameter Methods Example (JScript)

See Also