Первая попытка приложения VB.NET. Я пытаюсь создать приложение для копирования стандартных конфигураций для приложения, а затем настроить определенные параметры для этого пользователя. У меня большая часть приложения работает нормально, но у меня проблема с файлами ресурсов.Копирование ресурсов на диск
Поскольку количество файлов может меняться, я использую подпапку для своих ресурсов. У меня есть файлы, установленные для содержимого и всегда копируемые. Я могу получить следующий код для работы в отладке, но кажется, что я не делаю это правильно для сборки.
For Each strFile In Directory.GetFiles(".\Files")
If Path.GetExtension(Path.GetFileName(strFile)) = ".vbs" Then
strDestination = strDataPath & "Scripts\"
Else
strDestination = strDataPath
End If
If Not Directory.Exists(strDestination) Then
Directory.CreateDirectory(strDestination)
End If
If My.Settings.chkForceOverwrite = True Then
Try
File.Copy(strFile, strDestination & Path.GetFileName(strFile), True)
Catch ex As Exception
Console.WriteLine(ex.Message)
End Try
Else
Try
File.Copy(strFile, strDestination & Path.GetFileName(strFile), False)
Catch ex As Exception
Console.WriteLine(ex.Message)
End Try
End If
Next
Я попытался несколько способов копирования данных, но я не могу найти ничего совместимого, например следующее.
Dim strFileName As String = Path.GetFileNameWithoutExtension(strFile)
File.WriteAllBytes(strDestination & strFile, My.Resources.strFileName, True)
Может кто-нибудь указать мне правильное и правильное направление для этого? В настоящее время типы файлов - 1 .vbs и 1 .exe.config, но мне может понадобиться добавить разные типы файлов в будущем.
какой результат от этого кода? – matzone
Вы имеете в виду File.WriteAllBytes? 'strFileName' не является членом 'Resources' –
Нет, первый код .. это делает нежелательный результат? – matzone