filesystemobject

    0热度

    1回答

    我尝试使用UNC Path和FileSystemObject获取网络中的目录,但是如果网络目录不可用,则响应需要很长时间。我想这是因为扫描了很多网络,或者在这一点上发送更多ping。 那么是否有一种方法可以在使用FSO之前更快地检查网络目录的存在?

    0热度

    2回答

    在大多数我的VB脚本(.vbs文件),我有以下代码的顶部: Option Explicit Const ForReading = 1 Dim objFSO, objFile Set objFSO = CreateObject("Scripting.FileSystemObject") Set objFile = objFSO.OpenTextFile("Z:\somepath\somefi

    2热度

    1回答

    考虑这个例子的VBScript片段: Dim fs Set fs = CreateObject("Scripting.FileSystemObject") If fs.FileExists("D:\Folder\File*.ext") Then ' Finds nothing! fs.CopyFile "D:\Folder\File*.ext", "D:\OtherFolder\"

    0热度

    2回答

    我在VBS中有一个经典的asp页面,我试图用下面的代码在web服务器上创建一个文件。 Set fso = CreateObject("Scripting.FileSystemObject") Set file1 = fso.CreateTextFile("\\localhost\inetpub\wwwroot\cs\batch\123456dirs.bat", true) 这将返回以下错误:

    -1热度

    1回答

    我在使用FileSystemObject.CopyFile时遇到问题。我想我正确地使用它,从我读过的论坛,但我仍然得到以下编译器错误: ArgumentException was unhandled: Value does not fall within expected range 下面是代码: Public Class Form1 Private Sub Button1_Click(send

    1热度

    1回答

    使用下面的代码删除我的文件,但它不会进入回收站 - 是否存在将它发送到回收站的代码?我应该使用“.Move”吗? If MsgBox("DELETE:" & Chr(10) & Forms("frmtbl").f_FullPath & Me.f_FileName & " ?", vbYesNo) = vbYes Then 'Kill Forms("frmtbl").f_FullPath

    4热度

    1回答

    我编写了一个脚本,通过命令行提示从程序中获取一些信息。 只要您登录到程序中,就可以获取信息,我试图从中提取信息。 这是我如何连接到程序: Set Appl = CreateObject("WScript.Shell").Exec("cmd.exe im connect") 返回(如果你没有登录): (请注意:这是理论上的输出,如果我手动键入命令进入一个命令窗口) Connecting to <

    1热度

    1回答

    我在VBA中并不是很坚定,我一直在尝试在Word中使用我之前在Excel中编写的函数。 (如果这是工作完美!) 的功能经过一个文本文件,并有一定的(寻求)其他字符串之后返回一个字符串: Function keySearch(ByVal sSearch As String) As String Dim fso As New FileSystemObject Dim FileNum Dim Da

    4热度

    2回答

    我有一个脚本,可以定期从RSS源下载信息,其中一个是图像。现在,我在使用FileSystemObject和FileExists比较下载图像之前检查图像是否存在,以便我不会不断地一遍又一遍地下载相同的文件。定期地,图像会更新,但保持相同的名称,但在运行一些测试后,它看起来像FileExists只比较文件名,而不是实际的文件。由于在线文件和本地文件具有相同的名称,因此即使它们是不同的图像,它也不会下载

    1热度

    2回答

    我有一个文本文件,它有超过85K行 有没有办法设置起始行?例如;我已经阅读并将第1-10行写入其他文件,并希望获得第12行中的值以将其添加到我写的最后一行中。我想仅读取线12 文本/样品/ 1 /的GetValue/12 文本/样品/ 2 /的GetValue/11 文本/样品/ 3 /的GetValue/10 文本/样品/ 4 /的GetValue/9 文本/样品/ 5 /的GetValue/8