My new export code is
<%
Dim RS, SQL, Conn, myDSN
myDSN="dsn=Wagner MySQL;DRIVER={MySQL ODBC 3.51 Driver};UID=root;PWD=password; option=3"
set conn=server.createobject("adodb.connection")
conn.open myDSN
SQL =Request.form("exportQuery")
Set RS = Conn.Execute(Request.form("exportQuery"))
Dim F, Head
For Each F In RS.Fields
Head = Head & ", " & F.Name
Next
Head = Mid(Head,3) & vbCrLf
call Response.AddHeader("Content-Disposition", "attachment;filename=exportdata.csv")
Response.ContentType = "application/download"
Response.Write Head
Response.Write RS.GetString(,,", ",vbCrLf,"")
conn.close
set conn=nothing
%>
and the new form code looks like this
<%
myvar="SELECT dist, dps FROM district WHERE (DPS = '::DPS::')"
%>
<form method="POST" action="csv_export.asp">
<p align="center" style="margin-top: 0px; margin-bottom: 0px">
<input type="submit" value="Mt. Prospect to Excel" name="B1" style="color: #0000FF; font-size: 8pt; border: 1px solid #0000FF; background-color: #FFFFFF; float:left"></p>
<p align="center" style="margin-top: 0px; margin-bottom: 0px">
<textarea rows="2" name="S1" cols="20"><%=myvar%></textarea></p>
<input type="hidden" name="exportquery" value="<%=myvar%>">
</form>
i still get eof / bof errors though. I cant figure out why?