建立HTML表格
首先建立ASP首頁，將該首頁添加到Visual InterDev項目中，檔案名稱為ContentType.asp， 如同圖 A
。然後將代碼A所顯示的代碼添加到首頁中，第一行代碼可以將所涉及首頁的mime type轉變為Excel mime type。下面幾行代碼將啟動我們早先建立的組件以擷取ADOR記錄區的資料。 這些代碼如同ListingA中所顯示將在記錄區迴圈處理並建立一個HTML表格， 該表格包括僱員表中每行的記錄。
代碼 A:Code for adding new ASP page to Visual InterDev Project
<%@ Language=VBScript %>
<%Response.ContentType = "application/vnd.ms-excel"%>
<%
Dim objEmployee, rs
set objEmployee=server.CreateObject("EmpReport.Employee")
Set rs = objEmployee.GetEmployee()
'Draw a Table
%>
<TABLE>
<TR>
<TD><STRONG><FONT FACE="" size=4>Employee
Report</FONT></STRONG></TD>
</TR>
<TR>
<TD>Employee Id</TD>
<TD>First Name</TD>
<TD>Last Name</TD>
<TD>Title</TD>
</TR>
<%
Do while not rs.eof
%>
<TR>
<TD>
<%=rs("EmployeeId")%></TD>
<TD>
<%=rs("LastName")%></TD>
<TD>
<%=rs("FirstName")%></TD>
<TD>
<%=rs("Title")%></TD>
</TR>
<%
rs.movenext
loop
%></TABLE>
完成輸入代碼後， 儲存並瀏覽該首頁。該首頁如同圖 B 。注意該試算表中的所有行並未實行任何格式化處理。當我們使用Excel VBA組件創立工作表格時，我們可以利用VBA方式對錶格加以調整。 但是，在使用HTML方式下對錶格加以通常的格式化處理是比較困難的，除非你能方便地顯示和讀取HTML表格的有關資料。利用ASP首頁技術我們能夠做到這一點，而且可以實現目前Microsoft Excel所支援的所有功能， 其中包括SUM功能。需要注意的是，利用HTML創立的工作表格中沒有包括一些標準的標示符號，例如<HTML> 及<BODY>。當我們建立與Excel工作表格互換資料的HTML表格時，盡量不要在ASP首頁中使用<HTML>,<BODY>,<HEAD>等標示符號，因為Excel工作表格通常無法正確這些標示符號。
