UnBan

[Thatsgreat2345]

Fixed it got it working

expandcollapse popup

Case $msg = $unban
        $return = _GUICtrlListViewGetItemText($ListView2)   
        $return = StringSplit($return,"|")
        MsgBox(0,"asdf",$return[1])
        If $return[1] = "" Then
            MsgBox(0,"Error","No One Selected")
        ElseIf IniRead($members,"Banned Amount","1","") = "1" And $return[1] <> "" Then
            IniDelete($members,"Banned")
            IniWrite($members,"Banned Amount","1","0")
        _GUICtrlListViewDeleteItem($ListView2,_GUICtrlListViewFindItem($ListView2,$return[1]))  

        Else
        $file1 = @TempDir & "\TempBan.ini"
        _FileCreate($file1)
        For $i = 1 to IniRead($members,"Banned Amount","1","")
            IniWrite($file1,"Banned",$i,IniRead($members,"Banned",$i,""))
        Next
        For $i = 1 to IniRead($members,"Banned Amount","1","")
            $string = StringSplit(IniRead($members,"Banned",$i,""),"|")
            If $string[1] = $return[1] Then
                $location = $i
                ExitLoop
            EndIf
        Next
        For $i = 1 to IniRead($members,"Banned Amount","1","")
            IniDelete($members,"Banned",$i)
        Next
        For $i = 1 to IniRead($members,"Banned Amount","1","")
            $read = IniRead($file1,"Banned",$i,"")
            If $i = $location or $ers = 1 Then
                $ers = 1 
            IniWrite($members,"Banned",$i,IniRead($file1,"Banned",$i+1,""))
        Else
            IniWrite($members,"Banned",$i,IniRead($file1,"Banned",$i,""))
        EndIf
    Next
    For $i = 1 to IniRead($members,"Banned Amount","1","")
        If IniRead($members,"Banned",$i,"") = "" Then
            IniDelete($members,"Banned",$i)
        EndIf
    Next
    
    IniWrite($members,"Banned Amount","1",IniRead($members,"Banned Amount","1","")-1)
    $ers = 0
    _GUICtrlListViewDeleteItem($ListView2,_GUICtrlListViewFindItem($ListView2,$string[1]))
    $location = ""
    $ers = 0
EndIf
    EndSelect
    WEnd

Edited December 20, 2006 by Thatsgreat2345

[martin]

Too much for me to read at the moment.

What do mean by " Unban works for everything but the number 0003 xD"?

[Thatsgreat2345]

like ill have 0001, 0002, 0003, and 0004 in the ban window. I choose 0003 , press Unban it unbans 0001. xD but if i do like 0001, 0002 0004 0003 itll unban 0004 properly