vba调用Winscp不能上传或下载文件，路径不能掺杂空格和中文

伶俐的毛豆

zpy2 发表于 2024-7-30 18:29
WScript.Shell

这个shell不知道是不是cmd环境执行有限制。

只要能用vba调用即可

zpy2

伶俐的毛豆 发表于 2024-7-31 08:35
只要能用vba调用即可

一种就是用php,读文件名用unicode,写文件名用utf-8,还有一种就是复制文件到utf-8的文件名的文件，然后上传这个新的文件。

伶俐的毛豆

fxl447098457 发表于 2024-7-31 07:24
ftp论坛应该有相关库吧,比操作命令行更可控。

可以帮忙推一下吗

伶俐的毛豆

lss001 发表于 2024-7-31 06:50
Public Function URLEncode(strInput As String) As String
'**********************
'中文转码示例: D ...

用了这个转码以后，还是不行，用批处理也不支持中文路径
不过我发现，ftp的中文路径转成url编码，利用ie浏览器可以把ftp文件拿到本地，就是不知道其原理和编码

比如远端服务器的路径：
/IVD/rpa/share/IVD2023需求表/HCIVD_RPA需求匯總表.xlsx
转成
sftp://zjj:123456@10.154.248.95:2 ... %E8%A1%A82024A.xlsx
然后把转换后的这一长串编码复制到ie浏览器网址，回车就能把远端文件拿到本地，（就是不知道怎么编代码）

伶俐的毛豆

zpy2 发表于 2024-7-31 09:12
一种就是用php,读文件名用unicode,写文件名用utf-8,还有一种就是复制文件到utf-8的文件名的文件，然后上 ...

可以展示一下代码吗

zpy2

伶俐的毛豆 发表于 2024-7-31 09:34
可以展示一下代码吗

<?php
$local_path='/storage/emulated/**/htdocs/ceshi/viewdocx/file_tree_u2.php';
ftpUpload($local_path);
die;
function ftpUpload($local_path){

// Allows overwriting of existing files on the remote FTP server
$stream_options = array('ftp' => array('overwrite' => true));

// Creates a stream context resource with the defined options
$stream_context = stream_context_create($stream_options);

$ftp_path=str_replace('/storage/emulated/0/Download/htdocs','ftp://webmaste*j*r@用户名:密码@服务端地址/WEB',$local_path);
echo $ftp_path;
$contents=file_get_contents($local_path);
//echo $contents;
// Opens the file for writing and truncates it to zero length
if ($fh = fopen($ftp_path, 'w', 0, $stream_context))
{
    // Writes contents to the file
    //fputs($fh, 'example contentsaaaa');
    fputs($fh, $contents);

    // Closes the file handle
    fclose($fh);
        echo "\nok\n";
}
else
{
    die('Could not open file.');
}
}

lss001

伶俐的毛豆 发表于 2024-7-31 09:32
用了这个转码以后，还是不行，用批处理也不支持中文路径
不过我发现，ftp的中文路径转成url编码，利用ie ...

勾选“Bate版”，点击确定

https://hn.landui.com/help/show-11350.html

最后重启电脑即可

伶俐的毛豆

zpy2 发表于 2024-7-31 10:24

感谢帮助，我消化一下...

lss001

伶俐的毛豆 发表于 2024-8-1 08:21
感谢帮助，我消化一下...

文件名中有空格以及中文
需要三对双引号"""    """括起来
方法1<推荐>
           f = """新建 文本文档.txt"""
方法2<变量>
             oStr = "新建 文本文档.txt"
             f = Chr(34) & oStr & Chr(34)

伶俐的毛豆

lss001 发表于 2024-8-4 10:53
文件名中有空格以及中文
需要三对双引号"""    """括起来
方法1

感謝幫助，已經完美解決