Кто-нибудь знает, как можно написать вот такую программу на purebasic, которая бы копировала N файл в др. место, и заменяла в скопированом файле %NAME% на указанное в константе имя:
Вот так это у меня работает на скрипте .vbs
Код:
const yourFullName = "EM140"
Dim FSO
Set FSO = CreateObject("Scripting.FileSystemObject")
FSO.CopyFile "\templates\config.ini.template", "\SimpleX-0.49\config.ini"
Sub ProcessFile(ByVal fName, ByVal from_, ByVal to_)
Const ForReading = 1, ForWriting = 2
Dim wFile
Dim rFile
Set rFile = FSO.OpenTextFile(fName,ForReading)
Dim Text
Text = rFile.ReadAll
Text = replace(Text,from_,to_)
Set wFile = FSO.OpenTextFile(fName,ForWriting)
wFile.Write Text
Set rFile = nothing
Set wFile = nothing
End Sub
Sub ProcessName(ByVal fName)
ProcessFile fName, "%NAME%", yourFullName
End Sub
Sub ProcessAll(ByVal fName)
ProcessName fName
End Sub
Set FSO = CreateObject("Scripting.FileSystemObject")
ProcessAll "\SimpleX-0.49\config.ini"
Set FSO = nothing
msgbox "Настройка завершена!!!"Заранее спасибо. 
С копированием разобрался!