PB12.5 调用 ftpCreateDirectory 函数

[qq_21869293]

PB12.5 调用 ftpCreateDirectory 函数 如下：
定义
FUNCTION Boolean FtpCreateDirectory(Long hConnect,ref String lDirectory) LIBRARY "WinInet.dll" ALIAS FOR "FtpCreateDirectoryA"

函数：
public function boolean uf_createdirectory (string directoryname);
boolean lb_ret
string  ls_Curren
tPath = space(255)
setnull(ls_CurrentPath)
ls_CurrentPath = directoryname
lb_ret = FtpCreateDirectory(ii_ServerSeesion,ls_CurrentPath)
if not lb_ret then
  return false
end if
return lb_ret
end function；


结果是目录创建成功！但目录名称只取了字符串的第一个字符，如： abcd ，创建的目录名为： a。哪位知道帮忙解决一下！！！

[AndriyChoi]

alias for "FtpCreateDirectoryA;Ansi"

[lxbin2003]

FUNCTION Boolean FtpCreateDirectory(Long hConnect,ref String lDirectory) LIBRARY "WinInet.dll" ALIAS FOR "FtpCreateDirectoryW" 对于PB10以上UNICODE版本，使用W，而不是A。