現在VB6.0でftp転送用のプログラムを作成しております。
FTPでDIRを送信して、ファイルリストの取得をおこなおうとしています。
しかし、デバッグで一行一行コーディングをデバッグしていったら
うまく取得できるのですが、デバッグ無しで取得した場合、スペース（空）
データになってしまいます。
処理速度に問題があるような気がするのですが？
FOR〜NEXT文でGetChunkの前に置いても一緒です。
なにか良い処理方法はないでしょうか？
よろしくお願いします。
With Inet1
　　　　.Execute , "DIR"
　　　　Do While .StillExecuting = True
             DoEvents                       ' 他のプロセスに制御を渡します。
         Loop

         FTP_DIR_W = .GetChunk(1024, icString) ' icString = 0
END with

>  現在VB6.0でftp転送用のプログラムを作成しております。
>  FTPでDIRを送信して、ファイルリストの取得をおこなおうとしています。
>  しかし、デバッグで一行一行コーディングをデバッグしていったら
>  うまく取得できるのですが、デバッグ無しで取得した場合、スペース（空）
>  データになってしまいます。
>  処理速度に問題があるような気がするのですが？
>  FOR〜NEXT文でGetChunkの前に置いても一緒です。
>  なにか良い処理方法はないでしょうか？
>  よろしくお願いします。
>  With Inet1
>  　　　　.Execute , "DIR"
>  　　　　Do While .StillExecuting = True
>              DoEvents                       ' 他のプロセスに制御を渡します。
>          Loop
>  
>          FTP_DIR_W = .GetChunk(1024, icString) ' icString = 0
> END with
すみません
タイトルを間違えてしまい2重投稿になってしまいました
記事No「No.6347」の削除の方お願いします。

> >  現在VB6.0でftp転送用のプログラムを作成しております。
> >  FTPでDIRを送信して、ファイルリストの取得をおこなおうとしています。
> >  しかし、デバッグで一行一行コーディングをデバッグしていったら
> >  うまく取得できるのですが、デバッグ無しで取得した場合、スペース（空）
> >  データになってしまいます。
> >  処理速度に問題があるような気がするのですが？
> >  FOR〜NEXT文でGetChunkの前に置いても一緒です。
> >  なにか良い処理方法はないでしょうか？
> >  よろしくお願いします。
> >  With Inet1
> >  　　　　.Execute , "DIR"
> >  　　　　Do While .StillExecuting = True
> >              DoEvents                       ' 他のプロセスに制御を渡します。
> >          Loop
> >  
> >          FTP_DIR_W = .GetChunk(1024, icString) ' icString = 0
> > END with
> すみません
> タイトルを間違えてしまい2重投稿になってしまいました
> 記事No「No.6347」の削除の方お願いします。
自己解決しました。
GetChunkで取得する為に、INETコントロールを使用しているのですが、
これの「chenge」イベントが関係しておりました。
chengeイベントをうまく処理することで解決しました。

それといまINETコントロールを使用しているのですが、
これでサーバー上ファイルのタイムスタンプ情報の取得ってできるのでしょうか？

> > >  現在VB6.0でftp転送用のプログラムを作成しております。
> > >  FTPでDIRを送信して、ファイルリストの取得をおこなおうとしています。
> > >  しかし、デバッグで一行一行コーディングをデバッグしていったら
> > >  うまく取得できるのですが、デバッグ無しで取得した場合、スペース（空）
> > >  データになってしまいます。
> > >  処理速度に問題があるような気がするのですが？
> > >  FOR〜NEXT文でGetChunkの前に置いても一緒です。
> > >  なにか良い処理方法はないでしょうか？
> > >  よろしくお願いします。
> > >  With Inet1
> > >  　　　　.Execute , "DIR"
> > >  　　　　Do While .StillExecuting = True
> > >              DoEvents                       ' 他のプロセスに制御を渡します。
> > >          Loop
> > >  
> > >          FTP_DIR_W = .GetChunk(1024, icString) ' icString = 0
> > > END with
> > すみません
> > タイトルを間違えてしまい2重投稿になってしまいました
> > 記事No「No.6347」の削除の方お願いします。
> 自己解決しました。
> GetChunkで取得する為に、INETコントロールを使用しているのですが、
> これの「chenge」イベントが関係しておりました。
> chengeイベントをうまく処理することで解決しました。
>
> それといまINETコントロールを使用しているのですが、
> これでサーバー上ファイルのタイムスタンプ情報の取得ってできるのでしょうか？


はじめまして。
同じような現象に苦しんでいて、ここの記事を見つけました。
Getchunk()部分で同じ現象に陥っています。
changeイベントで解決したと書いていますが、具体的にどのようにしたのでしょうか？

よろしかったら教えてください。

> > > >  現在VB6.0でftp転送用のプログラムを作成しております。
> > > >  FTPでDIRを送信して、ファイルリストの取得をおこなおうとしています。
> > > >  しかし、デバッグで一行一行コーディングをデバッグしていったら
> > > >  うまく取得できるのですが、デバッグ無しで取得した場合、スペース（空）
> > > >  データになってしまいます。
> > > >  処理速度に問題があるような気がするのですが？
> > > >  FOR〜NEXT文でGetChunkの前に置いても一緒です。
> > > >  なにか良い処理方法はないでしょうか？
> > > >  よろしくお願いします。
> > > >  With Inet1
> > > >  　　　　.Execute , "DIR"
> > > >  　　　　Do While .StillExecuting = True
> > > >              DoEvents                       ' 他のプロセスに制御を渡しま
す。
> > > >          Loop
> > > >  
> > > >          FTP_DIR_W = .GetChunk(1024, icString) ' icString = 0
> > > > END with
> > > すみません
> > > タイトルを間違えてしまい2重投稿になってしまいました
> > > 記事No「No.6347」の削除の方お願いします。
> > 自己解決しました。
> > GetChunkで取得する為に、INETコントロールを使用しているのですが、
> > これの「chenge」イベントが関係しておりました。
> > chengeイベントをうまく処理することで解決しました。
> >
> > それといまINETコントロールを使用しているのですが、
> > これでサーバー上ファイルのタイムスタンプ情報の取得ってできるのでしょうか？
>
>
> はじめまして。
> 同じような現象に苦しんでいて、ここの記事を見つけました。
> Getchunk()部分で同じ現象に陥っています。
> changeイベントで解決したと書いていますが、具体的にどのようにしたのでしょうか？
>
> よろしかったら教えてください。
返事送れてすみません。
私の場合は、chengeイベントで常に、「Getchunk()」の値を取得しているようにしていたので、
イベントことに、Getchunk()の値が変わってしまい、うまく処理できなかったので、
初めの一回目のGetchunk()の取得を別変数におき、対応しました。
よろしくお願いします。