[リストへもどる]　　　[VBレスキュー(花ちゃん)]
一括表示
投稿時間：2007/04/27(Fri) 13:40
投稿者名：エニックス
Ｅメール：
ＵＲＬ　：
タイトル：ファイルの消去
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"


お世話になります。
上記の処理は３分経過後にInitフォルダ内の検査Dataを削除する処理する目的で作成した
処理です。しかし、うまくいきません。どこが違うのでしょうか？
  

投稿時間：2007/04/27(Fri) 13:50
投稿者名：シュウ
Ｅメール：
ＵＲＬ　：
タイトル：Re: ファイルの消去
> 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"
>
>
> お世話になります。
> 上記の処理は３分経過後にInitフォルダ内の検査Dataを削除する処理する目的で作成した
> 処理です。しかし、うまくいきません。どこが違うのでしょうか？
>    

人の話聞く気ないのかな…。
せめて、どううまくいかなかったか説明してください。
何度もそう言われてると思うのですが。

投稿時間：2007/04/27(Fri) 13:57
投稿者名：エニックス
Ｅメール：
ＵＲＬ　：
タイトル：Re^2: ファイルの消去
> > 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"
> >
> >
> > お世話になります。
> > 上記の処理は３分経過後にInitフォルダ内の検査Dataを削除する処理する目的で作成した
> > 処理です。しかし、うまくいきません。どこが違うのでしょうか？
> >    
>
> 人の話聞く気ないのかな…。
> せめて、どううまくいかなかったか説明してください。
> 何度もそう言われてると思うのですが。

具体的には、３分経過後にInitフォルダ内の検査Dataが消えていません。どうすれば消えるのでしょうか？

投稿時間：2007/04/27(Fri) 14:03
投稿者名：シュウ
Ｅメール：
ＵＲＬ　：
タイトル：Re^3: ファイルの消去
> > > 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"
> > >
> > >
> > > お世話になります。
> > > 上記の処理は３分経過後にInitフォルダ内の検査Dataを削除する処理する目的で作
成した
> > > 処理です。しかし、うまくいきません。どこが違うのでしょうか？
> > >    
> >
> > 人の話聞く気ないのかな…。
> > せめて、どううまくいかなかったか説明してください。
> > 何度もそう言われてると思うのですが。
>
> 具体的には、３分経過後にInitフォルダ内の検査Dataが消えていません。どうすれば消えるの
でしょうか？

…ちなみにその消そうとしているファイルには拡張子はついていないのですか？

投稿時間：2007/04/27(Fri) 14:09
投稿者名：エニックス
Ｅメール：
ＵＲＬ　：
タイトル：Re^4: ファイルの消去
> > > > 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"
> > > >
> > > >
> > > > お世話になります。
> > > > 上記の処理は３分経過後にInitフォルダ内の検査Dataを削除する処理する目的で作
> 成した
> > > > 処理です。しかし、うまくいきません。どこが違うのでしょうか？
> > > >    
> > >
> > > 人の話聞く気ないのかな…。
> > > せめて、どううまくいかなかったか説明してください。
> > > 何度もそう言われてると思うのですが。
> >
> > 具体的には、３分経過後にInitフォルダ内の検査Dataが消えていません。どうすれば消えるの
> でしょうか？
>
> …ちなみにその消そうとしているファイルには拡張子はついていないのですか？

拡張子はついています。xlsです。

投稿時間：2007/04/27(Fri) 14:14
投稿者名：GOD
Ｅメール：
ＵＲＬ　：
タイトル：Re^5: ファイルの消去
> > >    Kill "C:\Documents and Settings\Nomura-Kazuhiro\デスクトップ\テスト 〜 仕上
質問とは関係ないですが、フォルダ名に(本名かどうか変わらないけど)名前が入っていて痛々しいです。

>拡張子はついています。xlsです。
じゃ、消すファイル名にも拡張子を付けてください。