как передать файл без замены старых файлов с помощью pscp на vb6

504
Vincent

У меня есть приложение. при нажатии он передает все текстовые файлы на сервер, но заменяет старые файлы. Я хочу перенести новые файлы без замены старых файлов.

Вот мой код, который, когда вы нажимаете командную клавишу и запускаете командную оболочку:

pscp -pw password *.txt server@ipaddress:/path 

например. У меня есть файл с именем «filename_0000.txt» и «filename_0001.txt», переданные на сервер. Затем я передам новый файл с именем «filename_0000.txt». результат должен быть

filename_0000.txt filename_0000(1).txt or filename_0000_1.txt filename_0001.txt 

вот код vb6

Private Sub Command1_Click() res = Shell("cmd /c " & Trim(Text1.Text) & " >> " & App.Path & "\dir.txt") Timer2.Enabled = True End Sub  Private Sub Timer2_Timer() Open App.Path & "\dir.txt" For Input As #1 Do While Not EOF(1) Input #1, c List1.AddItem c Loop Timer2.Enabled = False Close #1 End Sub 
0
Какую логику вы хотите реализовать, чтобы они перестали писать? Сохранение в новый каталог, изменение новых или существующих имен файлов? Dave 10 лет назад 1
@DaveRook Я обновил свой пост. Спасибо за ответ Vincent 10 лет назад 0
@DaveRook Я снова обновил свой пост. Vincent 10 лет назад 0

0 ответов на вопрос

Похожие вопросы