个人中心
文章发布
退出
作者热门文章
- c - 在位数组中找到第一个零
- linux - Unix 显示有关匹配两种模式之一的文件的信息
- 正则表达式替换多个文件
- linux - 隐藏来自 xtrace 的命令
25
4
无论 HTA 大小的屏幕分辨率如何，我如何使 HTA 窗口居中以使其位于屏幕中央我有这个:
</head>
<script>
Sub DoResize 'Do not use Window_Onload
window.resizeTo 800,600
strComputer = "."
Set objWMIService = GetObject("Winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * From Win32_DesktopMonitor")
For Each objItem in colItems
intHorizontal = objItem.ScreenWidth
intVertical = objItem.ScreenHeight
Next
intLeft = (intHorizontal - 800) / 2
intTop = (intVertical - 600) / 2
window.moveTo intLeft, intTop
End Sub
DoResize() 'Run the subroutine to position the containing window (your HTA dialog) before the body is rendered.
</script>
<body>
但如果我更改屏幕分辨率，它就不起作用，并且会调整 HTA 窗口的大小。
问题:无论屏幕分辨率的 HTA 大小如何，如何将 HTA 移动到屏幕中心。
最佳答案
为此使用 WMI 有点矫枉过正。您可以使用 screen对象代替:
window.resizeTo (800, 600);
window.moveTo((screen.width - 800) / 2, (screen.height - 600) / 2);
如果你想在开始时调整窗口大小，将上面的行放在 (JS) script 中head 中的标签部分，甚至在 <hta: application> 之前标记，或在事件处理程序中或任何需要的地方使用代码。
如果你想将任务栏的高度排除在居中区域之外，你可以使用screen.availHeight而不是 screen.height .
关于html - 使 hta 窗口居中，我们在Stack Overflow上找到一个类似的问题： https://stackoverflow.com/questions/22301262/
25
4
0
我有一个运行良好的 HTA 文件，但我的问题是我希望在文件运行时隐藏 HTA 控制台。 这是我的代码: var myVar = setInterval(function(){ myTimer() }
我写了一个 HTML 应用程序(hta 文件)，想知道是否有办法将图标文件嵌入到 hta 文件本身中。 我见过包含嵌入式图形文件的 html 电子邮件，有没有办法用 html 应用程序和图标来做到这一
我有一个 HTA，我总是希望它具有相同的尺寸。我已经通过使用 注意 - 如果您想允许用户滚动，请将 SCROLL 字符串从 NO 更改为 >是 关于hta - 防止 HTA 窗口调整大小，我们在St
有什么方法可以更改 HTA 应用程序的大小吗？ 谢谢 最佳答案 window.resizeTo(300,290); 关于hta - 更改 HTA 应用程序窗口大小，我们在Stack Ove
我正在尝试创建一个允许用户将数据添加到文本文件的 HTA 文件。我在该领域相当缺乏经验。 我需要完成一些事情: 将输入的数据写入文本文件(我的代码就是这样做的) 让用户从可用文件的下拉列表中选择要写入
全新的 HTA。我有 HTML 页面，允许用户为我们的一个应用程序提交密码请求。在机器升级到 Windows 10 之前一切正常，我不再有权获取对象电子邮件和用户帐户。好消息，如果我将文件另存为 HT
我想构建一个可以像 Web 浏览器一样加载 Web 的应用程序。但我希望它看起来像应用程序或像 .exe。当我双击时，它将运行应用程序并加载网络。 我的目标是: 应用程序加载全屏。 有否 工具栏、地址
我有两个选择下拉菜单。当我从第一个下拉列表中选择时，第二个下拉列表中的条目应该更改。此功能在浏览器中运行良好，但在 HTA(HTML 应用程序)中运行不正常 我的代码 function chan
如何最小化窗口？ 我正在制作 HTA 应用程序，我想用我的自定义标题栏替换窗口标题栏。我已通过 HTA 的“caption=no”选项禁用了它，并放置了我自己的最小化/最大化/关闭按钮。 我找到了两种
我想获取当前用户的用户名，然后在我的应用程序名称中创建一个链接 链接看起来像 http://localhost/?id=username 我试过了 Dim objNetworkSet objNetwo
批处理文件中的以下代码通过 HTA 对话框从用户处获取密码。它工作正常。我想传递一个变量值 !user[%%a]!显示在弹出的 HTA 对话框中，这样我就可以看到输入用户 ID 的密码:“BATCH
我有一个 HTML 应用程序，我想保留在所有窗口的顶部(也就是说，如果打开/切换到另一个窗口，我希望这个窗口覆盖它)。 JavaScript 解决方案在 Windows 7/IE9 模式下不起作用(不
我有一个 JavaScript 函数，它首先获取标签元素的值，该元素是数据库条目的 ID。然后，这些 ID 被发送到 ASP 页面，该页面从数据库中获取图像保存位置。 然后将每个选定图像的保存位置信息
在我创建的几个 .HTA 脚本中，我需要 VBScript WScript.Sleep 命令，它只是等待几毫秒而不使用 CPU。当我浏览网页时，似乎我不是唯一一个在寻找这个的人: https://ww
是否可以向 hta 添加自定义图标？我的意思是更改默认的 hta 文件图标，即“系统应用程序图标”。可以在不为扩展分配新图标并且不使用文件快捷方式的情况下完成吗？像这样 最佳答案 WinRAR 可以帮
每次当我尝试使用 vbscript 在 hta 文件中添加 javascript 时，当我单击提交按钮时，都会出现一条错误消息: object doesn't support this propert
第一次发帖，网站的长期读者。我搜索了整个 Internet，找不到可行的解决方案，而且我尝试了很多重写，但无法修复它。 我为工作编写 HTA 文件。通常是部门特定的笔记工具，使他们的工作更轻松。除了复
所以我尝试为我的 .bat 文件使用 ScriptGUI(来自 here)，但它没有文件选择器，所以我尝试添加一个。 我只是复制并重命名了一些代码，它似乎可以工作，除了为子函数添加另一个变量。
我的任务是创建几个数据库供办公室本地使用，一个用于记录病假电话，另一个用于记录员工出租车。 我无法在将用于开发应用程序的机器或将使用该应用程序的机器上安装新软件，因此不幸的是没有基于 xAMP 的应用
我有一个主要用 VBScript 编写的 HTML 应用程序。 应用程序每 10 分钟刷新一次，刷新的一部分是正在重新定位的窗口。但是，我不想通过重新定位窗口并使其在当前窗口前弹出(赋予它焦点)来打扰
我是一名优秀的程序员,十分优秀！