[madmasles]

Smokie_id11243755,
Попробуйте так:

Код:

; 1-й вариант
$sNameScript = StringLeft(@ScriptName, StringInStr(@ScriptName, '.') - 1)
MsgBox(0, '1', $sNameScript)
; 2-й вариант
$sNameScript = StringTrimRight(@ScriptName, StringInStr(@ScriptName, '.') - 1)
MsgBox(0, '2', $sNameScript)
; 3-й вариант
$sNameScript = StringMid(@ScriptName, 1, StringInStr(@ScriptName, '.') - 1)
MsgBox(0, '3', $sNameScript)
; 4-й вариант
$sNameScript = StringRegExpReplace(@ScriptName, '(.*?)\.\E.*', '\1')
MsgBox(0, '4', $sNameScript)