- Код: Выделить всё
On Error GoTo errorhandle
With Form1.dlg
.CancelError = True
.DialogTitle = "Open File"
.Filter = "Exe Files (*.exe)|*.exe|All Files (*.*)|*.*"
.Flags = 4
.ShowOpen
End With
Shell (dlg = "*.exe")
errorhandle:
Он не запускает выбранный фаил!
2)Как чтобы прога удаляла фаил каторыи пользователь вписал в txt1.Text! Тоесть пользов. пишет в txt1.Text путь до фаила "C:\xxx.exe"
а прога его удаляет ?
