mailto:email@domain.com?subject=TestForm&body=see+RequestExcel.FDF&attachment=HoldFDF+FlatForm.PDF&attachment=HoldPDF

So I've got my javascript array (var seatsArray = [];), let's say it has some contents. I want to write the contents of that array to a .txt file on the server when the user clicks a button. The text file will not already exist so it needs to be created.

Also, if anyone knows how I could allow the user to specify the name of the text file to be created by typing it in a text area, that would be great.

Any ideas?

Many thanks John

EDIT:

Added the suggested code, however, nothing happens when I hit save?

<form id="my_form" action="">
<input type="text" id="file_name" rows="1" cols="20">
<a href="javascript: SubmitForm()">Save</a>
</form>

<script type="text/javascript">
function submitform();
{
var d = seatsArray.join();
var url = "/txtfiles/"+d + "&file_name=" + 
document.getElementById("file_name").value;

document.getElementById("my_form").action = url;
document.getElementById("my_form").method = "POST";
document.getElementById("my_form").submit();
}
</script>

That is all in the body section.

Thanks

//Semi Troll Post :/

*Decided 2 take a different route and run a VBA macro in outlook...
*ALready can auto save .XFDF [.xml] (designated form field data) into designated folder in outlook.
*End goal iz to run a macro to load XFDF data into pre-made excel file

//

Code i have right now will load pre made .xls file if excel is already running....however it would be much more ideal 2 get code to open&load designated .xls file even if an instance of excel is not currently running

CoDE\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/

Sub WorkOnAWorkbook()

Dim oXL As Excel.Application

Dim oWB As Excel.Workbook

Dim oSheet As Excel.Worksheet

Dim oRng As Excel.Range

Dim ExcelWasNotRunning As Boolean

Dim WorkbookToWorkOn As String

'specify the workbook to work on

WorkbookToWorkOn = "C:\Users\House\Desktop\XXX Test Forms\TestForms\XXX.xls"

'If Excel is running, get a handle on it; otherwise start a new instance of Excel

On Error Resume Next

Set oXL = GetObject(, "Excel.Application")

If Err Then

   ExcelWasNotRunning = True

   Set oXL = New Excel.Application

End If

On Error GoTo Err_Handler

'If you want Excel to be visible, you could add the line: oXL.Visible = True here; but your code will run faster if you don't make it visible

'Open the workbook

Set oWB = oXL.Workbooks.Open(FileName:=WorkbookToWorkOn)

'Process each of the spreadsheets in the workbook

For Each oSheet In oXL.ActiveWorkbook.Worksheets

   'put guts of your code here

   'get next sheet

Next oSheet

If ExcelWasNotRunning Then

  oXL.Quit

End If

'Make sure you release object references.

Set oRng = Nothing

Set oSheet = Nothing

Set oWB = Nothing

Set oXL = Nothing

'quit

Exit Sub

Err_Handler:

   MsgBox WorkbookToWorkOn & " caused a problem. " & Err.Description, vbCritical, _

           "Error: " & Err.Number

   If ExcelWasNotRunning Then

       oXL.Quit

   End If

End Sub

Sub Test()

   MsgBox ("Hello world *****!!!!")

End Sub

Sub GenerateExcel()

Dim Wb As String

    Dim wbPath As String

     'Create variable to instantiate a new Excel instance

    Dim xl As New Excel.Application

     'hide stuff from user

    Application.ScreenUpdating = False

     'capture the new workbook's name & path

    Wb = ActiveWorkbook.Name

    wbPath = Workbooks(Wb).Path

     'Close the new workbook before it becomes visible

    Workbooks(Wb).Close False

     'Open the workbook in the new instance of Excel and set visible

     'If the workbook doesn't exist (a new workbook) then

     'create a new one in the new Excel instance

    On Error Resume Next

    xl.Workbooks.Open wbPath & "\" & Wb

    If Err.Number > 0 Then

        Err.Clear

        xl.Workbooks.Add

    End If

    xl.Visible = True

     'Discard the object variable and unhide from user

    Set xl = Nothing

    Application.ScreenUpdating = True

End Sub