Joel
<%@ Language=VBScript%>
<% ' VI 6.0 Scripting Object Model Enabled %>
<!--#include file="_ScriptLibrary/pm.asp"-->
<% if StartPageProcessing() Then Response.End() %>
<FORM name=thisForm METHOD=post>
<HTML>
<HEAD>
<SCRIPT ID=serverEventHandlersVBS LANGUAGE=vbscript RUNAT=Server>
Sub Button1_onclick()
Response.ContentType = "application/txt"
Response.AddHeader "content-disposition","attachment;
filename=MyCustomers.txt"
Response.Write "Test" & vbTab & "Test1" & vbCrLf & "Test2" & vbTab &
"Test3" & vbCrLf
End Sub
</SCRIPT>
</HEAD>
<BODY>
<!--METADATA TYPE="DesignerControl" startspan
<OBJECT classid="clsid:B6FC3A14-F837-11D0-9CC8-006008058731"
id=Button1 style="LEFT: 0px; TOP: 0px">
<PARAM NAME="_ExtentX" VALUE="1773">
<PARAM NAME="_ExtentY" VALUE="714">
<PARAM NAME="id" VALUE="Button1">
<PARAM NAME="Caption" VALUE="Button1">
<PARAM NAME="Image" VALUE="">
<PARAM NAME="AltText" VALUE="">
<PARAM NAME="Visible" VALUE="-1">
<PARAM NAME="Platform" VALUE="256">
<PARAM NAME="LocalPath" VALUE=""></OBJECT>
-->
<!--#INCLUDE FILE="_ScriptLibrary/Button.ASP"-->
<SCRIPT LANGUAGE=JavaScript RUNAT=Server>
function _initButton1()
{
Button1.value = 'Button1';
Button1.setStyle(0);
}
function _Button1_ctor()
{
CreateButton('Button1', _initButton1, null);
}
</script>
<% Button1.display %>
<!--METADATA TYPE="DesignerControl" endspan-->
<P> </P>
</BODY>
<% ' VI 6.0 Scripting Object Model Enabled %>
<% EndPageProcessing() %>
</FORM>
</HTML>