Menu
Hi,
I need help on sending the form out as an attachment. I’ve done exporting the data to excel format but the problem is I want to send it out as attachment and may need to attach other files from my computer, so i will nid the mail dialogbox to pop up. Can someone pls help me? here is my code:
[code]set rs = Server.CreateObject(“ADODB.Recordset”)
rs.Open “SELECT Order.MatchID, Order.EID, Order.ProductNumber, Order.ProductOption, Order.Description, Order.Quantity_Unit FROM Order, Product WHERE Product.ID=Order.MatchID”, conn
Response.ContentType = “application/vnd.ms-excel”
%>
<table BORDER=”1″ align=”center”>
<tr>
<td bgcolor=#FF6600 align=center><font color=white><b>Reference ID</b></font></td>
<td bgcolor=#FF6600 align=center><font color=white><b>EID</b></font></td>
<td bgcolor=#FF6600 align=center><font color=white><b>Product Number</b></font></td>
<td bgcolor=#FF6600 align=center><font color=white><b>Product Option</b></font></td>
<td bgcolor=#FF6600 align=center><font color=white><b>Description</b></font></td>
<td bgcolor=#FF6600 align=center><font color=white><b>Quantity(Unit)</b></font></td>
</tr>
<%
‘ Move to the first record
rs.movefirst
‘ Start a loop that will end with the last record
do while not rs.eof
%>
<tr>
<td>
<%= rs(“MatchID”) %>
</td>
<td>
<%= rs(“EID”) %>
</td>
<td>
<%= rs(“ProductNumber”) %>
</td>
<td>
<%= rs(“ProductOption”) %>
</td>
<td>
<%= rs(“Description”) %>
</td>
<td>
<%= rs(“Quantity_Unit”) %>
</td>
</tr>
<%
‘ Move to the next record
rs.movenext
‘ Loop back to the do statement
loop %>