[Сеть, интернет] Обмен текстом между программой и создателем

joiner сказал(а):

любой файловый хостинг(бесплатный). на нем файл с ключем. программа качает в память текст и сравнивает.
только вот зачем?
защита программы? на форуме уже "очень сильно" обсудили этот вопрос. если программа нужная, то сломают на счет раз.

Нажмите, чтобы раскрыть...

И если в [Имя секции] есть Значение4 то к примеру изменить его на Значение5

Нажмите, чтобы раскрыть...

#include<array.au3>

$sIniFile = @ScriptDir & '\test.ini'
$sSearchText = 'Значение4'
$sReplaceText = 'Значение5'
$aSection = IniReadSectionNames($sIniFile)
For $i = 1 To $aSection[0]
	$aReadSection = IniReadSection($sIniFile, $aSection[$i])
	$aIndex = _ArrayFindAll($aReadSection, $sSearchText, 1, Default, Default, Default, 1)
	If Not @error Then
		For $j = 0 To UBound($aIndex) - 1
			IniWrite($sIniFile, $aSection[$i], $aReadSection[$aIndex[$j]][0], $sReplaceText)
		Next
	EndIf
Next

ra4o сказал(а):

И если в [Имя секции] есть Значение4 то к примеру изменить его на Значение5

Нажмите, чтобы раскрыть...

Во всех секциях ini файла ищет "Значение 4" и меняет на "Значение 5" , Так ?

Спойлер

Код:

#include<array.au3>

$sIniFile = @ScriptDir & '\test.ini'
$sSearchText = 'Значение4'
$sReplaceText = 'Значение5'
$aSection = IniReadSectionNames($sIniFile)
For $i = 1 To $aSection[0]
	$aReadSection = IniReadSection($sIniFile, $aSection[$i])
	$aIndex = _ArrayFindAll($aReadSection, $sSearchText, 1, Default, Default, Default, 1)
	If Not @error Then
		For $j = 0 To UBound($aIndex) - 1
			IniWrite($sIniFile, $aSection[$i], $aReadSection[$aIndex[$j]][0], $sReplaceText)
		Next
	EndIf
Next

Нажмите, чтобы раскрыть...

сравнивает значение4 со значениями из секции

Нажмите, чтобы раскрыть...

ra4o сказал(а):

сравнивает значение4 со значениями из секции

Нажмите, чтобы раскрыть...

Если это вопрос , то да, скрипт ищет во ВСЕХ секциях ini файла ВСЕ "значение4 " и ВЕЗДЕ, где находит меняет на "значение5". Так Вы хотели ? Или это я не понял задачу ?

Нажмите, чтобы раскрыть...