关于FTP的问题

小小的我

Au3的版本：v3.3.1.1
编写了一个修改FTP密码的脚本，语法检查通过，但是无法登录到FTP服务器，不知是什么原因，请高手提明错误的原因。

#include <FTPEx.au3>
dim $server,$username,$oldpass,$newpass,$command

$server=inputbox("服务器地址","请输入你的FTP服务器地址或IP" & @CRLF &"示例：ftp.abc.com","ftp.abc.com")
$username=inputbox("用户名","请输入你的FTP用户名，示例：rj307102")
$oldpass=inputbox("旧密码","请输入你FTP用户的旧密码","1","*")
$newpass=inputbox("新密码","请输入你FTP用户的新密码","1","*")
$command= "quote site pswd " & $oldpass & "  " & $newpass

dim $open ,$conn,$ftpcommand,$ftpc
$Open = _FTP_Open('MyFTP Control')
if @error =0 then msgbox(0,"错误","打开不正确")
$Conn = _FTP_Connect($Open, $server, $username, $oldpass)
if @error =0 then msgbox(0,"错误","密码不正确")
$ftpcommand=_FTP_Command($conn,$command)

$Ftpc =  _FTP_Close($Open)