title image


Smiley Re: If ... Then Problem (mit Code)
If App.Path & "/*.tmp" ThenKill App.Path & "/*.tmp"End IfIch übersetze malWenn "Anwendungspfag\*.tmp" Dann Lösche "Anwdungspfad\*.tmp"naja...hört sich ganz gut an ABERWOMIT vergleichst Du eigentlich ???strTmp=Dir(app.path & "\*.tmp")if lcase(right(strtmp,3))="tmp" then Kill App.Path & "/*.tmp"end ifUnd bedenke, das der Anwenugspfad auch ein Lufwerk sein könnte, dann darfst Du keinen \ anhängen

geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: