Tag: ftp

使用Excel VB FtpCommand来列出远程目录

我需要使用wininet.dll FTP命令function发送一些FTP命令。 当我使用QUIT命令时它正在工作。 但是当我尝试使用例如LS或DIR我得到的响应0。 Private Declare Function FtpCommand Lib "wininet.dll" Alias "FtpCommandA" (ByVal hConnect As Long, ByVal fExpectResponse As Long, ByVal dwFlags As Long, ByVal lpszCommand As String, ByVal dwContext As Long, phFtpCommand As Long) As Long Private Function test() Dim Success As Long Dim iRet As Integer Dim lngInet As Long Dim lngInetConn As […]

FTP命令在Excel VBA中可用，但不能用于PowerPoint

在我的excel VBA代码中，我自动运行运行ftp的脚本（“PULLSCRIPT”，也是在代码中创build的）的过程，打开我的FTP地址，input我的用户名和密码，使用mget提取文件，最后使用Name将该文件移动到另一个文件夹。 它在Excel VBA中工作（我点击一个macros，它执行所有这些步骤，不需要手动input），但是当我复制并粘贴到PowerPoint VBA时，行 Shell ("ftp -s:" & sWorkingDirectory & FTP_BATCH_FILE_NAME) 不运行。 它不会给我一个错误，而F8单步执行它，它看起来像壳打开（就像当我在Excel中一步一步），但它永远不会运行PULLSCRIPT（或如果它然后它不工作）。 当我手动打开cmd并运行PULLSCRIPT时，它的工作原理是自动化的，所以人们不需要这样做。

在继续使用脚本之前，Excel VBA等待Shell完成

现在我有这个VBA脚本： Sub executeFTPBatch(ftpfileName) Call Shell("FTP -i -s:C:\Temp\" & ftpfileName & ".txt") On Error Resume Next Kill (C:\temp\" & ftpfileName & ".txt") End Sub 问题是它甚至在FTP脚本开始之前杀死了文本文件。 我看到了一些wsh代码，但我不确定如何使用它来调用shell的语法。 如果你能用正确的语法来帮助我，我会非常感激！

用双引号将完整的文件path包裹起来

我有一个文件，我需要使用VBA的FTP，我已经想通了，除了最后一个，我需要插入"在文件名称，但无法做到。 csvPath = "C:\Users\10613527\Desktop\test\" sWorkingDirectory = csvPath sFileToSend = "Price_Change_10-08-15 20-35-49.csv" iFreeFile = FreeFile Open sWorkingDirectory & FTP_BATCH_FILE_NAME For Output As #iFreeFile Print #iFreeFile, "open " & FTP_ADDRESS Print #iFreeFile, FTP_USERID Print #iFreeFile, FTP_PASSWORD Print #iFreeFile, "ASCII" Print #iFreeFile, "put " & sWorkingDirectory & sFileToSend Print #iFreeFile, "dir" Close #iFreeFile 'Shell command the FTP file […]

在VBA中使用FTP

我编写了一个VBA代码，它根据Excel数据（Websphere MQ Define Job）为IBM主机创build一个带有作业代码的.txt文件。 有可能通过FTP自动传输这个文件到主机将是很酷的。 在这一点上，我通过手动执行此操作： （评论：LPAR =主机名） ftp <LPAR> 'user' 'password' put 'dateiname' 它工作得很好。 但是我不知道如何将这个转换成VBA代码。 我在这里和那里发现了一个类似的问题： Public Sub FtpSend() Dim vPath As String Dim vFile As String Dim vFTPServ As String Dim fNum As Long vPath = ThisWorkbook.path vFile = "path" vFTPServ = "<LPAR>" 'Mounting file command for ftp.exe fNum = FreeFile() Open vPath […]

批量/macros代码从FTP站点获取最新的文件

我们有一个每天上传文件的共享FTP站点，我需要下载并运行检查。 我只是试图自动化的过程。 FTP文件就像name_20150901.xml 。 到目前为止，我有一个batch file来获取文件，但我不知道如何获得最新的。 这是我的代码： @ftp -i -s:"%~f0"&GOTO:EOF open ftp.site.com <user> <pass> lcd my local direc binary get todaysfile_20150901.xml 我需要读取哪些文件并获取最新的文件？ 我的最终目标是有一个macros来调用它，然后读取从FTP抓取的文件并运行我的检查。

在FTP站点上合并CSV文件

我们有一个功率计，每7分钟发送一个logging（标题和一行）CSV文件到FTP站点。 有一天它会创build大约5000个3MB的文件。 我试图想到在电子表格或程序中将这些文件显示为一个文件/显示的最佳方式。 我一直在做一个快速访问程序，将选定的FTP文件导入本地机器，然后将它们导入到一个表格，我们可以报告他们。 有更容易的方法吗？ 也许只是通过macros在本地合并成excel表格？ 感谢您的帮助

通过FTP发送文件到共享驱动器（UNC）

我有一个特定的文件需要通过FTP发送到共享驱动器的位置。 我知道有一种方法是在平面文件上写内容并用shell脚本执行。 可悲的是，这是行不通的，因为我的发送位置是奇怪的，我不知道如何解释它，就像这样。 //corporate.abc.com/data/ac/ny/log 我不知道上面的东西是什么意思。 有没有办法将数据发送到该位置？ PS：我通过Windows 运行命令打开它并打开它。 它不要求任何用户authentication。 更新：我试图打开使用资源pipe理器，但我得到错误“运行时错误75，path/文件访问错误” Sub FtpFileto() Dim vFile As String Dim vFTPServ As String Dim fNum As Long vPath = "C:\macro/pop.txt" vFile = "C:\macro/post.xlsx" vFTPServ = "corporate.abc.com" Open "//corporate.abc.com/data/NA/US/OC/Common/HOSTDL/CatSpec" For Output As #1 Close Shell "ftp -n -i -g -s:" & vPath & "\FtpComm.txt " & vFTPServ, vbNormalNoFocus End […]

从FTP服务器获取excel文件并保存在Google Drive中

要求是将一个excelfile upload到Google Drive，该文件最初存储在FTP服务器上。 我想知道是否可以通过Google App Script实现这一点。 如果没有应用程序脚本，有什么办法可以从FTP服务器获取文件，然后将其上传到Google云端硬盘。 我发现类UrlFetchApp 。 var response = UrlFetchApp.fetch("http://www.google.com/"); 请求获取url。 UrlFetchApp.fetch("http://example.com/upload_form.cgi", parameters); 请求使用可选的高级参数来获取URL。 我不知道以上两种方法是否有用。

从ftp服务器读取xlsx（使用RCurl）

来自“RCurl”包的GetURL函数是从ftp，https等中读取内容的绝佳工具。 我已经使用了很多次的包来读取.csv和.txt，但是当涉及到.xlsx时，它有一些问题。 我在这个论坛上发现，xlsx是一个二进制格式，因此不能像.csv和.txt这样的普通文本string。 FTP服务器通常具有作为密码和用户名的安全性，因此如“download.file”之类的函数在读取“.xlsx”文件时会导致一些问题。 然后我尝试了getBinaryURL，但输出格式是“原始的”，我不能从这个格式得到一个data.frame – 从函数rawToChar（）或rawRoBin（）。 if(!require(RCurl)) install.packages("RCurl");library(RCurl) url <- "ftp://…" userpwd <- "user:pwd" out <- getBinaryURL(url, userpwd = userpwd, ftp.use.epsv = FALSE,crlf = TRUE) 任何关于如何从ftp服务器读入.xlsx到R作为数据框的build议？