vbscript 相关问题

VBScript（Visual Basic Scripting Edition）是Microsoft开发的一种解释型脚本语言，它使用Visual Basic建模。 VBScript与VBA或VB.NET不同。它们是三种不同的东西，所以使用正确的标签。

如何在 vbscript 中更改 sapi 语音音高？

我正在尝试使用 sapi 用 vbs 重新创建雏菊铃，但是这首歌的一部分令人不舒服：黄色.比率 = 6 黄色。说“给予”。耶...

vbscript sapi

回答 1 投票 0

修改GIF文件夹预览脚本

也许这里有人可以帮我修改这个脚本吗？我希望文件名位于 gif 下方，并且文本大小稍小一些，以便更多的 gif 可以出现在一行中。 <p>也许这里有人可以帮我修改这个脚本吗？我希望文件名位于 gif 下方，并且文本大小稍小一些，以便更多的 gif 可以出现在一行中。</p> <pre><code><script type="text/vbs"> set fso=CreateObject("Scripting.FileSystemObject") set fldr=fso.GetFolder(".") for each file in fldr.files if lcase(right(file.name,4))=".gif" then document.write "<img src=""" & file.name & """>" document.write file.name & "&#160;&#160;&#160;&#160;&#160;&#160;" end if next </script> </code></pre> </question> <answer tick="false" vote="0"> <p>如评论中所述，您可以使用一些应用于 Div 的 CSS 并创建一个类来设置图像大小。大小可以指定为任何所需的单位。这里使用 Ems 是因为在设置不同缩放值的显示器上尺寸保持相当恒定。这是 HTA 代码：</p> <p><strong>GIFshow.hta</strong></p> <pre><code><!DOCTYPE html> <html> <head> <meta http-equiv="x-ua-compatible" content="IE=10"> <script language="VBScript"> Set oFSO = CreateObject("Scripting.FileSystemObject") Set oFolder = oFSO.GetFolder(".") For Each oFile In oFolder.Files If LCase(oFSO.GetExtensionName(oFile.Name)) = "gif" Then document.write "<div class=""image-container"">" document.write "<img class=""image"" src=""" & oFile.Name & """ alt=""" & oFile.Name & """>" document.write "<br>" & oFile.Name document.write "</div>" End If Next </script> <style> .image-container { display: inline-block; text-align: center; } .image { width: 10em; height: 10em; } </style> </head> <body> </body> </html> </code></pre> </answer> </body></html>

vbscript hta

回答 0 投票 0

制造假病毒的最佳语言

我不知道为什么，但我喜欢假病毒，我想制作一个，但我不知道最好的语言是什么。我尝试了批处理、python、vbscript 等，但遇到了很多问题。我的目标是贝莱...

python batch-file vbscript

回答 1 投票 0

在 Office 365 中将签名保存在用户帐户上，而不是设备上

这个问题超出了我的想象，我实际上正在查看页面上漂亮的字母、数字和符号。我们使用了 Visual Basic 脚本来应用和更新我们的电子邮件签名

outlook vbscript office365

回答 2 投票 0

如何使用vbscript读取注册表项的所有值？

我的注册表中有以下值钥匙： HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Internet Settings\Accepted Documents\ 价值观： * -> 应用程序/msword ** -> 应用程序/v...