我正在使用TypeLib创建一个用于经典ASP应用程序的GUID.然而,即使是一个简单的测试,例如将GUID写到屏幕上也会给我带来问题 - 它会打印GUID但忽略它之后的所有内容(例如HTML标签,附加单词,任何内容).
这是测试这个的基本代码:
Set typeLib = Server.CreateObject("Scriptlet.TypeLib")
myGuid = typeLib.Guid
Response.Write myGuid & " is the new GUID"
Set typeLib = Nothing
这将显示类似{9DDB27D1-F034-41D7-BB88-D0D811DB91CE}的内容,就是这样; 文本的其余部分将被忽略,并且不会被写出.但是,如果我硬编码该GUID值并从变量引用它,则其余文本看起来很好.我在显示之前尝试过显式转换为String值,但它仍然会发生.
我有一个vbscript脚本,当我自己运行它时,我运行正常.
出于某种原因,当我在任务调度程序下以管理用户身份运行它时,它会运行,但甚至不会写入我的日志文件.它不应该是权限,因为我运行它的用户是adminstrator.
它是一个在Win2008 64位机器上调用32位dll的脚本.
C:\ windows\SysWOW64\cscript.exe Bob.vbs
我还将本地目录设置为我运行它的位置.
具有讽刺意味的是,任务调度程序表示"成功完成"运行任务.
此外,任务调度程序中还有其他脚本运行正常,它只是这个脚本.
有没有人有我可以检查的事项清单？
我之前用ADODB.Stream来读取和写入二进制文件就是这个链接
如何在VBscript中使用ADODB.stream连接二进制文件
它工作正常唯一的问题是在Windows 2003服务器上禁用ADODB.stream,
还有另一种方法我可以在二进制模式下读取3个文件并将它们连接起来或将它们存储在VBscript中的一个文件中
谢谢Jp
我正在尝试转换HTML代码,例如&#XXXX; (其中XXXX是一个数字)使用经典ASP(VBScript)的纯文本.
我正在将文本添加到纯文本格式的电子邮件中,如果我将它们添加为HTML代码,它只显示代码并且不会转换它们.
一个修复方法是将电子邮件更改为HTML,这确实解决了该问题,但随后导致我的电子邮件出现其他问题,我将不会介绍.
是否有内置函数或自定义函数可用于将这些HTML代码转换为纯文本？
我已将C#代码编译成DLL,但对它们几乎没有经验.我的C#代码包含一个HelloWorld带静态方法的类Print().我想在VBScript中使用这个DLL来调用该方法Print().我知道这是基础,但我正在使用它作为一个大规模项目的测试,最终将编译为DLL.声明的内容是什么样的,方法调用看起来如何？
我在FireFox书签的备份中注意到,每个条目左侧显示的图标都作为A标签中的字符流保存.例如:
ICON ="data:image/png; base64,iVBOR [删除数据以缩短示例] rkJggg =="
我有3个BMP文件(2 are 4x20 (249 bytes) and 1 is 102x82 (24.7 KB)),我想在我的HTML应用程序中隐藏,这样他们就不会迷路.
较大的一个在样式标记中出现3次,如下所示(显示1次):
<style type="text/css">
#frmMainBody
{background:grey; background-image:url('Background.bmp'); margin:0;
padding:0; font:normal 10pt Microsoft Sans Serif;}
</style>
另外两个出现在VBScript子例程中,如下所示:
Sub Button_Glow
' Highlights a button when the cursor hovers over it.
With Window.Event.srcElement.Style
If .BackgroundColor <> "Lavender" Then
.BackgroundColor = "Lavender"
.BackgroundImage = "url(Glow.bmp)"
.BackgroundPositionY = -2
.BackgroundRepeat = "Repeat-X"
End If
End With
End Sub 'Button_Glow
这可能吗 ？
目前这是我的脚本
Set oWS = WScript.CreateObject("WScript.Shell")
' Get the %userprofile% in a variable, or else it won't be recognized
userProfile = oWS.ExpandEnvironmentStrings( "%userprofile%" )
我想要做的是抓住当前用户登录,我希望它检查目录D:\"personsuser"\ Appdata\Roaming\Local,看看是否创建了文件夹"Local",如果没有创建我想在vbs中通过createobject创建一个.上面的脚本来自我所知道的抓取当前登录用户,但是我不知道如何使用此变量来创建文件夹.
我知道我必须在这些方面加入一些东西:
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFolder = objFSO.CreateFolder("C:\FSO")
或者沿着这些方向的东西:
Dim objNetwork
Dim userName
Dim FSO
Set FSO = CreateObject("Scripting.FileSystemObject")
Set objNetwork = CreateObject("WScript.Network")
userName = objNetwork.userName
If fso.driveExists("D:\" & userName & "\AppData\Local\") Then
FSO.CreateDirectory ("D:\" & userName & "\AppData\Local\")
End If
提前谢谢,不熟悉VBS,但这是我可以在我正在使用它的环境中操作的唯一平台.
我正在尝试执行这个简单的测试脚本,但是在执行脚本后出现命令shell窗口:
Set objShell = WScript.CreateObject("WScript.Shell")
strCommand = "cmd /C tasklist"
Set objExecObject = objShell.Exec(strCommand)
wscript.echo "Test"
如何防止它出现？
更新
我能够通过此代码更改来改进它:
strCommand = "cmd /C /Q tasklist"
现在窗口只显示一瞬间.但我不希望它出现.