HTML to EXCEL

				
//**************************************
// Name: HTML to EXCEL
// Description:Working example of the CFContent tag and how to make it display the current page as an Excel Spread sheet.
Uses JavaScript to submit a hidden form. 
If your report page, like most, is the target of a form post, you will want to replicate any form fields in the hidden form. The hidden form posts to the current page with the DL url variable value of 1. If the current page was passed other URL variables you must also include them in the hidden form action attiribute.
Then when you click the Excel Link, the current page will not reload and you will be presented with a download dialog box (sometimes you get two.), choose open and it will be the excel doc.
If you like comment, and vote if you found this usefull.
Thankx
// By: Tim Garver
//
// Inputs:You must use a valid (simple) HTML table. All included files must have the FULL path (images, style Sheets ect..)
Replace (<) with <
In the cfcontent tag, you can also change this to a word doc type and it will open in word instead of excel. 
//
// Returns:The same file as an excel spread sheet
//
// Assumes:look for the <cfif DL EQ 1> tag. DL is variable i assigned as my flag for downloading as excel. if it is 1, then the page is to reformated so that stuff at the top and bottom dont get included into the spread sheet, like menus and copyright stuff.
//
// Side Effects:Only works with IE 5+ or at least i have never tested it on another browser.
//
//This code is copyrighted and has// limited warranties.Please see http://www.Planet-Source-Code.com/vb/scripts/ShowCode.asp?txtCodeId=95&lngWId=9//for details.//**************************************

<!---
<CFQUERY DATASOURCE = "DSN" NAME="QUERY">
SELECTSomething
FROMSomeTable
WHERE(Somecolumn = somevalue)
</CFQUERY>
--->
(<)SCRIPT LANGUAGE="JavaScript">
<!-- Begin
function xL(){
document.X.submit();
}
// End -->
</SCRIPT>
</HEAD>
<!--~========================= END DOCUMENT HEADER =========================~-->
<cfif #DL# EQ 1>
<!-- if DL = 1 we are downloading as excel -->
(<)body bgcolor="#ffffff">
<cfelse>
(<)BODY topmargin=0>
(<)form name="X" action="?DL=1" method="post">
<!--- include any form fields that were posted, here... --->
</form>
</cfif>
(<)a onclick="return xL();">Download as Excel</a>
<TABLE border="1" bgcolor="#ffffff">
<TR ALIGN = "LEFT" valign = "top">
	<TD >Header One</TD>
	<TD >Header Two</TD>
</TR>
<cfloop query="query">
	<CFQUERY DATASOURCE = "DSN" NAME="DETAILS">
	SELECT*
	FROMSomeTable
	WHERE SomeColumn = SomeValue		
	</CFQUERY>
	<cfif DETAILS.RECORDCOUNT GT 0>
		<TR>
			<TD COLSPAN="2" ALIGN="CENTER" bgcolor="F0F0E3">
				<strong><cfoutput>#EMPFNAME# #EMPMI# #EMPLNAME#</cfoutput></strong>
			</TD>
		</TR>
		<cfoutput query="DETAILS">
		<cfif DL EQ 1>
			<tr>
		<Cfelse>
			<tr bgcolor="###IIf(CurrentRow MOD 2, DE('DADAB1'), DE('F0F0E3'))#">
		</cfif><!--- replace with real values --->
				<TD>#columnone#</TD>
				<TD>#columntwo#</TD>
			</TR>	
		</cfoutput>				
	</cfif>
	</cfloop>	
	</TABLE>	
	</TD>
</TR>
</TABLE>
</cfif>
<cfif #DL# EQ 1>
<cfheader 
 name="Content-Type" 
 value="application/msexcel">
<cfheader 
 name="Content-Disposition" 
 value="attachment; filename=SimpleTable.xls">
</cfif>
</BODY>
</HTML>