投稿日 | : 2007/04/27(Fri) 13:40 |
投稿者 | : エニックス |
Eメール | : |
URL | : |
タイトル | : ファイルの消去 |
Dim vTIME_NOW As Variant
vTIME_NOW = Now
Do While DateDiff("s", vTIME_NOW, Now) < 180
DoEvents
Loop
Kill "C:\Documents and Settings\Nomura-Kazuhiro\デスクトップ\テスト 〜 仕上げ検査入力 VB6.0\Init\検査Data"
お世話になります。
上記の処理は3分経過後にInitフォルダ内の検査Dataを削除する処理する目的で作成した
処理です。しかし、うまくいきません。どこが違うのでしょうか?