HTA–Windows小工具弯曲的边缘

HTA–Windows小工具弯曲的边缘,第1张

概述HTA – Windows小工具弯曲的边缘

我刚刚写了一个windows小工具的基本脚本,安静地运行,直到它认识到一个变化。 我遇到的一个问题是,我想看到小工具,并有弯曲的边缘。 我已经尝试使用删除angular落的一个PNG图像,但它不起作用,它始终显示为一个方形框。 我也尝试通过CSS来做这件事,但我似乎无法弄清楚。

有谁知道如何在HTA / CSS / VBScript中创build弯曲的边缘? 我不确定需要发生什么,它是一个小工具。

非常感谢。

//编辑

如何在windows上编译linux内核代码?

识别C#应用程序使用的本地内存的所有者

这可能吗? “回声。 时间是:%时间/ T%“

如何使git忽略更改情况?

有没有办法在符号链接“内”运行命令行?

以下是整个代码:

<HTML> <head> <Title>Chrome Version Checker</Title> <HTA:APPliCATION APPliCATIONname="Chrome Version Checker" ID="ChromeCheck" VERSION="1.0.0.0" border="thin" bordercomplex" ICON="Chrome_updater_256px.ico" SCRolL="no" SINGLEINSTANCE="yes" CONTEXTMENU="no" NAVIGABLE="yes" SELECTION="no"/> <script language="vbscript"> Dim timerID,CurrentTime Sub Window_OnLoad timerID = window.setInterval("RefreshTime",360000) 'milliseconds RefreshTime End Sub self.Resizeto 190,194 </script> <style type="text/CSS"> body { margin: 0; wIDth: 130px; height: 134px; } span { text-align:center; Font-family: arial; Font-weight: bold; Font-size: 12px; } </style> </head> <body> <table align="center"> <tr> <td> <span>Installed file</span> <br /> <span ID = "Installfile"></span> </td> </tr> <tr> <td colspan="2"> <hr> </td> </tr> <tr> <td> <span>Remote file</span> <br /> <span ID = "Remotefile"></span> </td> </tr> <tr> <td colspan="2"> <br /><span ID = "StatusMSG"></span> </td> </tr> </table> </body> <HTML> <SCRIPT LANGUAGE="VBScript"> Sub RefreshTime set xmlhttp = createobject ("msxml2.xmlhttp.3.0") xmlhttp.open "get","http://en.wikipedia.org/wiki/Google_Chrome",false xmlhttp.send strOutput = split(xmlhttp.responseText,"Stable release</a>")(1) strOutput = split(strOutput," <small>")(0) strOutput = replace(replace(strOutput,vbcr,""),vblf,"") strOutput = split(strOutput,"<p>")(1) Dim file set FSO = CreateObject("Scripting.fileSystemObject") file = FSO.GetFiLeversion("C:Program filesGoogleChromeApplicationChrome.exe") if file = strOutput Then Installfile.INNERHTML = file Remotefile.INNERHTML = strOutput StatusMSG.INNERHTML = "Up to date" document.body.background="tick.png" document.body.style.backgroundposition = "center" document.body.style.backgroundRepeat = "no-repeat" else Installfile.INNERHTML = file Remotefile.INNERHTML = strOutput StatusMSG.INNERHTML = "Not up to date" document.body.background="cross.jpg" ' --------------------------------------- Set xmlDoc = CreateObject("Microsoft.XMLDOM") xmlDoc.load "\s007GlobaliTChromeStandalonesetup.xml" xmlDoc.Async = "False" Set nNode = xmlDoc.selectsinglenode ("//ChromeUpdater/Config/Version") nNode.text = strOutput strResult = xmldoc.save("\s007GlobaliTChromeStandalonesetup.xml") ' --------------------------------------- Dim iURL Dim obJshell iURL = "https://dl.Google.com/tag/s/appguID%3D%7B8A69D345-D564-463C-AFF1-A69D9E530F96%7D%26iID%3D%7B8DD6B5B9-54BE-D8AD-7E05-FBA19DDAA0B0%7D%26lang%3Den%26browser%3D4%26usagestats%3D0%26appname%3DGoogle%2520Chrome%26needsadmin%3Dtrue%26installdataindex%3Ddefaultbrowser/update2/installers/ChromeStandalonesetup.exe" set obJshell = CreateObject("Shell.Application") ' -------------------------- obJshell.ShellExecute "Chrome.exe",iURL,"",1 '--------------------------- Ret = MsgBox("Do you wish to update Now?",VBYesNo,"Update Now") If Ret = 6 then Set obJshell = WScript.CreateObject( "WScript.Shell" ) obJshell.Run("""C:Program filesChrome UpdaterChromeUpdateV2.exe""") Set obJshell = nothing else End If End If End Sub </SCRIPT>

非常感谢

是否有可能使用不同的凭据读取/写入远程计算机的registry?

使用批次更改虚拟内存

发送邮件失败,邮箱不可用

如何访问windowsshell上下文菜单项?

如何将Visual Studio的“输出”窗口redirect到DeBUGVIEw?

这里是我如何使用CSS在HTA中四舍五入的示例。

<HTML> <head> <Title>Rounded Corners</Title> <HTA:APPliCATION APPliCATIONname="Rounded Corners" ID="RestoreHta" VERSION="1.0" border="dialog" bordercomplex" INNERborder="no" SCRolL="no" CONTEXTMENU="no"/> <style type="text/CSS"> .b1f,.b2f,.b3f,.b4f{Font-size:1px; overflow:hidden;display:block;} .b1f {height:1px; background:#ddddbb; margin:0 5px} .b2f {height:1px; background:#ddddbb; margin:0 3px} .b3f {height:1px; background:#ddddbb; margin:0 2px} .b4f {height:2px; background:#ddddbb; margin:0 1px} .cf {background: #ddddbb} .cf div {margin-left: 5px;} #DataOptions { background-color: #ddddbb; wIDth: 100%; padding: 1.1em; } </style> <SCRIPT Language="VBScript"> Sub Window_Onload self.Resizeto 300,300 End Sub </SCRIPT> </head> <body> <b ></b><b ></b><b ></b><b ></b><div ><div> <div ID="DataOptions"> <table wIDth="100%" height="100"> <tr> <td bwIDth="100%"><center>Rounded Corners</center></td> </tr> </table> </div> </div></div><b ></b><b ></b><b ></b><b ></b> </body> </HTML>

总结

以上是内存溢出为你收集整理的HTA – Windows小工具弯曲的边缘全部内容,希望文章能够帮你解决HTA – Windows小工具弯曲的边缘所遇到的程序开发问题。

如果觉得内存溢出网站内容还不错,欢迎将内存溢出网站推荐给程序员好友。

欢迎分享,转载请注明来源:内存溢出

原文地址: http://www.outofmemory.cn/langs/1235319.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2022-06-06
下一篇 2022-06-06

发表评论

登录后才能评论

评论列表(0条)

保存