标签: vbscript

如何在VBScript中逐行读取CSV文件

我正在使用ASP页面,我必须读取CSV文件并将其插入到DB表"Employee"中.我正在创建一个TestReader的对象.如何编写一个循环来执行最多正在读取的CSV文件的行数/记录数?

csv vbscript asp-classic

9
推荐指数
2
解决办法
4万
查看次数

ASP/VBScript"陷入困境"

我支持/增强了用Classic ASP/VBScript编写的Web应用程序.自从我使用日常生产能力以来已经过去了大约10年.我刚刚遇到了一个我认为是"陷阱"的问题,并且想知道其他人是否有类似我应该学会了解的事情.

我的问题:
我必须将SQL表中的列从float转换为decimal.事实证明,十进制不是vbscript中真正支持(或支持得很好)的类型.所以下面的代码:

Dim var1, var2

var1 = rs("DecimalField1").Value
var2 = rs("DecimalField2").Value

If (var1 <> var2) Then
    'Do Something'
End If
Run Code Online (Sandbox Code Playgroud)

会在线路上出现类型不匹配错误:

If (var1 <> var2) Then
Run Code Online (Sandbox Code Playgroud)

经过多次搜索,我发现:

var1 = CDBL(rs("DecimalField1").Value)
var2 = CDBL(rs("DecimalField2").Value)
Run Code Online (Sandbox Code Playgroud)

解决了这个问题.但这似乎并不是一个显而易见的事情,我花了一段时间才弄清楚为什么我在那条线上遇到类型不匹配.

所以我对每个人的问题是,你遇到过这样的其他小问题吗?ASP/vbscript中有哪些东西你会被认为是"陷阱",我应该注意什么?

vbscript decimal asp-classic

9
推荐指数
3
解决办法
2216
查看次数

使用Javascript下载文件

有这个Excel文件,我希望用户能够从我的服务器下载.单击"下载"按钮后,必须有一种简单的方法来启动文件下载...但我不知道如何实现这一点.

到目前为止我有这个:(VBscript和ASP)

<head>
<script type="text/javascript" src="overzicht.js"></script>
</head>

Set fs=Server.CreateObject("Scripting.FileSystemObject")

    if (fs.FileExists("c:\file.xls"))=true then   'fake filename D:
        response.write("<input type='button' value='Download Masterfile' class='button' onclick='exportmasterfile();' /><br />")
    else
        response.write("Masterfile not found. <br />")
    end if

    set fs=nothing
Run Code Online (Sandbox Code Playgroud)

javascript函数为空.

javascript vbscript asp-classic

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

如何在经典ASP上进行参数化SQL查询?

有人能告诉我使用VBscript中的经典ASP执行参数化SQL查询的最简单方法吗?

一个可编辑的例子是最好的.

sql vbscript asp-classic

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

如何将cscript.exe更改为所有VBScript文件的wscript.exe执行?

安装新服务器后,我遇到了一个问题.

我有很多.vbs文件,都需要在wscript中运行,原因,我使用所有这些命令,如WScript.Echo"hello"

我希望能够在双击VBScript文件时看到输出.

但是当我右键单击vbs文件时,我看到控制台,我想在全局范围内将默认值更改为Windows主机!

我怎样才能做到这一点?

vbscript wsh

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

如何使用JScript或VBScript控制Windows系统卷?

我想从JScript或VBScript脚本控制我的Windows系统的卷.有任何想法吗?

此外,如果系统音量静音,我可以取消静音吗?

javascript windows vbscript volume mute

9
推荐指数
2
解决办法
4万
查看次数

在所有Open Explorer Windows的ListBox中获取路径

我想列出所有打开的Windows资源管理器窗口及其活动路径ListBox.ListBox如果浏览器窗口导航到其他路径,应用程序应刷新.

例如,两个浏览器窗口是打开的.一个导航到C:\Windows另一个导航到另一个导航D:\Stuff.当应用程序运行它,它增加C:\WindowsD:\StuffListBox.然后,用户导航到其中一个打开的资源管理器窗口中的其他文件夹C:\Windows\system32.然后应用程序应刷新ListBox和列表C:\Windows\system32,D:\Stuff而不是.

我对如何做到这一点没有任何想法.任何指针将不胜感激.

.net c# vb.net vbscript windows-explorer

9
推荐指数
1
解决办法
4004
查看次数

使用VBScript的Batch ECHO Command相当于什么?

我们目前使用Windows Batch(DOS)命令文件来控制我们的流程.要向控制台显示消息,我们将使用ECHO命令.这些消息将显示在我们的Scheduler软件中,该软件曾经是Tivoli,现在是CA WA Workstation\ESP.

我想开始使用VBS文件而不是CMD\BAT文件,并试图弄清楚如何对控制台执行相当于ECHO的操作.

当我尝试使用WScript.Echo命令或写入标准输出时,消息显示在两个对话框中,并且需要按下确定按钮才能继续.毫不奇怪,当我通过调度程序无人值守运行时,作业会命中其中一个命令而只是挂起,因为没有人可以确定消息框.

SET FS = CreateObject("Scripting.FileSystemObject")
SET StdOut = FS.GetStandardStream(1)
StdOut.Write("Test 1")

WScript.echo("Test 2")
Run Code Online (Sandbox Code Playgroud)

我意识到我可以使用Scripting对象将消息写入日志文件,但如果提供了无效路径或权限不足,则可能会失败.此外,能够在Scheduler中看到反馈写入非常方便.

如何使用VBScript写入控制台?我在这里看过其他帖子,表明上述方法因上述原因而无法正常工作.

vbscript

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

通过批处理文件自动登录Windows 7/Chrome上的网站

我有一个批处理文件.我有案例选择.如果用户输入26,则会打开链接1 chrome.如果用户输入27,它将打开chrome中的链接2.

但我仍然无法弄清楚,如何使用用户名和密码自动批量登录网站.

我在谷歌上寻找这样的脚本,但没有找到任何有用的东西.我知道一些C++,unix,(也有一些html和java脚本)我不知道是否可以在使用这些语言的Windows机器上完成,但即使可以完成,我认为与VB相比很难C##或其他一些高级语言.

我学会了如何使用bat文件中包含的基本Windows批处理命令打开多个站点,如:

start chrome.exe http://yahoo.com
start chrome.exe http://www.google.tv
Run Code Online (Sandbox Code Playgroud)

但我仍然无法弄清楚如果没有输入用户名和密码,实际点击bat文件将如何帮助我登录网站.

我是否需要开始学习VB(visual basic),dot net或windows批处理编程才能做到这一点.这太难了......请帮忙.

javascript windows vbscript google-chrome batch-file

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

根据用户名获取AD详细信息

我有一个代码从AD检索用户的详细信息,如电子邮件地址,电话号码等.我目前使用的代码是:

Set objSysInfo = CreateObject("ADSystemInfo")
strUser = objSysInfo.UserName
msgbox(strUser)
Set objUser = GetObject("LDAP://" & strUser)
Run Code Online (Sandbox Code Playgroud)

它获取当前登录用户的详细信息.但我现在需要做的是解析用户的用户名并根据该用户名检索详细信息.

我试图将objSysinfo.UserName更改为用户名并返回空白.

Set objSysInfo = CreateObject("ADSystemInfo")
strUser = "SomeUserName"
msgbox(strUser)
Set objUser = GetObject("LDAP://" & strUser)
Run Code Online (Sandbox Code Playgroud)

我应该如何根据提供的用户名从AD中检索详细信息?

vbscript vba active-directory

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