Scripting.FileSystemObject - x

Es "filesystemobject", segun tengo entendido.



"Ximena" escreveu na mensagem
news:
Mostrar la cita

Hola:
Encontre la funcion para imprimir en el grupo:
Sub Imprimir()
Dim objFSO, objStream
Set objFSO = CreateObject("Scripting.SystemObject")
'CreateObject("Scripting.FileSystemObject")

Set objStream = objFSO.CreateTextFile("LPT1")

objStream.Writeline "Esto es una prueba"
objStream.Writeline "Esto es una prueba"
objStream.Writeline "Esto es una prueba"
objStream.Writeline "Esto es una prueba"
objStream.Writeline chr(12) 'salto de p gina

Set objStream = Nothing

Set objFSO = Nothing
End Sub

Pero cunado se ejecuta me da error:
EL COMPONENTE ACTIVEX NO PUEDE CREAR EL OBJETO:
'Scripting.SystemObject

Que hago????

Gracias
Xime.

Varias cosas:

Primero, como bien te han dicho es filesystemobject (lo que tienes
comentado)

Ahora bien, lo de el componente activex no puede crear el objeto es debido a
la configuracion de seguridad de tu navegador, el cual esta bloqueando el
filesystemobject debido a que se considera un control activex peligroso. Si
quieres usarlo debes de configurar el navegador para que acepte la ejecución
de controles activex peligrosos. Donde en tu navegador peligrosos puede
venir como "no marcados como seguros".

Esto significa que si deseas usar ese codigo debes obligar a todos los
usuarios a cambiarse la seguridad cosa que no van a hacer, o no deberian de
hacer.


Daniel Álvarez




"Ximena" escribió en el mensaje
news:
Mostrar la cita

Hola:
Encontre la funcion para imprimir en el grupo:
Sub Imprimir()
Dim objFSO, objStream
Set objFSO = CreateObject("Scripting.SystemObject")
'CreateObject("Scripting.FileSystemObject")

Set objStream = objFSO.CreateTextFile("LPT1")

objStream.Writeline "Esto es una prueba"
objStream.Writeline "Esto es una prueba"
objStream.Writeline "Esto es una prueba"
objStream.Writeline "Esto es una prueba"
objStream.Writeline chr(12) 'salto de p gina

Set objStream = Nothing

Set objFSO = Nothing
End Sub

Pero cunado se ejecuta me da error:
EL COMPONENTE ACTIVEX NO PUEDE CREAR EL OBJETO:
'Scripting.SystemObject

Que hago????

Gracias
Xime.

Hola,

Efectivamente, si mal no recuerdo existe otra opción donde puedes habilitar
completamente un dominio, sin la necesidad de habilitar a todos...


Saludos,
Jhonny Vargas P. [MS MVP]
Santiago de Chile


"Daniel Álvarez" wrote in message
news:
Mostrar la cita

Varias cosas:

Primero, como bien te han dicho es filesystemobject (lo que tienes
comentado)

Ahora bien, lo de el componente activex no puede crear el objeto es debido

a
Mostrar la cita

la configuracion de seguridad de tu navegador, el cual esta bloqueando el
filesystemobject debido a que se considera un control activex peligroso.

Si
Mostrar la cita

quieres usarlo debes de configurar el navegador para que acepte la

ejecución
Mostrar la cita

de controles activex peligrosos. Donde en tu navegador peligrosos puede
venir como "no marcados como seguros".

Esto significa que si deseas usar ese codigo debes obligar a todos los
usuarios a cambiarse la seguridad cosa que no van a hacer, o no deberian

de
Mostrar la cita

hacer.


Daniel Álvarez




"Ximena" escribió en el mensaje
news:
> Hola:
> Encontre la funcion para imprimir en el grupo:
> Sub Imprimir()
> Dim objFSO, objStream
> Set objFSO = CreateObject("Scripting.SystemObject")
> 'CreateObject("Scripting.FileSystemObject")
>
> Set objStream = objFSO.CreateTextFile("LPT1")
>
> objStream.Writeline "Esto es una prueba"
> objStream.Writeline "Esto es una prueba"
> objStream.Writeline "Esto es una prueba"
> objStream.Writeline "Esto es una prueba"
> objStream.Writeline chr(12) 'salto de p gina
>
> Set objStream = Nothing
>
> Set objFSO = Nothing
> End Sub
>
> Pero cunado se ejecuta me da error:
> EL COMPONENTE ACTIVEX NO PUEDE CREAR EL OBJETO:
> 'Scripting.SystemObject
>
> Que hago????
>
> Gracias
> Xime.

Hola Jhonny,

Si efectivamente, al menos el version 6 del IE existe eso que se llama
Sitios de Confianza, pero aun asi siempre habra alguna persona que no quiera
desactivar esa opcion (logico por otra parte)

Daniel Álvarez




"Jhonny Vargas P. [MVP]" escribió en el
mensaje news:
Mostrar la cita

Hola,

Efectivamente, si mal no recuerdo existe otra opción donde puedes

habilitar
Mostrar la cita

completamente un dominio, sin la necesidad de habilitar a todos...


Saludos,
Jhonny Vargas P. [MS MVP]
Santiago de Chile


"Daniel Álvarez" wrote in message
news:
> Varias cosas:
>
> Primero, como bien te han dicho es filesystemobject (lo que tienes
> comentado)
>
> Ahora bien, lo de el componente activex no puede crear el objeto es

debido
Mostrar la cita

a
> la configuracion de seguridad de tu navegador, el cual esta bloqueando

el
Mostrar la cita

> filesystemobject debido a que se considera un control activex peligroso.
Si
> quieres usarlo debes de configurar el navegador para que acepte la
ejecución
> de controles activex peligrosos. Donde en tu navegador peligrosos puede
> venir como "no marcados como seguros".
>
> Esto significa que si deseas usar ese codigo debes obligar a todos los
> usuarios a cambiarse la seguridad cosa que no van a hacer, o no deberian
de
> hacer.
>
>
> Daniel Álvarez
>
>
>
>
> "Ximena" escribió en el mensaje
> news:
> > Hola:
> > Encontre la funcion para imprimir en el grupo:
> > Sub Imprimir()
> > Dim objFSO, objStream
> > Set objFSO = CreateObject("Scripting.SystemObject")
> > 'CreateObject("Scripting.FileSystemObject")
> >
> > Set objStream = objFSO.CreateTextFile("LPT1")
> >
> > objStream.Writeline "Esto es una prueba"
> > objStream.Writeline "Esto es una prueba"
> > objStream.Writeline "Esto es una prueba"
> > objStream.Writeline "Esto es una prueba"
> > objStream.Writeline chr(12) 'salto de p gina
> >
> > Set objStream = Nothing
> >
> > Set objFSO = Nothing
> > End Sub
> >
> > Pero cunado se ejecuta me da error:
> > EL COMPONENTE ACTIVEX NO PUEDE CREAR EL OBJETO:
> > 'Scripting.SystemObject
> >
> > Que hago????
> >
> > Gracias
> > Xime.
>
>

Ajá!!!... solamente con el IE 6.0...

Bueno algo es algo... ;)


Saludos,
Jhonny Vargas P. [MS MVP]
Santiago de Chile


"Daniel Álvarez" wrote in message
news:
Mostrar la cita

Hola Jhonny,

Si efectivamente, al menos el version 6 del IE existe eso que se llama
Sitios de Confianza, pero aun asi siempre habra alguna persona que no

quiera
Mostrar la cita

desactivar esa opcion (logico por otra parte)

Daniel Álvarez




"Jhonny Vargas P. [MVP]" escribió en el
mensaje news:
> Hola,
>
> Efectivamente, si mal no recuerdo existe otra opción donde puedes
habilitar
> completamente un dominio, sin la necesidad de habilitar a todos...
>
>
> Saludos,
> Jhonny Vargas P. [MS MVP]
> Santiago de Chile
>
>
> "Daniel Álvarez" wrote in message
> news:
> > Varias cosas:
> >
> > Primero, como bien te han dicho es filesystemobject (lo que tienes
> > comentado)
> >
> > Ahora bien, lo de el componente activex no puede crear el objeto es
debido
> a
> > la configuracion de seguridad de tu navegador, el cual esta bloqueando
el
> > filesystemobject debido a que se considera un control activex

peligroso.
Mostrar la cita

> Si
> > quieres usarlo debes de configurar el navegador para que acepte la
> ejecución
> > de controles activex peligrosos. Donde en tu navegador peligrosos

puede
Mostrar la cita

> > venir como "no marcados como seguros".
> >
> > Esto significa que si deseas usar ese codigo debes obligar a todos los
> > usuarios a cambiarse la seguridad cosa que no van a hacer, o no

deberian
Mostrar la cita

> de
> > hacer.
> >
> >
> > Daniel Álvarez
> >
> >
> >
> >
> > "Ximena" escribió en el mensaje
> > news:
> > > Hola:
> > > Encontre la funcion para imprimir en el grupo:
> > > Sub Imprimir()
> > > Dim objFSO, objStream
> > > Set objFSO = CreateObject("Scripting.SystemObject")
> > > 'CreateObject("Scripting.FileSystemObject")
> > >
> > > Set objStream = objFSO.CreateTextFile("LPT1")
> > >
> > > objStream.Writeline "Esto es una prueba"
> > > objStream.Writeline "Esto es una prueba"
> > > objStream.Writeline "Esto es una prueba"
> > > objStream.Writeline "Esto es una prueba"
> > > objStream.Writeline chr(12) 'salto de p gina
> > >
> > > Set objStream = Nothing
> > >
> > > Set objFSO = Nothing
> > > End Sub
> > >
> > > Pero cunado se ejecuta me da error:
> > > EL COMPONENTE ACTIVEX NO PUEDE CREAR EL OBJETO:
> > > 'Scripting.SystemObject
> > >
> > > Que hago????
> > >
> > > Gracias
> > > Xime.
> >
> >
>
>