|
| Autor |
Nachricht |
spidertimo Newbie

Anmeldedatum: 10.07.2008 Beiträge: 14
|
Befehl ausführen, nachdem der andere ausgeführt wurde?
Verfasst am: 19.07.2008, 21:37 |
|
|
abend 
Kann mir einer kurz helfen? Mir fällt der Befehl nicht mehr ein, mit dem ich einen Befehl ausführen kann, nachdem der andere ausgeführt wurde. [img]/sad.gif[/img] |
|
| |
|
 |
RedShark Poster

Anmeldedatum: 01.07.2008 Beiträge: 145
|
Verfasst am: 19.07.2008, 22:02 |
|
|
meinst du etwa
DoEvents
Sub DoEvents Sub
???
was anderes kann ich draus nicht lesen... |
|
| |
|
 |
spidertimo Newbie

Anmeldedatum: 10.07.2008 Beiträge: 14
|
Verfasst am: 19.07.2008, 22:05 |
|
|
| das war iwas mit execute glaub ich.. mir hat es einer gezeigt, aber hab vergessen zu speichern... >.< |
|
| |
|
 |
RedShark Poster

Anmeldedatum: 01.07.2008 Beiträge: 145
|
Verfasst am: 19.07.2008, 22:18 |
|
|
kann man mit dem befehl etwa etwas ausführen wie z.b. mit ShellExecute?
Visual Basic: [code]Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long [/code] |
|
| |
|
 |
spidertimo Newbie

Anmeldedatum: 10.07.2008 Beiträge: 14
|
Verfasst am: 19.07.2008, 22:22 |
|
|
Das ganze ist so: Ich möchte per ftp 2 Dateien hochladen... doch ich bekomme einen Fehler, wenn ich die 2 Datei hochladen will, da es noch die erste hochläd [img]/sad.gif[/img] |
|
| |
|
 |
RedShark Poster

Anmeldedatum: 01.07.2008 Beiträge: 145
|
Verfasst am: 19.07.2008, 22:23 |
|
|
poste doch mal den source dann "hoffe ich" kann ich dir besserhelfen...
(nicht den ganzen nur wo der fehler auftaucht) |
|
| |
|
 |
spidertimo Newbie

Anmeldedatum: 10.07.2008 Beiträge: 14
|
Verfasst am: 19.07.2008, 22:29 |
|
|
Ich weiß nicht ob du hiermit was anfangen kannst:
Datei 1 wird hochgeladen: Visual Basic: [code]host_name = RC4(Text1.Text, "password") If LCase$(Left$(host_name, 6)) <> "ftp://" Then host_name = "ftp://" & host_name inetFTP.URL = host_name inetFTP.UserName = RC4(Text2.Text, "password") inetFTP.Password = RC4(Text3.Text, "password")
inetFTP.Execute , "Put " & _ txtLocalFile.Text & " " & txtRemoteFile1.Text[/code]
Datei2 wird hochgeladen: Visual Basic: [code] Private Sub Timer4_Timer()
inetFTP.Execute , "Put " & _ Text10.Text & " " & txtRemoteFile2.Text End Sub[/code]
Hab das ganze schon per timer versucht, aber da kommt trotzdem noch, dass der andere Befehl noch ausgeführt wird... Das Programm kann leider nicht 2 Dateien gleichzeitig hochladen... |
|
| |
|
 |
RedShark Poster

Anmeldedatum: 01.07.2008 Beiträge: 145
|
Verfasst am: 19.07.2008, 22:33 |
|
|
ich weiss nicht ob das funktioniert aber schreib mal in den timer
Private Sub Timer4_Timer()
If inetFTP.State = 12 then inetFTP.Execute , "Put " & _ Text10.Text & " " & txtRemoteFile2.Text End if End Sub
|
|
| |
|
 |
spidertimo Newbie

Anmeldedatum: 10.07.2008 Beiträge: 14
|
Verfasst am: 19.07.2008, 22:42 |
|
|
Da bekomme ich die Fehlermeldung "Methode oder Mitgliedsdaten nicht gefunden" [img]/sad.gif[/img]
//edit: Redshark hat mir freundlicherweiße über Icq geholfen. Der Befehl war if inetFTP.stillexcute then Kann geclosed werden  |
|
| |
|
 |