Open Excel File

tianung · Jul 4, 2009

I have the following vbscript (living on my PC desktop) that I use to
open an Excel file stored on the web:

Dim xlApp
Set xlApp = CreateObject("Excel.Application")
xlApp.DisplayAlerts = False
On Error Resume Next
Set oWorkbook = xlApp.Workbooks.Open("http://xxxxx.com/
myworkbook.xls")
If Err.Number <> 0 Then
WScript.Quit
End If
xlApp.Visible = True
oWorkbook.Activate

I would like to put this vbscript on the web so other people can use
it. Ideally, I want to give them an "http://...." address that they
can navigate to, and when they do, the vbscript living in this http
location would automatically activate and open the Excel file on their
local PC's (in Excel itself and not embedded in IE). I have little
experience with ASP and HTML (but know a fair bit of Excel VBA), and
would appreciate the complete HTML / ASP code that would incorporate
the above vbscript to achieve this purpose.

Thanks for your help.

AP

Adrienne Boswell · Jul 4, 2009

Gazing into my crystal ball I observed tianung <[email protected]>
writing in @o18g2000pra.googlegroups.com:

I have the following vbscript (living on my PC desktop) that I use to
open an Excel file stored on the web:

Dim xlApp
Set xlApp = CreateObject("Excel.Application")
xlApp.DisplayAlerts = False
On Error Resume Next
Set oWorkbook = xlApp.Workbooks.Open("http://xxxxx.com/
myworkbook.xls")
If Err.Number <> 0 Then
WScript.Quit
End If
xlApp.Visible = True
oWorkbook.Activate

I would like to put this vbscript on the web so other people can use
it. Ideally, I want to give them an "http://...." address that they
can navigate to, and when they do, the vbscript living in this http
location would automatically activate and open the Excel file on their
local PC's (in Excel itself and not embedded in IE). I have little
experience with ASP and HTML (but know a fair bit of Excel VBA), and
would appreciate the complete HTML / ASP code that would incorporate
the above vbscript to achieve this purpose.

Thanks for your help.

AP

You need to set the application type in the header. Make sure you put
this BEFORE anything else.

response.contenttype = "application/vnd.ms-excel"
'rest of your script

Now, as to how the file opens is up to the user. If the user has
explicitly set excel files to open in the browser, then they will.
There is nothing you can do about that. What I would suggest, however,
is warn the user first that it's an excel file, something like:

<a href="myexcelfile.asp" type="application/vnd.ms-excel" title="Excel
spreadsheet">Download Excel spreadsheet</a>

tianung · Jul 5, 2009

You need to set the application type in the header. Make sure you put
this BEFORE anything else.

response.contenttype = "application/vnd.ms-excel"
'rest of your script

Thanks Adrienne. When I said I have limited experience, I mean I've
never written a single html/asp script before !

Do I simply
write this and save as <some filename>.html at the "http:// ..."
location ? (Please bear with my total ignorance)

------

<html>
<body>

<%
response.contenttype = "application/vnd.ms-excel"
Dim xlApp
Set xlApp = CreateObject("Excel.Application")
xlApp.DisplayAlerts = False
On Error Resume Next
Set oWorkbook = xlApp.Workbooks.Open("http://xxxxx.com/
myworkbook.xls")
If Err.Number <> 0 Then
WScript.Quit
End If
xlApp.Visible = True
oWorkbook.Activate
%>

</body>
</html>

Collect Excel Data from Website	5	Apr 30, 2022
How to add data into exisitng Excel file at next open row?	2	Dec 3, 2010
unable to open Excel file	6	Dec 29, 2008
Open Excel File with ASP	8	Mar 27, 2006
Using ruby to open an Excel file on a mac	5	Jul 8, 2009
PYTHON + EXCEL	0	Nov 14, 2006
From an ASP page, is there a way write to an EXCEL file without having EXCEL installed on the IIS ma	6	Apr 25, 2009
Open Excel file as read only	3	Nov 14, 2008

Open Excel File

tianung

Adrienne Boswell

tianung

Ask a Question

Similar Threads

Members online

Forum statistics

Latest Threads