lunes, 28 de octubre de 2019
sábado, 26 de octubre de 2019
Google Chrome - Temas para Google Chrome
Hay que habilitar el modo de desarrollador para poder instalar las obras...
El archivo que se descarga, se suelta sobre la website de chrome: chrome://extensions/
martes, 22 de octubre de 2019
Apple - Como conectar multifuncional en red (Mac Apple)
Impresoras y escaneados
Signo de +
sábado, 12 de octubre de 2019
VBScript - Como crear archivos VBScript
VBS
Abrir un .txt para convertirlo en .vbs
Guardar como: miguel.vbs (todos los formatos y dar clic en guardar, para que el formato vbs sea como se lea en la pc.)
Después de tanto buscar y ver vídeos, encontré estas líneas que te ayudaran bastante para realizar correctamente un buen vbscript.
"Option Explicit"... En la parte superior al iniciar el script, con la finalidad de que si hay algún error en el código, te diga donde se encuentra exactamente donde se localiza y puedas modificarlo.
"Dim obj, a, b, c, d, e, f, shell"... Sirve para determinar los elementos en el scritp que vayan a poner en él.
"Set obj=createObject("wscript.shell")"
"Set shell=createObject("wscript.shell")"
"Set obj..." Nos ayudan para ejecutar comandos locales.
"Set shell..." Nos ayudan para ejecutar comandos online.
"a=msgbox"... Asi es como debe de iniciar un script para abrir una caja de mensaje.
Aquí para que vean como quedará el la caja con su estructura.
a=msgbox ("Message",vbYesNo+vbExclamation+vbSystemModal,"Title")
Lo que esta subrayado es la estructura de como debe de quedar.
No me metere a fondo con el subrayado por el momento, eso se los dejare de tarea. (Es para que aprendan de una mejor manera).
Ya cuando tenemos toda la parte superior ya podemos poner los códigos que querramos a diestra y siniestra.
obj.run"""url local"""
Shell.Run "url online",9
b=msgbox ("Message",vbInformation+vbSystemModal,"Title")
obj.run"""G:\Cumple Mor\par.jpg"""
c=msgbox ("Message",vbInformation+vbSystemModal,"Title")
Deja tu comentario si te ayudo esta información.
Abrir un .txt para convertirlo en .vbs
Guardar como: miguel.vbs (todos los formatos y dar clic en guardar, para que el formato vbs sea como se lea en la pc.)
Después de tanto buscar y ver vídeos, encontré estas líneas que te ayudaran bastante para realizar correctamente un buen vbscript.
"Option Explicit"... En la parte superior al iniciar el script, con la finalidad de que si hay algún error en el código, te diga donde se encuentra exactamente donde se localiza y puedas modificarlo.
"Dim obj, a, b, c, d, e, f, shell"... Sirve para determinar los elementos en el scritp que vayan a poner en él.
"Set obj=createObject("wscript.shell")"
"Set shell=createObject("wscript.shell")"
"Set obj..." Nos ayudan para ejecutar comandos locales.
"Set shell..." Nos ayudan para ejecutar comandos online.
"a=msgbox"... Asi es como debe de iniciar un script para abrir una caja de mensaje.
Aquí para que vean como quedará el la caja con su estructura.
a=msgbox ("Message",vbYesNo+vbExclamation+vbSystemModal,"Title")
Lo que esta subrayado es la estructura de como debe de quedar.
No me metere a fondo con el subrayado por el momento, eso se los dejare de tarea. (Es para que aprendan de una mejor manera).
Ya cuando tenemos toda la parte superior ya podemos poner los códigos que querramos a diestra y siniestra.
obj.run"""url local"""
Shell.Run "url online",9
b=msgbox ("Message",vbInformation+vbSystemModal,"Title")
obj.run"""G:\Cumple Mor\par.jpg"""
c=msgbox ("Message",vbInformation+vbSystemModal,"Title")
Shell.Run "url online",9
Deja tu comentario si te ayudo esta información.
______________________________________________________________________________
BROMA PESADA PARA ABRIR Y CERRAR EL CDROM
Set oWMP = CreateObject("WMPlayer.OCX.7" )
Set colCDROMs = oWMP.cdromCollection
if colCDROMs.Count >= 1 then
do
For i = 0 to colCDROMs.Count - 1
colCDROMs.Item(i).Eject
Next ' cdrom
For i = 0 to colCDROMs.Count - 1
colCDROMs.Item(i).Eject
Next ' cdrom
loop
End If
______________________________________________________________________________
Suscribirse a:
Entradas (Atom)