在VB组件中使用串缓冲 - 3

March 25,2004

Lesson 3 : The ASP File
--------------------------------------------------------------------------------

How2Project4.asp

The Asp Code
We can now use our component from any asp page. Here we set our connection string, the sql statement, and
the number of fields that our sql statement returns from the database. All these variables could be set
locally in the MethodName() method instead of being sent as method parameters.

<%
"~~~~~~~~~~~~~~~~~~ Set Object ~~~~~~~~~~~~~~~~~
Set oClass = Server.CreateObject("How2Project4.ClassName"

"~~~~~~~~~~~~ Set method parameters ~~~~~~~~~~~~~
strDbConnectionString = "strDSN"
strSQL = "Select ExampleFieldID, ExampleField1, ExampleField2 FROM ExampleTable"
intFieldCount = 3

"~~~~~~~~~~~~~~ Get TABLE Record ~~~~~~~~~~~~~
strHtmlTableTR = oClass.MethodName(strDbConnectionString, strSQL, intFieldCount)
%>

<HTML><HEAD><TITLE>How2 EXAMPLE</TITLE></HEAD><BODY>

<TABLE BORDER="1" CELLSPACING="3">
<%= strHtmlTableTR %>
</TABLE>

</BODY></HTML>

<%
Set oClass = Nothing
%>

Once the object is instantiated and the method called, a fully formed TABLE record (TR) will be returned
as a string. Placing it between opening and closing TABLE tags will display the following:

1 100 Text Field 2a
2 200 Text Field 2b
3 300 Text Field 2c
4 400 Text Field 2d
5 500 Text Field 2e
6 600 Text Field 2f

Again, for more specific information on the database used here, and an alternative way to populate an asp
table, read the "How To Pass a Variant Array Populated with a RecordSet From a VB Component to an asp
File" and the "How To Pass a RecordSet From a VB Component to an asp File" articles.

Happy coding….