ActualSize および DefinedSize プロパティの例 (JScript)
この例では ActualSize および DefinedSize プロパティを使用して、フィールドの定義されたサイズと実際のサイズを表示します。 次のコードを切り取り、メモ帳やその他のテキスト エディターに貼り付けて、ActualSizeJS.asp という名前で保存します。
<!-- BeginActualSizeJS -->
<%@LANGUAGE="JScript" %>
<%// use this meta tag instead of adojavas.inc%>
<!--METADATA TYPE="typelib" uuid="00000205-0000-0010-8000-00AA006D2EA4" -->
<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';Integrated Security='SSPI';";
var rsSuppliers = Server.CreateObject("ADODB.Recordset");
// display variables
var fld, strMessage;
try
{
// 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>");
}
catch (e)
{
Response.Write(e.message);
}
finally
{
// clean up
if (rsSuppliers.State == adStateOpen)
rsSuppliers.Close;
if (Cnxn.State == adStateOpen)
Cnxn.Close;
rsSuppliers = null;
Cnxn = null;
}
%>
</body>
</html>
<!-- EndActualSizeJS -->