Guten Tag zusammen,
ich würde gerne den Inhalt einer ".txt" Datei mit dem Inhalt einer ComboBox abgleichen.
Sollte ein Gleiches Wort in der ".txt" Datei auftauchen sollte eine Messagebox auftauchen.
Meine ComboBox heißt ComboBox1 und die txt Datei "Gefährliche Links.txt"
ich hoffe jemand hat einen Rat für mich.
MFG:
derBrot
Ich werde mir mal eure Tutorials anschauen , vielen Dank für die schnellen Antworten 
Guten Abend,
ich programmiere nun schon ziemlich lange mit der AutoIT Reihe und wollte daher auf C++ umsteigen.
Jetzt bin ich auf der Suche nach einem guten Tutorial.
Ich verwende Visual Basic C++ 2010 Express ( x64 Bit )
kann mir jemand eins empfehlen ?
Momment ich glaub ich habe die falsche Funktion eingefügt... 
Bei mir kommt jetzt eine Fehler meldung:
Fehlermeldung:
If _PseudoIniRead($sKey) = guictrlread($Input2) Then
If ^ ERRORTeil der While schleife
[autoit]
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
For $i = 255 to 0 Step -15
Sleep(50)
WinSetTrans($WinMain,$WinMain,$i)
Next
Exit
Case $Button1
Global $size = WinGetPos($WinMain, $WinMain)
_FTP_ProgressDownload($l_FTPSession,@Tempdir&"\ctf.ini",guictrlread($Input1)&".ini","_UpdateProgress")
IniWrite(@userprofiledir&"\config.gta","Allgemein","Name",guictrlread($Input1))
$sIniPath = @Tempdir&"\ctf.ini"
$sKey = "Key"
If _PseudoIniRead($sKey) = guictrlread($Input2) Then
GUIDelete($WinMain)
_StatistikenGUI()
Else
MsgBox(0,"","PW Falsch")
EndIf
EndSwitch
WEnd
EndFunc
Hier die Funktion:
[autoit]
Func _PseudoIniWrite($sKey,$sValue) ;schreibt einen Wert zu einem KEY ins Array KEINE SPEICHERUNG IN DATEI AN DIESER STELLE
Local $iPos = _ArraySearch($aINI, $sKey)
;ConsoleWrite("gefunden an: " & $iPos & ". Stelle" & @CRLF)
If $iPos <> -1 And $aINI[$iPos][0] = $sKey Then
$aINI[$iPos][1]=$sValue
Else
SetError(-1)
EndIf
EndFunc
Vielen Dank autoBert du bist der beste
jaaaa genau Christoph54
kann man das auch so machen das z.B nur der Key ausgelesen wird ? 
hm.. okay, gibt es den noch eine andere Lösung die Daten auszulesen ?
Der Game Server ( GTA San Andreas Multiplayer ) speichert die Accounts aber in .ini datein ohne Sektionsnamen... 
Aufgrund dessen war meine Frage ja auch ob es möglich ist den Sektionsnamen auszuschließen.
Guten Abend liebe Leute,
Ich würde gerne ein Script machen welches mir ermöglicht die Accountkonten meiner Benutzer zu bearbeiten ( .ini ).
Ich habe aber mit dem Auslesen der Konten Probleme...
Hier ein Beispiel Script:
[autoit]
MsgBox(0,"",IniRead("ben.ini","","Key",""))
[/autoit]Und hier mein Test Konto:
https://autoit.de/www.workupload.com/file/T3Ze0WT
Müsste jetzt gehen oder ?
[autoit]
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1_1 = GUICreate("Form1", 616, 383, 192, 124)
$Edit1 = GUICtrlCreateEdit("", 8, 8, 593, 305)
GUICtrlSetData(-1, "")
$Button1 = GUICtrlCreateButton("Schließen", 104, 328, 121, 41)
$Button2 = GUICtrlCreateButton("Speichern", 240, 328, 121, 41)
$Button3 = GUICtrlCreateButton("Öffnen", 376, 328, 121, 41)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Button1
Exit
Case $Button2
_save()
Case $Button3
_open()
EndSwitch
WEnd
Func _save()
Local $sFile = FileSaveDialog("Datei Speichern", @DesktopDir & "", "Eigener Text (*.et)", 16)
If @error Then
MsgBox(0,"Abbruch", "Speichervorgang abgebrochen!")
Else
FileWrite($sFile & ".et",GUICtrlRead($Edit1))
EndIf
EndFunc
Func _open()
Local $oFile = FileOpenDialog("Datei öffnen", @DesktopDir & "", "Eigener Text (*.et)",16)
Local $dFile = FileRead($oFile)
If @error Then
MsgBox(0,"Abbruch", "Keine Dateien ausgewählt!")
Else
GUICtrlSetData($Edit1, $dFile)
EndIf
EndFunc
// Edit* Deine Frage falsch gelesen
Das hier ist nun mein aktuelles Script also auch mit der Bearbeitungsfunktion.
#include<GUIConstantsEx.au3>
#include<WindowsConstants.au3>
#include <GUIListView.au3>
#include <FTPEx.au3>
#include <Array.au3>
Global $Prozentt, $Prozent
$Server = "****"
$Username = "******"
$Passwort = "*************************"
Global $Path = "/Tickets/"
Global $Ziel = @DesktopDir
Global $Open, $l_FTPSession, $aFile, $iFileSize
$gui = GUICreate('Ticket System', 699, 425)
Global $hListView = GUICtrlCreateListView('Ticket Name |Erstellungs Datum |Gr', 16, 25, 425, 185)
$idBtnRefresh = GUICtrlCreateButton("&Refresh", 351, 219, 92, 31)
$Group1 = GUICtrlCreateGroup("Funktionen", 448, 8, 241, 209)
$idInpTicketName = GUICtrlCreateInput("Ticket Name", 456, 32, 225, 26)
GUICtrlSetFont(-1, 8, 800, 0, "Palatino Linotype")
$idEdtTicketAmswer = GUICtrlCreateEdit("", 456, 64, 225, 145)
GUICtrlSetData(-1, "Antwort auf das Ticket")
GUICtrlSetFont(-1, 8, 800, 0, "Palatino Linotype")
GUICtrlCreateGroup("", -99, -99, 1, 1)
$idBtnMessage = GUICtrlCreateButton("Nachricht &Senden", 574, 219, 116, 31)
$idBtnDeleteTicket = GUICtrlCreateButton("Ticket &Verwerfen", 450, 219, 116, 31)
$Group2 = GUICtrlCreateGroup("Ticket Liste", 8, 8, 441, 209)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$idBtnExitTS = GUICtrlCreateButton("Ticket System V&erlassen", 351, 299, 340, 31)
$idEdtTicketQuestion = GUICtrlCreateEdit("", 8, 224, 337, 109)
GUICtrlSetData(-1, "Inhalt des Tickets")
GUICtrlSetFont(-1, 8, 800, 0, "Palatino Linotype")
$idBtnOpenTicket = GUICtrlCreateButton("Ticket &Öffnen", 351, 259, 340, 31)
$idTicketGesamt = GUICtrlCreateLabel("Gesamt-Tickets: 100", 105, 336, 802, 20)
GUICtrlSetFont(-1, 8, 800, 0, "Palatino Linotype")
_FTPLogin()
_GetTickets()
$idContextmenu = GUICtrlCreateContextMenu($hListView)
$idCMnuDelete = GUICtrlCreateMenuItem("Ticket &Verwerfen", $idContextmenu)
$idCMnuOpen = GUICtrlCreateMenuItem("Ticket &Öffnen", $idContextmenu)
$idCMnuSend = GUICtrlCreateMenuItem("Nachricht &Senden", $idContextmenu)
GUICtrlCreateMenuItem("", $idContextmenu)
GUIRegisterMsg($WM_NOTIFY, "WM_NOTIFY") ;<======================= Bemachrichtigung Doppelklick etc.
_ColSizes()
GUISetState()
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE, $idBtnExitTS
$Ftpc = _FTP_Close($Open)
Exit
Case $idBtnOpenTicket, $idCMnuOpen
_OpenTicket()
Case $idBtnDeleteTicket, $idCMnuDelete
$sDeleteTicket = GUICtrlRead($idInpTicketName)
GUICtrlSetData($idEdtTicketQuestion, "Inhalt des Tickets")
GUICtrlSetData($idInpTicketName, "Ticket Name")
#cs ;so geht es schneller
For $i = 0 To _GUICtrlListView_GetItemCount($hListView) - 1
$aTicketLV = _GUICtrlListView_GetItemTextArray($hListView, $i)
ConsoleWrite($aTicketLV[1] & @TAB)
If $sDeleteTicket == $aTicketLV[1] Then
_FTP_FileDelete($l_FTPSession, $sDeleteTicket)
_GUICtrlListView_DeleteItem($hListView, $i)
ConsoleWrite("Deleted" & @CRLF)
$iFileSize -= $aTicketLV[3]
Else
ConsoleWrite(@CRLF)
EndIf
Next
_ShowStat()
#ce
;#cs ;so wird auch gleich refresht
_FTP_FileDelete($l_FTPSession, $sDeleteTicket)
_GUICtrlListView_DeleteAllItems($hListView)
_GetTickets()
;#ce
GUICtrlSetData($idInpTicketName, "Ticket Name")
Case $idBtnMessage, $idCMnuSend
_EditTicket()
Case $idBtnRefresh
_GUICtrlListView_DeleteAllItems($hListView)
GUICtrlSetData($idEdtTicketQuestion, "Inhalt des Tickets")
_GetTickets()
EndSwitch
WEnd
Func _FTPLogin()
Local $iRetrys
Do
$Open = _FTP_Open('Mein FTP-Control')
If @error Then $iRetrys += 1
ConsoleWrite("Open Retrys: " & $iRetrys & @CRLF)
If $iRetrys > 5 Then
MsgBox(16, "FTP-Fehler", "Open: " & @error)
Exit
EndIf
Until $Open <> 0
$iRetrys = 0
Do
$l_FTPSession = _FTP_Connect($Open, $Server, $Username, $Passwort)
If @error Then $iRetrys += 1
ConsoleWrite("Connect Retrys: " & $iRetrys & @CRLF)
If $iRetrys > 5 Then
MsgBox(16, "FTP-Fehler", "Connect: " & @error)
Exit
EndIf
Until $l_FTPSession <> 0
_FTP_DirSetCurrent($l_FTPSession, $Path)
EndFunc ;==>_FTPLogin
Func _GetTickets()
Local Static $iRetrys
$aFile = _FTP_ListToArrayEx($l_FTPSession, 2, $INTERNET_FLAG_RELOAD)
If $aFile = 0 Then
ConsoleWrite("GetTicket Retrys: " & $iRetrys & @CRLF)
If $iRetrys < 4 Then
$iRetrys += 1
$iAnswer = 6
Else
$iAnswer = MsgBox(36, "FTP-Fehler", "Tickets holen: " & @error & @CRLF & @CRLF & "Nochmal versuchen?")
EndIf
If $iAnswer = 6 Then
$Ftpc = _FTP_Close($Open) ;vorsichtshalber
Sleep(1000)
_FTPLogin()
_GetTickets()
Else
Exit
EndIf
EndIf
$iFileSize = 0
_GUICtrlListView_BeginUpdate($hListView)
For $i = 1 To $aFile[0][0]
GUICtrlCreateListViewItem($aFile[$i][0] & '|' & $aFile[$i][3] & '|' & $aFile[$i][1], $hListView)
$iFileSize += $aFile[$i][1]
Next
_ColSizes()
_GUICtrlListView_EndUpdate($hListView)
_ShowStat()
EndFunc ;==>_GetTickets
Func _ShowStat()
ConsoleWrite("Grösse aller Tickets: " & $iFileSize & @CRLF)
ConsoleWrite("Anzahl aller Tickets: " & _GUICtrlListView_GetItemCount($hListView) & @CRLF)
GUICtrlSetData($idTicketGesamt,"Gesamt-Tickets: " & _GUICtrlListView_GetItemCount($hListView))
;dies evtl. in Labels anzeigen lassen
EndFunc ;==>_ShowStat
Func _OpenTicket()
$sOpenTicket = GUICtrlRead($idInpTicketName)
If $sOpenTicket <> "Ticket Name" Then
ConsoleWrite($sOpenTicket & @TAB)
#cs ;klappt nicht
$hFileOpen = _FTP_FileOpen($l_FTPSession, $sOpenTicket)
$sText = ""
Do
$sText &= _FTP_FileRead($hFileOpen, 256)
Until @error
$sText = BinaryToString($sText)
#ce
_FTP_FileGet($l_FTPSession, $sOpenTicket, $Ziel & "\" & $sOpenTicket)
ConsoleWrite(@error & @CRLF)
$sText = IniRead($Ziel & "\" & $sOpenTicket,"Allgemein","Frage","Leer")
GUICtrlSetData($idEdtTicketQuestion, $sText)
;FileDelete($Ziel&"\"&$sOpenTicket)
GUICtrlSetData($idInpTicketName, "Ticket Name")
Else
ConsoleWrite("nothing selected" & @CRLF)
EndIf
ConsoleWrite("ready " & @CRLF)
EndFunc ;==>_OpenTicket
Func _ColSizes()
_GUICtrlListView_HideColumn($hListView, 2) ;Größe verstecken
_GUICtrlListView_SetColumnWidth($hListView, 0, 210)
_GUICtrlListView_SetColumnWidth($hListView, 1, 140)
EndFunc ;==>_ColSizes
Func WM_NOTIFY($hWnd, $MsgID, $wParam, $lParam)
Local $tagNMHDR, $event, $hwndFrom, $code
$tagNMHDR = DllStructCreate("int;int;int", $lParam)
If @error Then Return 0
$code = DllStructGetData($tagNMHDR, 3)
If $wParam = $hListView Then
;ConsoleWrite($code & @CRLF)
Switch $code
;Case $NM_CLICK,$NM_RCLICK ,$NM_DBLCLK; Links-, Rechts-, Doppelklick
Case $NM_CLICK, $NM_RCLICK, $NM_DBLCLK
$i = _GUICtrlListView_GetSelectedIndices($hListView)
If $i <> "" Then
$i = Int($i)
$aTicket = _GUICtrlListView_GetItemTextArray($hListView, $i)
$sTicket = $aTicket[1]
GUICtrlSetData($idInpTicketName, $sTicket)
EndIf
If $code = $NM_DBLCLK Then _OpenTicket()
EndSwitch
EndIf
Return $GUI_RUNDEFMSG
EndFunc ;==>WM_NOTIFY
Func _EditTicket()
$sOpenTicket = GUICtrlRead($idInpTicketName)
If $sOpenTicket <> "Ticket Name" Then
ConsoleWrite($sOpenTicket & @TAB)
#cs ;klappt nicht
$hFileOpen = _FTP_FileOpen($l_FTPSession, $sOpenTicket)
$sText = ""
Do
$sText &= _FTP_FileRead($hFileOpen, 256)
Until @error
$sText = BinaryToString($sText)
#ce
_FTP_FileGet($l_FTPSession, $sOpenTicket, $Ziel & "\" & $sOpenTicket)
ConsoleWrite(@error & @CRLF)
IniWrite($Ziel & "\" & $sOpenTicket,"Allgemein","Antwort",GUICtrlRead($idEdtTicketAmswer))
_FTP_ProgressUpload($l_FTPSession,$Ziel & "\" & $sOpenTicket,$sOpenTicket,"_UpdateProgress")
FileDelete($Ziel & "\" & $sOpenTicket)
GUICtrlSetData($idEdtTicketQuestion,"Inhalt des Tickets")
GUICtrlSetData($idInpTicketName, "Ticket Name")
GUICtrlSetData($idEdtTicketAmswer, "Antwort auf das Ticket")
Else
ConsoleWrite("nothing selected" & @CRLF)
EndIf
ConsoleWrite("ready " & @CRLF)
EndFunc ;==>_OpenTicket
Func _UpdateProgress($percent)
return 1
EndFunc ;==>_UpdateProgress
Nun meine letzte Frage, ist es möglich da noch eine Status leiste des Tickets hinzuzufügen ?
Also noch eine Spalte wo drin steht BEARBEITET oder OFFEN .
Edit Oscar: Spoiler eingefügt. Bitte bei längeren Quelltexten den Spoiler benutzen!
danke autoBert , ich habs mir mal angesehen und es ist Super
Juhu es geht !
vielen vielen Dank für eure Unterstützung
Erst wenn ich das Programm neu starte werden die neuen Tickets angezeigt, und ja die Tickets landen im richtigen ordner.
PS: Das geht immer noch nicht 
Ich möchte dich nicht nerven aber könntest du nochmal drüber schaun , wäre echt nett ?
Das hier unter den Label setzten
GUICtrlSetBkColor(-1, $GUI_BKCOLOR_TRANSPARENT)
und das hier unter dein Bild
GUICtrlSetState(-1, $GUI_DISABLE)
Die neu angekommenen Tickets werden aber immer noch nicht beim druck auf den Refresh Button angezeigt.
Ich habe schon geguckt woran es liegen kann aber ich finde einfach keinen Grund....
Das Problem ist nun , dass wenn ich auf Refresh klicke keine neu Hochgeladenen Tickets angezeigt werden. Warum ?
autobert, vielen dank für deine Unterstützung.
Ich werd's gleich mal testen
Moin Moin,
ich habe ein Script gemacht welches alle Datein in meinem FTP Ordner auflistet.
Wenn man auf "Ticket löschen" klickt wird das eingegebene Ticket gelöscht und
die Dateiliste aktualisiert, nur das funktioniert bei mir nicht so ganz...
ich wäre mich freuen wenn mir jemand helfen würde !
#include<GUIConstantsEx.au3>
#include<WindowsConstants.au3>
#include <GUIListView.au3>
#include <FTPEx.au3>
#include <Array.au3>
Global $Prozentt,$Prozent
$Server = "***"
$Username = "****"
$Passwort = "****"
$Path = "/Tickets/"$Ziel = @DesktopDir
$Open = _FTP_Open('Mein FTP-Control')
$l_FTPSession= _FTP_Connect($Open, $Server, $Username, $Passwort)
$aFile = _FTP_ListToArrayEx($l_FTPSession, 2)
$FileSize = _FTP_FileGetSize($l_FTPSession,"Tickets")
$gui = GUICreate('Ticket System', 699, 425)
$hListView = GUICtrlCreateListView('Ticket Name|Erstellungs Datum|',16, 25, 425, 185)
_GUICtrlListView_SetColumnWidth($hListView, 0, 210)
_GUICtrlListView_SetColumnWidth($hListView, 1, 180)
$Button3 = GUICtrlCreateButton("Refresh", 351, 219, 92, 31)
$Group1 = GUICtrlCreateGroup("Funktionen", 448, 8, 241, 209)
$Input1 = GUICtrlCreateInput("Ticket Name", 456, 32, 225, 26)
GUICtrlSetFont(-1, 8, 800, 0, "Palatino Linotype")
$Edit2 = GUICtrlCreateEdit("", 456, 64, 225, 145)
GUICtrlSetData(-1, "Antwort auf das Ticket")
GUICtrlSetFont(-1, 8, 800, 0, "Palatino Linotype")
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Button1 = GUICtrlCreateButton("Nachricht senden", 574, 219, 116, 31)
$Button2 = GUICtrlCreateButton("Ticket Verwerfen", 450, 219, 116, 31)
;~ GUICtrlSetOnEvent($Button2,"_TDelete")
$Group2 = GUICtrlCreateGroup("Ticket Liste", 8, 8, 441, 209)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Button4 = GUICtrlCreateButton("Ticket System Verlassen", 351, 299, 340, 31)
$Edit3 = GUICtrlCreateEdit("", 8, 224, 337, 109)
GUICtrlSetData(-1, "Inhalt des Tickets")
GUICtrlSetFont(-1, 8, 800, 0, "Palatino Linotype")
$Button5 = GUICtrlCreateButton("Ticket Öffnen", 351, 259, 340, 31)
For $i = 1 To $aFile[0][0]
;~ GUICtrlCreateListViewItem( $aFile[$i][0]& ' | ' & $aFile[$i][1] & ' | ' & $aFile[$i][2]& ' | ' & $aFile[$i][3], $hListView)
GUICtrlCreateListViewItem( $aFile[$i][0]& ' | ' & $aFile[$i][3], $hListView)
Next
GUISetState()
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
$Ftpc = _FTP_Close($Open)
$Ftpc = _FTP_Close($Open)
Exit
Case $Button2
_FTP_FileDelete($l_FTPSession,guictrlread($Input1))
_GUICtrlListView_DeleteAllItems($hListView)
GUICtrlDelete($hListView)
$hListView = GUICtrlCreateListView('Ticket Name|Erstellungs Datum|',16, 25, 425, 185)
_GUICtrlListView_SetColumnWidth($hListView, 0, 210)
_GUICtrlListView_SetColumnWidth($hListView, 1, 180)$Ftpc = _FTP_Close($Open)
$Open = _FTP_Open('Mein FTP-Control')
$l_FTPSession= _FTP_Connect($Open, $Server, $Username, $Passwort)
$aFile = _FTP_ListToArrayEx($l_FTPSession, 2)
For $i = 1 To $aFile[0][0]GUICtrlCreateListViewItem( $aFile[$i][0]& ' | ' & $aFile[$i][3], $hListView)
Next
Case $Button3
_GUICtrlListView_DeleteAllItems($hListView)
GUICtrlDelete($hListView)
$hListView = GUICtrlCreateListView('Ticket Name|Erstellungs Datum|',16, 25, 425, 185)
_GUICtrlListView_SetColumnWidth($hListView, 0, 210)
_GUICtrlListView_SetColumnWidth($hListView, 1, 180)
$Ftpc = _FTP_Close($Open)
$Open = _FTP_Open('Mein FTP-Control')
$l_FTPSession= _FTP_Connect($Open, $Server, $Username, $Passwort)
$aFile = _FTP_ListToArrayEx($l_FTPSession, 2)
For $i = 1 To $aFile[0][0]
GUICtrlCreateListViewItem( $aFile[$i][0]& ' | ' & $aFile[$i][3], $hListView)
Next
EndSwitch
WEnd
Edit Oscar: Spoiler eingefügt. Bitte bei längeren Quelltexten den Spoiler benutzen!