|
Posted by firstcustomer on 11/02/94 11:40
Hi fellas, another request for help I'm afraid!
I've got a HTML page that has a form. When submitted, the form writes
to an Excel file. The problem is that the user is told that the file
already exists, do they want to overwrite it?
I want it to work without them being prompted (i.e it just overwrites
it without asking). Is this possible?
The HTML/ActiveX code and the Excel code is below:
<!--HTML-->
<HTML>
<HEAD>
<SCRIPT LANGUAGE="JavaScript">
<!-- Begin
function xlWrite(r,c) {
var xlApp, xlSheet;
xlApp = new ActiveXObject("Excel.Application");
xlApp.Visible = true;
xlApp.Workbooks.Open("C:\\xlText.xls");
xlSheet = xlApp.ActiveSheet;
xlSheet.Cells(r,c).Value = frm.txt.value;
xlSheet.SaveCopyAs("C:\\xlText.xls");
xlApp.Quit();
xlApp = null;
setTimeout("CollectGarbage()",1);
}
// End -->
</script>
</HEAD>
<FORM NAME="frm">
<INPUT TYPE="Text" NAME="txt" Value="Some cell text"><BR>
<INPUT TYPE="Button" VALUE="Put in row 1, column 2" ONCLICK="xlWrite
(1,1)">
</FORM>
</HTML>
<!--end HTML-->
Yes, I know it isn't "valid" HTML, but it works fine other than this
problem that isn't caused by the lack of body tags etc.
<!--excel-->
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.DisplayAlerts = False
rowcounter = 2
While Range("a" & rowcounter) <> ""
rowcounter = rowcounter + 1
Wend
Rows("1:1").Copy
Rows(rowcounter).Select
ActiveSheet.Paste
End Sub
<!--end excel-->
Basically, the HTML form writes to a specified cell (A1 in this
example) and then closes Excel. before closing, Excel copies what is in
the top row, to the next empty row, if you get my meaning...
How can I stop it prompting whether to overwrite or not?
TIA, Neil.
[Back to original message]
|