ichhh, Essa eu nao sei nem como te ajudar.
--- Sueli Ishimatsu <sueli@...>
escreveu: > Querido povo... sera q alguem pode me
ajudar
> denovo?!!! Esse JScript.. funciona em uma pagina
> HTML normal. Quando eu chamo dentro do xsl soh
> funciona até a linha do alert... ... to sem saber o
> q fazer.. sera problema do tomcat?????
>
> Agradeço se me derem uma luzzzzzz
>
> valeu
>
> (segue o Jscript ...)
>
> <script LANGUAGE="JScript">
>
> function AutomateExcel()
>
> {
>
> window.alert("entroooooooooooooo");
>
> var oXL = new ActiveXObject("Excel.Application");
>
> oXL.Visible = true;
>
> var oWB = oXL.Workbooks.Add();
>
> var oSheet = oWB.ActiveSheet;
>
> oSheet.Cells(1, 1).Value = "Data";
>
> oSheet.Cells(1, 2).Value = "Temperatura Minima";
>
> oSheet.Cells(1, 3).Value = "Temperatura Media";
>
> oSheet.Cells(1, 4).Value = "Temperatura Maxima";
>
> oSheet.Range("A1", "D1").Font.Bold = true;
>
> oSheet.Range("A1", "D1").VerticalAlignment = -4108;
>
> oSheet.Range("A2", "D6").Value = CreateTempArray();
>
> oRng = oSheet.Range("A2", "A5");
>
> oRng.Format
>
> oRng = oSheet.Range("A1", "D1");
>
> oRng.EntireColumn.AutoFit();
>
> DispalyQuarterlySales(oXL);
>
> oXL.Visible = true;
>
> oXL.UserControl = true;
>
> }
>
> function DispalyQuarterlySales(oXL)
>
> {
>
> oXL.ActiveSheet.Range("A1:B5").Select;
>
> oXL.Charts.Add;
>
> oXL.ActiveChart.ChartType = 4;
>
> oXL.ActiveChart.BarShape =3;
>
> }
>
> </script>
>
> Sueli Ishimatsu
> Fábrica de Software
> PTI - Parque Tecnológico ITAIPU
> sueli@...
> Cel: +55 45 9967-6483 Com: +55 45 575-2737
> Rua Tarquínio Joslin dos Santos, 1300 - Foz do
> Iguaçu - CEP: 85.870-650
>
>
______________________________________________________________________
Yahoo! Mail - O melhor e-mail do Brasil! Abra sua conta agora:
http://br.yahoo.com/info/mail.html
|