✔ umbenennen, dann timer, dann exe

[d4kine]

Also Leutz!
Mein prog sollte folgendes können:
Es soll mir eine Datei, nehmen wir mal an, eine dll Datei, umbenennen,
dann soll der timer ins spiel kommen und für 5 sekunden oder so warten, bis die
Datei umbenannt wurde, und dann soll eine Exe-Datei ausgeführt werden.
Hört sich was hastig an, aber ich hab nicht lange zeit, deswegen sry für meine schreibweise...

Naja, den code für den timer hab ich schonmal! Bestimmt nicht der beste, aber naja...
Vorgehen sollte so sein: BUTTON -> Datei UMBENENNEN -> Timer (5 SEK) -> EXE Starten

Private Sub Timer1_Timer()
   Dim timeleft As String
   Dim newtime As Double
   If Val(timeleft) > 0 Then
   timeleft = Text1.Text
   newtime = Val(timeleft) - 1
   Else
   Shell ("d4kine.exe")
   End If
   End Sub

Hope U can Hälp me

 

[Merlin_78]

Ich denke mal, daß du da am Besten mit dem FileSystemObject arbeitest.

Hierzu mußt du zuerst bei den References die Microsoft Scripting Runtime implementieren. Anschließend kannst du im allgemeinen Codeteil das FileSystemObject initialisieren.

Option Explicit
Dim fso As New FileSystemObject

Das Umbenennen der Datei erfolgt über die Methode MoveFile.

fso.MoveFile datei_Alt, datei_Neu

 

[d4kine]

Ja, das weiß ich ja... ich hab halt nur das proglem, dass der wenn ich auf den button
klicke, dass der dann den timer ausführen soll. das ist das proglem.
aber trotzdem danke

 

[Shakie]

Timer1.Enabled = True

 

[d4kine]

Ich wusste, dass es was total simples ist! Danke Shakie... !

 

[Shakie]

Bitte gerngeschehn