generar un word con ASP con su cabezera. Gracias
jokkin
22 de Junio del 2005
Hola alguien me pora hechar una mano? necesito crear un documento word mediante asp cosa que ya he consiguido, pero me gustara poder aadir tambin su cabecera y pie de de pgina, y poder cambiar las propiedades del texto, como el color de fondo.
Muchas gracias !!!!!!
Muchas gracias !!!!!!
fernandoc
22 de Junio del 2005
Puedes utilizar lo siguiente :
<script Language="VBScript">
Set ObjetoWord = CreateObject("Word.application")
With ObjetoWord
.Visible = True
.Documents.add
.Selection.Font.ColorIndex = 2
.Selection.Text = "Erase una vez"
End With
</script>
Aunque esta dentro de un script el cdigo es el que utiliza el vbasic para word. La manera mas facil de obtener el cdigo es utilizar la grabadora de word.
Word->ver->barra de herramientas->visual basic. Visto el icono de vb pulsas el botn redondo (inicias la grabacin),
haces las operaciones que quieres realizar con asp, pulsas botn cuadrado (paras grabacion), ves el cdigo que te ha generado, te peleas con el , lo pasa al script (segn el ejemplo), te vuelves a pelear con el y ya esta.
Si el cdigo presenta variables del tipo wdBlue,al pasarlas al script, tienes que sustituirlas por su valor (puedes utilizar un msgbox en vb de word) y etc..
<script Language="VBScript">
Set ObjetoWord = CreateObject("Word.application")
With ObjetoWord
.Visible = True
.Documents.add
.Selection.Font.ColorIndex = 2
.Selection.Text = "Erase una vez"
End With
</script>
Aunque esta dentro de un script el cdigo es el que utiliza el vbasic para word. La manera mas facil de obtener el cdigo es utilizar la grabadora de word.
Word->ver->barra de herramientas->visual basic. Visto el icono de vb pulsas el botn redondo (inicias la grabacin),
haces las operaciones que quieres realizar con asp, pulsas botn cuadrado (paras grabacion), ves el cdigo que te ha generado, te peleas con el , lo pasa al script (segn el ejemplo), te vuelves a pelear con el y ya esta.
Si el cdigo presenta variables del tipo wdBlue,al pasarlas al script, tienes que sustituirlas por su valor (puedes utilizar un msgbox en vb de word) y etc..