IniWrite returning zero on a file that is not read only

[WhaleJesus]

Hey all, i am once again having trouble with IniWrite, the file is stored in C:\Documents\AutoItScripts\GameHub and i have full admin rights (I'm trying to make a program to track how much time i spend playing non-steam games, which turned into an idea for a game library of sorts, nothing to do with game automation besides launching them with shellexecute wait or however i decide to do this).

The problem is IniWrite is returning 0 on a file that is not marked as read-only, and i have no idea why.

 

expandcollapse popup

#include <FileConstants.au3>
;#RequireAdmin

; Choose game and multiple files to run when Game is launched

Global $DataFile, $ListN


$DataFile = @ScriptDir & "\DataFile.ini"
$ListN = IniRead($DataFile, "List", "Total", "Error")
;MsgBox(0, "", $DataFile)

If $ListN = "Error" Then
    MsgBox(0, "Error", 'Variable "Total" in Data.ini does not exist')
    Exit
EndIf


Create()

Func Create()

    Local $DataFile, $Name, $SpecifyAmount, $MainFile, $MainFileStringSplit, $NextFile, $AmountConfirm



    While 1

        $Name = InputBox("Enter Name", "What is the game called?")
        $AmountConfirm = MsgBox(4, "", "Should multiple programs be run?")

        If $AmountConfirm = 7 Then
            $SpecifyAmount = 1
            ExitLoop
        Else
            $SpecifyAmount = InputBox("Specify amount", "How many files?")

            #cs
            If IS($SpecifyAmount) = True Then
                ExitLoop
            Else
                MsgBox(0, "Bruh", "Please enter a number")
            EndIf
            #ce

        EndIf



    WEnd

    While 1

        $MainFile = FileOpenDialog("Choose Main game file or shortcut", "", "All (*.*)", $FD_FILEMUSTEXIST)
        $MainFileStringSplit = StringSplit($MainFile, ".")
        ;MsgBox(0, "", $MainFileStringSplit[$MainFileStringSplit[UBound]])

        If $MainFileStringSplit[$MainFileStringSplit[UBound]] = "exe" Or $MainFileStringSplit[$MainFileStringSplit[UBound]] = "lnk" Then
            ExitLoop
        Else
            MsgBox(0, "Bruh", "Please select .exe or .lnk file")
        EndIf

    WEnd

    $ListN = Number($ListN) + 1
    ;MsgBox(0, "", $ListN)

    IniWrite($DataFile, "List", "Total", $ListN)
    IniWrite($DataFile, "List", $ListN, $Name)
    IniWriteSection($DataFile, $Name, "Total=" & $SpecifyAmount & @LF & "File1=" & $MainFile)


    If Number($SpecifyAmount) > 1 Then

        For $i = 2 To $SpecifyAmount

            $NextFile = FileOpenDialog("Choose next file or shortcut", "", "All (*.*)", $FD_FILEMUSTEXIST)
            IniWrite($DataFile, $Name, "File" & $i, $NextFile)

        Next

    EndIf

EndFunc   ;==>Create

 

Edited August 25, 2021 by WhaleJesus
"and i have full admin rights

[spudw2k]

I think your Local $DataFile inside your Create function is overruling your Global.

Edited August 25, 2021 by spudw2k

[WhaleJesus]

11 minutes ago, spudw2k said:

I think your Local $DataFile inside your Create function is overruling your Global.

Somehow coding makes me feel more stupid every day 😂, thanks a lot!!

 

[Danp2]

A strategically placed ConsoleWrite would have identified the issue right away. You might want to give that a shot next time.

[WhaleJesus]

Thanks, i just tried it out and it doesn't seem nearly as complicated as i thought it would be