ADO 2.7 Samples

ActualSize and DefinedSize Properties Example (JScript)

This example uses the ActualSize and DefinedSize properties to display the defined size and actual size of a field. Cut and paste the following code to Notepad or another text editor, and save it as ActualSizeJS.asp.

<!-- BeginActualSizeJS -->
<%@LANGUAGE="JScript" %>
<html>

<head>
   <title>ActualSize and DefinedSize Properties Example (JScript)</title>
<style>
<!--
body {
   font-family: 'Verdana','Arial','Helvetica',sans-serif;
   BACKGROUND-COLOR:white;
   COLOR:black;
    }
.thead2 {
   background-color: #800000; 
   font-family: 'Verdana','Arial','Helvetica',sans-serif; 
   font-size: x-small;
   color: white;
   }
.tbody { 
   text-align: center;
   background-color: #f7efde;
   font-family: 'Verdana','Arial','Helvetica',sans-serif; 
   font-size: x-small;
    }
-->
</style>
</head>

<body bgcolor="White">

<h1>ADO ActualSize and DefinedSize Properties (JScript)</h1>
<%
   // connection and recordset variables
   var Cnxn = Server.CreateObject("ADODB.Connection")
   var strCnxn = "Provider=sqloledb;Data Source=" + Request.ServerVariables("SERVER_NAME") + ";" +
      "Initial Catalog=Northwind;User Id=sa;Password=;"
   var rsSuppliers = Server.CreateObject("ADODB.Recordset");
   // display variables
   var fld, strMessage;      
   
   // open connection
   Cnxn.Open(strCnxn)
   
   // Open a recordset on the stores table   
   rsSuppliers.Open("Suppliers", strCnxn);
   
   // build table headers
   Response.Write("<table>");
   Response.Write('<tr class="thead2"><th>Field Value</th>');
   Response.Write("<th>Defined Size</th>");
   Response.Write("<th>Actual Size</th></tr>");
      
   while (!rsSuppliers.EOF)
   {
      // start a new line
      strMessage = '<tr class="tbody">';
            
      // Display the contents of the chosen field with
      // its defined size and actual size
      fld = rsSuppliers("CompanyName");
      strMessage += '<td align="left">' + fld.Value + "</td>" 
      strMessage += "<td>" + fld.DefinedSize + "</td>";
      strMessage += "<td>" + fld.ActualSize + "</td>";
            
      // end the line
      strMessage += "</tr>";
         
      // display data
      Response.Write(strMessage);
            
      // get next record
      rsSuppliers.MoveNext;

   }
    // close the table
   Response.Write("</table>");
      
   // clean up
   rsSuppliers.Close();
   Cnxn.Close
%>

</body>

</html>
<!-- EndActualSizeJS -->

See Also

ActualSize Property | DefinedSize Property | Field Object

© 1998-2001 Microsoft Corporation. All rights reserved.