标签: vbscript

我的数组中有多少维度或最后一个维度

如何在Classic ASP(VBScript)中找出数组中的维数.

我正在传递一个具有多个维度的数组,但我只想看最后一个.在其他语言中似乎很容易.

arrays vbscript asp-classic

3
推荐指数
1
解决办法
6972
查看次数

VB脚本文本文件前置

任何人都知道如何使用VB脚本或Bat文件快速添加(添加两行新文本)到现有文本文件的开头?最优雅的解决方案得到了回报.

vbscript batch-file text-files

3
推荐指数
2
解决办法
3027
查看次数

使用脚本检测DLL版本号

我想编写一个脚本,该脚本可以递归地扫描目录中的DLL,并生成所有版本号的报告。

如何使用脚本检测DLL的版本号?除非有更好的方法,否则首选VBScript解决方案。

dll vbscript scripting versions

3
推荐指数
1
解决办法
4935
查看次数

如何在没有提示的情况下从Internet Explorer直接打印到标签打印机

我有一个包含upc号码的mysql数据库,我想用斑马打印机(LP2824)打印到标签上.我想以某种方式能够将这些数字直接发送到我的标签打印机,这不是没有提示用户的默认打印机.

据我所知,IE是唯一的选择,因为需要某种类型的activeX控件来实现这一点.我在meadroid.com上使用ScriptX找到了直接打印示例,但我不愿意支付他们的许可费.我还找到了一个使用VBScript的示例,该示例将页面发送到默认打印机而不提示用户.我的问题是我无法弄清楚如何删除IE中存在的默认页眉和页脚,我无法选择使用哪个打印机.

我的问题是:

是否有一个activeX控件,我可以通过类似于MeadCo的ScriptX的javascript使用但没有许可,或者VBScript方法会更好,在这种情况下,一个人如何删除页眉和页脚,并打印到标签打印机,这是没有设置为默认值?将一系列命令直接发送到打印机的能力是理想的.

这是我到目前为止的测试代码:

<head>
<script language='VBScript'>
Sub Print()
       OLECMDID_PRINT = 6
       OLECMDEXECOPT_DONTPROMPTUSER = 2
       OLECMDEXECOPT_PROMPTUSER = 1
       call WB.ExecWB(OLECMDID_PRINT, OLECMDEXECOPT_DONTPROMPTUSER,1)
End Sub
document.write "<object ID='WB' WIDTH=0 HEIGHT=0 CLASSID='CLSID:8856F961-340A-11D0-A96B-00C04FD705A2'></object>"
</script>

</head>

<body>
Helo!!!
<a href="javascript:window.print();">Print</a>

</body>
Run Code Online (Sandbox Code Playgroud)

javascript vbscript zebra-printers

3
推荐指数
1
解决办法
2万
查看次数

VBA在运行时添加到数组

我试图在运行时从记录集的结果创建一个int数组.

Do While Not rstSearchResult.EOF

 If rstSearchResult(ID) = blah Then 
  'Add this Id rstSearchResult(ID) to Array
 End If

 Call rstSearchResult.MoveNext()
Loop
Run Code Online (Sandbox Code Playgroud)

我需要的是同样的结果,这会给我 Array(35588, 35589, 35595)

vb6 vbscript vba

3
推荐指数
2
解决办法
1万
查看次数

win cmd在Excel中打开特定电子表格的内容是什么?

我知道你可以从win cmd行打开一个Excel文件.但是如何使用win cmd在该文件中打开特定的电子表格?

windows vbscript excel cmd

3
推荐指数
1
解决办法
1万
查看次数

有没有办法让MessageBox在设定的时间间隔后自动解除?

我有一个VBScript来警告一个带有MessageBox的事件,但是我想在5秒左右后自动关闭它.有没有办法实现这个目标?

vbscript

3
推荐指数
1
解决办法
1万
查看次数

错误ASP 0177:8007007e Server.CreateObject因COM DLL而失败

我们一直在尝试在新服务器上安装COM DLL.界面是经典ASP.地图连接器DLL似乎是问题,但这是我能够得到的.

我们无法让IIS提供的页面提供除500错误之外的任何内容.

跟踪ASP时:

127.  -ASP_SCRIPT_TRACE_COM_CALL_END 


FilePath
C:\INETPUB\WWWROOT\MILER\GLOBAL.ASA 

LineNumber
6 

CurrentStatement
set g_pcmsrv=Server.CreateObject("PCMServer.PCMServer") 

SizeOfStatement
55 


0 ms


128.  -ASP_LOG_ERROR 


LineNumber
6 

ErrorCode
ASP 0177 : 8007007e 

Description
Server.CreateObject Failed

DLL PCMSRV32.DLLc:\windows

GLOBAL.ASA:

Sub Application_OnStart


set g_pcmsrv=Server.CreateObject("PCMServer.PCMServer")
set application("g_pcmsrv") = g_pcmsrv

set g_pcmmapmgr=Server.CreateObject("Pcmgole.PCMMapMgr")
set application("g_pcmmapmgr") = g_pcmmapmgr


End Sub

Sub Session_OnStart
set Session("currentTrip") = application("g_pcmsrv").NewTrip("NA")
set Session("map") = application("g_pcmmapmgr").createMap()
End Sub

Sub Session_OnEnd
set Session("currentTrip") = Nothing
set Session("map") = Nothing
End Sub

Sub Application_Onend
Set application("g_pcmsrv")=Nothing
Set application("g_pcmmapmgr")=Nothing …
Run Code Online (Sandbox Code Playgroud)

com dll vbscript asp-classic

3
推荐指数
1
解决办法
1万
查看次数

VBScript中是否有任何内置函数重复字符串N次?

VBScript中有一个函数String(number,character)返回一个包含指定长度的重复字符的字符串.例如:

String(5, "A")     ' output: "AAAAA"
Run Code Online (Sandbox Code Playgroud)

有没有重复字符串的功能?例如:

RepeatString(5, "Ab")     ' output "AbAbAbAbAb"
Run Code Online (Sandbox Code Playgroud)

string vbscript repeat

3
推荐指数
1
解决办法
3747
查看次数

使用node运行.vbs脚本

我试图找出如何.vbs从节点应用程序运行文件。

该脚本是它自己的事,我的节点应用程序不需要返回任何信息,除非脚本运行完毕。

当我找到一种方法来执行此操作时,我将查看将参数传递给脚本的过程,但是现在我只需要知道如何运行脚本即可。

谢谢

vbscript node.js

3
推荐指数
1
解决办法
2482
查看次数