iFile = FreeFile
MsgBox "4"
percorsotxt = percorso & "\" & "resume1.txt"
MsgBox percorsotxt
Open "[percorsotxt]" For Input As #iFile
Do Until EOF(iFile)
Line Input #iFile, sBuffer
If InStr(sBuffer, ["transfer complete"]) > 0 Then
MsgBox "trovato"
End If
Loop
Close #iFile

non mi trova il file e la variabile percorsotxt il valore è giusto



questo codice è messo dopo la funzione
Call Shell(stAppName, 1)

come faccio a dirgli che prima di eseguire il codice sopra deve aspettare la fine dell'esecuzione dell'applicazione che lancio che in questo caso è un file bat che esegue un trasferimento in line sul server