ABAP 连接ftp 并且创建文件夹_abap ftp创建文件夹-优快云博客

本文链接：https://blog.youkuaiyun.com/Programmer_FuQiang/article/details/113607155

本文介绍如何使用 SAP 系统通过 FTP 协议连接远程服务器并创建文件夹，包括设置连接参数、加密密码处理及执行 FTP 命令等步骤。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

DATA :
        p_host   TYPE char64 VALUE '192.168.100.64 21',"  IP
        p_folder TYPE char255 VALUE '/aa/bb/', "ftp 路径
        p_uname  TYPE char30 VALUE 'sys' , "用户名称
        p_pwd    TYPE char30 VALUE 'psword' . "用户密码

DATA : dest     LIKE rfcdes-rfcdest  VALUE 'SAPFTP',
compress TYPE c  VALUE 'N'.

DATA: hdl     TYPE i,
      key     TYPE i VALUE 26101957,
      slen    TYPE i,
      cmd(80) TYPE c.

slen = strlen( p_pwd ).

* "获取加密密码保存到P_PWD
CALL FUNCTION 'HTTP_SCRAMBLE'
  EXPORTING
    source      = p_pwd
    sourcelen   = slen
    key         = key
  IMPORTING
    destination = p_pwd.

* 连接ftp服务器
CALL FUNCTION 'FTP_CONNECT'
  EXPORTING
    user            = p_uname
    password        = p_pwd
    host            = p_host
    rfc_destination = dest
  IMPORTING
    handle          = hdl.  "连接的句柄

"IF SY-SUBRC <> 0.
"*- &1失败
"ELSE.
"*- 成功
"ENDIF.

"   新建文件夹操作  通过ftp    .start  ..
data: begin of ig_ftp_result occurs 0,
        line(100),
      end of ig_ftp_result.
DATA :  fild_names_one      TYPE char255 ,
        fild_names_two      TYPE char255 ,
        fild_names_three    TYPE char255 .
fild_names_one = AA ."这个AA 就是你要创建的文件夹名称
CONCATENATE p_folder  fild_names_one  INTO fild_names_two ."拼接ftp地址
CONCATENATE 'mkdir' fild_names_two INTO fild_names_three SEPARATED BY ' '."因为ftp命令有个空格所以还要继续拼接个空格进去
call function 'FTP_COMMAND'
  exporting
    handle = hdl
    command =  fild_names_three "'运行ftp命令创建文件夹这个是命令mkdir /home/ftp2018/SAPFiled/AA ！！！！注意mkdir 后面有个空格
  tables
    data = ig_ftp_result
  exceptions
    tcpip_error = 1
    command_error = 2
    data_error = 3
  others = 4.

IF SY-SUBRC <> 0.
*-  &1失败
ELSE.
*-  &成功
ENDIF.

"   新建文件夹操作  通过ftp    .end ..