Объявление переменных через If $var = a then $var1 = b

joiner сказал(а):

OrangeSound
переменные объявляешь вначале кода - всего скрипта или функции. потом уже меняешь им значения. ты же хочешь создать переменную при проверке условия, если я правильно понял.
Читай справку

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

$metalinfotype = 1

Assign("metalinfotype", "s")[autoit]
Попытка через If then поменять переменную

При сравнении через = строка считается нулем.

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

ConsoleWrite( 123 = "123" & @CRLF)

При сравнении через = строка считается нулем.Чтобы действительно сравнивать строки используйте ==

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

"СтРоКа" = "строка"

"СтРоКа" == "строка"

На выходе имеем только $metalinfotype = "s"

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

Local $prod = "Покупка"
If $prod = "Покупка" Then Assign("metalinfotype", "s")
MsgBox(0, @ScriptName, Eval("metalinfotype"))

Local $prod = "Продажа"
If $prod = "Продажа" Then Assign("metalinfotype" , "b")
MsgBox(0, @ScriptName, Eval("metalinfotype"))

Local $prod = "Другое"
If $prod = "Другое" Then Assign("metalinfotype", "o")
MsgBox(0, @ScriptName, Eval("metalinfotype"))

C2H5OH сказал(а):

Я удивлен, конечно.
Ну, хорошо, пробел в моих знаниях закрыли.
А что с ТС тогда ?
OrangeSound, показывай код как ты из ini-файла читаешь.

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

$prod = IniRead($obv, "prod", "prod", "")

Garrett сказал(а):

OrangeSound [?]

На выходе имеем только $metalinfotype = "s"

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

Код:

Local $prod = "Покупка"
If $prod = "Покупка" Then Assign("metalinfotype", "s")
MsgBox(0, @ScriptName, Eval("metalinfotype"))

Local $prod = "Продажа"
If $prod = "Продажа" Then Assign("metalinfotype" , "b")
MsgBox(0, @ScriptName, Eval("metalinfotype"))

Local $prod = "Другое"
If $prod = "Другое" Then Assign("metalinfotype", "o")
MsgBox(0, @ScriptName, Eval("metalinfotype"))

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

Medic84 сказал(а):

C2H5OH [?]

При сравнении через = строка считается нулем.Чтобы действительно сравнивать строки используйте ==

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

Нет. Сравнение строк с одним знаком =, обычное сравнение без учета регистра.

Код:

"СтРоКа" = "строка"

это выражение будет иметь значение True
А вот если:

Код:

"СтРоКа" == "строка"

тогда уже выражение имеет значение False

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

$metalinfotype = "p"
$prod = IniRead($obv, "prod", "prod", "")
If $prod == "Покупка" then $metalinfotype = "s"
If $prod == "Продажа" then $metalinfotype = "b"
If $prod == "Другое" then $metalinfotype = "o"
_IEFormElementRadioSelect($oForm, $metalinfotype, "category")

"СтРоКа" == "строка"

Суть в том, что переменную $prod мы берем из ini Файла, а не задаем изначально

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

$metalinfotype = "p"
MsgBox(0, @ScriptName, $metalinfotype)
IniWrite("prod.ini", "prod", "prod", "Другое")

$prod = IniRead("prod.ini", "prod", "prod", "")
If $prod == "Покупка" then $metalinfotype = "s"
If $prod == "Продажа" then $metalinfotype = "b"
If $prod == "Другое" then $metalinfotype = "o"

MsgBox(0, @ScriptName, $metalinfotype)
IniWrite("prod.ini", "prod", "prod", "Покупка")

$prod = IniRead("prod.ini", "prod", "prod", "")
If $prod == "Покупка" then $metalinfotype = "s"
If $prod == "Продажа" then $metalinfotype = "b"
If $prod == "Другое" then $metalinfotype = "o"

MsgBox(0, @ScriptName, $metalinfotype)
IniWrite("prod.ini", "prod", "prod", "Продажа")

$prod = IniRead("prod.ini", "prod", "prod", "")
If $prod == "Покупка" then $metalinfotype = "s"
If $prod == "Продажа" then $metalinfotype = "b"
If $prod == "Другое" then $metalinfotype = "o"

MsgBox(0, @ScriptName, $metalinfotype)