[OSのVer]：Windows　　　　[VBのVer]：VB.NET　　

FTP転送を組み込んだんだけど、上手くいきません。
どこが悪いのでしょう？（エラーはでないのですが、ローカルにファイルが落ちません。）
どなたかよいアドバイスをいただけないでしょうか。


        Dim lngRtn As Long

        lngInternetHandle = InternetOpen("eVB OpenUrl", _
            0, _
            vbNullString, _
            vbNullString, _
            0)

        lngFtpHandle = InternetConnect(lngInternetHandle, _
            "192.168.100.200", _
            21, _
            "test", _
            "test", _
            1, _
            &H8000000, _
            0)

        lngRtn = FtpGetFile(lngFtpHandle, _
            "/home/test/data.txt", _
            "C:\data.txt", _
            1&, _
            0&, _
            False, _
            0&)

        MsgBox(lngRtn)

        InternetCloseHandle(lngFtpHandle)
        InternetCloseHandle(lngInternetHandle)

よろしくお願いします。

> Dim lngRtn As Long
この時点から、すでにかなり怪しいです。

省略されているので分かりませんが、VB.NET 向きの API 宣言に直してありますか?
それぞれの変数の扱いを見ると、どうも VB6 / VBA 向けの API サンプルを
そのまま流用しているかのように見えてしまうのですが…。


とりあえず、.NET 向けの FTP サンプル。
hhttp://www.codeproject.com/vb/net/FtpClient.asp

返事が遅れて申し訳ないです。
そのとおりで、VB6のアレンジなんです。
やってみます。ありがとうございました。

[OSのVer]：Windows　　　　[VBのVer]：VB.NET　　
> > Dim lngRtn As Long
> この時点から、すでにかなり怪しいです。
>
> 省略されているので分かりませんが、VB.NET 向きの API 宣言に直してありますか?
> それぞれの変数の扱いを見ると、どうも VB6 / VBA 向けの API サンプルを
> そのまま流用しているかのように見えてしまうのですが…。
>
>
> とりあえず、.NET 向けの FTP サンプル。
> hhttp://www.codeproject.com/vb/net/FtpClient.asp