WinInetを使用したFTPについて (ID:81514)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 Dim lnghConnect As Long Dim hFile As Long Dim strCommand As String strCommand = "QUOTE TYPE C 932" 'InternetConnectで取得できたハンドルを使用して、 bRet = FtpCommand(lnghConnect, _ False, _ FTP_TRANSFER_TYPE_ASCII, _ strCommand, _ 0, _ hFile) を呼び出しますと、bRet = 0で、 InternetGetLastResponseInfo dwIntError, vbNullString, dwLength strBuffer = String(dwLength + 1, 0) InternetGetLastResponseInfo dwIntError, strBuffer, dwLength でエラーメッセージを確認しましたところ、 500 SUBCOMMAND QUOT NOT VALID. が返されます。 コマンドプロンプトからFTPを起動した場合は問題なくこのサプコマンドは 転送されます。 以上、申し訳ありませんが、ご指導の程宜しくお願いいたします。