|
Prova con questo vbscript:
<HTML>
<HEAD>
<SCRIPT LANGUAGE=VBScript>
Dim objExcel
Sub Btn1_onclick()
call OpenWorkbook("c:\temp\test.xls")
End Sub
Sub OpenWorkbook(strLocation)
Set objExcel = CreateObject("Excel.Application")
objExcel.Visible = true
objExcel.Workbooks.Open strLocation
objExcel.UserControl = true
End Sub
</SCRIPT>
<TITLE>Launch Excel</Title>
</HEAD>
<BODY>
<P>Click the button to open the Excel Spreadsheet</P>
<INPUT TYPE=BUTTON NAME=Btn1 VALUE="Open Excel File">
</BODY>
</HTML>
__________________
ASUS p55t2p4 + Tag ram - K6-III 400 - 512 Mb ECC - Maxtor 120 GB 8Mb + Promise Ultra 100 TX2 - Radeon 7000 32 Mb ddr TV Out - SB live 5.1- Master. DVD Pioneer 106D - Modem Adsl Michelangelo
|