From 2933853cee6521690376299d19b3abb115c4a5fa Mon Sep 17 00:00:00 2001 From: root Date: Wed, 7 Aug 2024 10:54:44 +0200 Subject: [PATCH] resize --- windows-installer.hta | 17 +++++++++-------- 1 file changed, 9 insertions(+), 8 deletions(-) diff --git a/windows-installer.hta b/windows-installer.hta index 4f99701..73c0d3c 100644 --- a/windows-installer.hta +++ b/windows-installer.hta @@ -31,8 +31,8 @@ Set objShell = CreateObject("WScript.Shell") Sub Window_OnLoad Dim X, Y, strComputer, objWMIService, colItems, objItem, intHorizontal, strYear, wcRegPath - X=500 - Y=420 + X=1024 + Y=768 window.resizeTo X,Y ' resize the HTA strComputer = "." @@ -70,7 +70,7 @@ Sub btnConfigure_OnClick Exit Sub End If If txtPort.value="" Then - MsgBox "Please enter port number",16,"ERROR" + MsgBox "Please enter webserver port number",16,"ERROR" txtPort.focus Exit Sub End If @@ -229,16 +229,17 @@ End Sub - - + + - - + + - +
hostHostname:
portWebserver port:
  
 
 
+