| Вопрос: Помогите скопировать видео файл | Добавлено: 23.05.08 14:22 |
Автор вопроса:  KreAtoR
|
|
Использую функцию FileCopy программа выдает постоянно Pfad not found
пытаюсь скопировать видео файл .wmv с одной папки в другую. Подскажите как сделать правильно уже все перепробовал |
| Ответы | Всего ответов: 9 |
|
Номер ответа: 1 Автор ответа:  Smith ICQ: adamis@list.ru Вопросов: 153 Ответов: 3632 |
Профиль | | #1 | Добавлено: 23.05.08 15:44 |
|
Полно вариантов а примеров ещё больше.
Private Declare Function CopyFile Lib "kernel32" Alias _ "CopyFileA" (ByVal lpExistingFileName As String, ByVal _ lpNewFileName As String, ByVal bFailIfExists As Long) As Long Private Declare Function MoveFile Lib "kernel32" Alias _ "MoveFileA" (ByVal lpExistingFileName As String, ByVal _ lpNewFileName As String) As Long Sub CopyMove() Dim strSource As String Dim strTarget As String Dim lngRetVal As Long strSource = "C:\yfile.txt" strTarget = "C:\indows\yfile.txt" '// Копируем файл lngRetVal = CopyFile(Trim$(strSource), Trim(strTarget), False) If lngRetVal Then MsgBox "Файл скопирован!" Else MsgBox "Ошибка!" End If '// Переместить файл lngRetVal = MoveFile(Trim$(strSource), Trim(strTarget)) If lngRetVal Then MsgBox "Файл перемещен!" Else MsgBox "Ошибка!" End If End Sub Источник: www.vbstreets.ru |
||
|
Номер ответа: 2 Автор ответа: SmithICQ: adamis@list.ru Вопросов: 153 Ответов: 3632 |
Профиль | | #2 | Добавлено: 23.05.08 18:35 |
|
Есть ещё FSO.
А вообще я чёт не понял в чём там проблема, должен был и FileCopy работать. |
||
|
Номер ответа: 3 Автор ответа:  Администратор ICQ: 278109632 Вопросов: 42 Ответов: 3949 |
Web-сайт: Профиль | | #3 | Добавлено: 24.05.08 00:05 |
| Просто ты неверно что-то указал в параметрах, и все. 100% | ||
|
Номер ответа: 4 Автор ответа: WinandВопросов: 87 Ответов: 2795 |
Web-сайт: Профиль | | #4 | Добавлено: 24.05.08 01:29 |
| а что такое Pfad? это название файла? | ||
|
Номер ответа: 5 Автор ответа: Администратор ICQ: 278109632 Вопросов: 42 Ответов: 3949 |
Web-сайт: Профиль | | #5 | Добавлено: 24.05.08 13:09 |
| Он имел в виду "Path not found" | ||
|
Номер ответа: 6 Автор ответа: SmithICQ: adamis@list.ru Вопросов: 153 Ответов: 3632 |
Профиль | | #6 | Добавлено: 24.05.08 17:41 |
| ) | ||
|
Номер ответа: 7 Автор ответа: AgentFireICQ: 192496851 Вопросов: 75 Ответов: 3178 |
Профиль | | #7 | Добавлено: 24.05.08 18:33 |
| афтар, попорбуй создать папку "C:\indows\" | ||
|
Номер ответа: 8 Автор ответа: KreAtoR Вопросов: 120 Ответов: 438 |
Профиль | | #8 | Добавлено: 27.05.08 10:35 |
AgentFire 
strSource = "C:\yfile.txt" strTarget = "C:\indows\yfile.txt" так вот targetfile мне проблему то и создает. в данном случае должен быть файл с_датой_и_временем.wmv |
||
|
Номер ответа: 9 Автор ответа: WinandВопросов: 87 Ответов: 2795 |
Web-сайт: Профиль | | #9 | Добавлено: 27.05.08 20:23 |
| Папка-то indows есть или нет? | ||
Страница: 1 |