易截截图软件、单文件、免安装、纯绿色、仅160KB

【急求】VB中使用WScript调用外部命令 - VB / 基础类

在下是vb的新手,想写段程序,在vb中,使用wscript调用一些外部的命令,但是程序执行一直有错误,请各位高手帮忙解答下,谢谢。

代码如下:
VB code:

Private Function getFile_CMD(filename, filepath) As Boolean
Dim command As String

On Error GoTo SCPError
command = "scp2 " & sshId & ":" & sshDir & filename & " " & filepath

MsgBox "start!", vbOKOnly

Set wsh = Wscript.CreateObject("wscript.shell")
wsh.run ("C:\Windows")

MsgBox "end!", vbOKOnly

Exit Function

SCPError: ' Error-handling routine.
MsgBox filename & ": " & Err.Description, vbCritical, "GDWISMS SSH Batch"
Close #1

End Function



错误如下:
“需要对象”

我不知道是不是wsh要用DIM来声明下还是什么问题?
sf

查了一下,wscript常用来写病毒啊,闪

晕,跟病毒没什么关系。我想在vb中调用scp2命令做文件传输的。上面代码只是简单测试打开一个目录,提示有错误,找不到原因才来发帖问问高手的。

要引用 Wscript 吧!大概

用浏览器“打开一个目录”?


帮顶

学习了

引用
查了一下,wscript常用来写病毒啊,闪

不懂就乱叫唤

引用
工程——引用——Microsoft Script Run Tim


相关问答:

vb如何调用Illustrator(此前Illustrator未启动)?

请教一下:我用vb写了一个调用Illustrator的测试程序,代码很简单:Private Sub Command1_Click()
Dim app As New Illustrator.Application
Dim doc As Illustrator.Document
Dim thislayer As Illustrator.Layer ......

vb能否把winsock控件封装到dll中

vb将winsock控件封装到dll问题 有什么好的思路? 如果用Socket API呢?
例如,像下面这样封装Winsock控件,行的通?
创建ActiveX dll,添加窗体frmClient,加入WinSock控件wskClient。
类代码:
Option Expli ......

vb修改DTPicker1日期问题

Private Sub Check1_Click()
If Check1.Value = 1 Then
DTP1.Enabled = True
Else
DTP1.Enabled = False
End If
End Sub
Private Sub Check2_Click()
If Check2.Value = 1 Then
DTP2.Enabled = True
Else ......

vb插入数据库重复值问题

在vb中怎么判断,插入到数据库中的值是重复的,本人才刚接触VB语言,甚是有好多地方还不懂,还请各位大侠们给出代码,谢谢了呀!!!
插入之前select一下阿。
或者写一个组合SQL插入语句,例如
IF not Exist(
& ......

vb控制GPRS MODEM拨号

我想做个用vb6做的程序,可以控制GPRS MODEM拨号,如拨我自己的手机
可以啊
你先下个AT命令集合学习学习

我来顶

顶贴

LZ好厉害

不顶不行

老是排MP
引用
LZ好厉害
......
© 2009 ej38.com All Rights Reserved. 关于E健网联系我们 | 站点地图 | 赣ICP备09004571号