Esta herramienta la tengo hace tiempo, gracias a Jim Warrington el creador de los siguientes OCX que permiten a VBS crear y utilizar Formularios!
Empiezo con el "Tutorial" o "Demostracion":
1ro. Descargamos los OCX:
VBS_OCX_FORMS.rar
La contraseña del Rar es "by79137913"
2do. Colocamos los 3 archivos en System32:
Las rutas completas en mi caso serian:
Citar
C:\WINDOWS\system32\wshLWF_FormDesigner.ocx
C:\WINDOWS\system32\wshLWForm.ocx
C:\WINDOWS\system32\wshLtWtForm.ocx
C:\WINDOWS\system32\wshLWForm.ocx
C:\WINDOWS\system32\wshLtWtForm.ocx
3ro. Registramos los OCX:
Lo hacen con Inicio->Ejecutar-> Y escriben "RegSvr32 " La ruta de los OCX.
4to. Creamos el siquiente .VBS :
Nombre del Archivo: FormDesigner.VBS
Código
Dim oLWFD 'as object Dim bCloseClick 'as boolean Set oLWFD = WScript.CreateObject("wshLWF_FormDesigner.ucLWFD", "oLWFD_") oLWFD.DesignForm() bCloseClick = False Do WScript.Sleep 200 Loop Until bCloseClick Set oLWFD = nothing ' clean up WScript.Quit Sub oLWFD_frmCloseClick() MsgBox ("Saliendo del Programa, gracias por testear." & CHR(10) & CHR(13) & "By 79137913") bCloseClick = True End Sub
5to. Guardamos y ejecutamos el Script:
Listo, ya tienen funcionando su Editor de Formularios para VBS!
6to. Datos Extra:
Ahora diseñan el Form que quieran y luego solo tienen que apretar ShowCode para que les genere el codigo del formulario!. Si quieren pueden apretar Test para ver como quedaria (yo recomiendo que no lo presionen por que a veces Crashea)
7mo. Ejemplos:
Si, tambien tengo ejemplos...
Pero no son ejemplos cualquiera... son los Originales que Jim Warrington dejo cuando creo esta herramienta, una obra de arte.
VBSFORMGEN_DemoScripts.rar
La contraseña del Rar es "by79137913"
GRACIAS POR LEER!!!