safebox/web-installer
7
0
Fork 0
Code Issues Pull Requests Packages Projects Releases 30 Wiki Activity

resize
All checks were successful
continuous-integration/drone/push Build is passing
Details

Browse Source
This commit is contained in:
root
2024-08-07 10:54:44 +02:00
parent d69545d36f
commit 2933853cee
1 changed files with 9 additions and 8 deletions
Download Patch File Download Diff File Expand all files Collapse all files

17
windows-installer.hta
View File

@@ -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
<body>
<table>
<tr>
<td>host</td>
<td><input type="text" name="txtHost" value="localhost"/></td>
<td>Hostname:</td>
<td><input type="text" name="txtHost" value="localhost" disabled="disabled"/></td>
</tr>
<tr>
<td>port</td>
<td><input type="text" name="txtPort" value="80" maxlength="5" size="6" /></td>
<td>Webserver port:</td>
<td><input type="text" name="txtPort" value="8080" maxlength="5" size="6" /></td>
</tr>
<tr><td>&nbsp;</td><td>&nbsp;</td></tr>
<tr><td>&nbsp;</td><td><input type="button" value="START" id=btnConfigure /></td></tr>
<tr><td>&nbsp;</td><td><input type="button" value="START INSTALL" id=btnConfigure /></td></tr>
</table>
<br><br>
<div id="output"></div>
</body>
</html>