Denis_Kokyev
Advanced Member | Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору FileChangeDir(@ProgramFilesDir & '\Dips') RunWait ( @Comspec & ' /C GetSID.bat', '', @SW_HIDE ) Sleep (1000) Global $defaultbrowser, $file, $string1, $string2, $string3, $string4, $string5, $string6, $sid, $line, $sum1, $sum2, $sum3, $sum4, $sum5 $file = FileOpen("sid.cfg", 0) $string1="HKEY_USERS\" $string2="\Software\Richter\Desktop Item Position Saver" If $file = -1 Then MsgBox(0, "Error", "Unable to open file.") Exit EndIf $line= FileReadLine($file, 1) FileClose($file) $sid= StringTrimRight($line, 2) $sum1= $string1 & $sid & $string2 RegWrite($SUM1,'Корзина',"REG_BINARY","1700000002000000") Файл GetSID.bat: for /f "usebackq tokens=*" %%a in (`"psgetsid %username% | find "S-""`) do echo %%a > sid.cfg |