|
You last visited: Today at 21:10
Advertisement
Check ob in datei.txt o.a. steht
Discussion on Check ob in datei.txt o.a. steht within the AutoIt forum part of the Coders Den category.
01/13/2012, 23:03
|
#1
|
elite*gold: 0
Join Date: Nov 2011
Posts: 121
Received Thanks: 45
|
Check ob in datei.txt o.a. steht
Wollte ein programm machen das checkt womit man checkt ob etwas in einer datei drinne steht z.b. wenn ich der datei steht Blub und ich dan in $Input1 eingebe beep dan kommt MsgBox(16,".:iIi:.","Error") und wenn ich eingebe Blub das dan da kommt MsgBox(48,".:iIi:.","--Succefully!--") .. das ich net alle sachen daraus einzelnd machen muss wissta ? wie da :
Code:
$I1 = Guictrlread($Input1)
If $1 = "Blub" Then
MsgBox(48,".:iIi:.","--Succefully!--")
EndIf
sondern was in richtung
Code:
$I1 = Guictrlread($Input1)
$1 = FileRead("Datei.txt")
If $I1 = In $1 Then
MsgBox(48,".:iIi:.","--Succefully!--")
EndIf
aber mit dem feinem unterschied das es geht in diesem script :
Code:
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
$Form1 = GUICreate("McDmT - GWoW", 342, 116, 470, 122)
$MenuItem1 = GUICtrlCreateMenu("Options")
$MenuItem5 = GUICtrlCreateMenuItem("PM Infos", $MenuItem1)
$MenuItem4 = GUICtrlCreateMenuItem("Commands", $MenuItem1)
$MenuItem3 = GUICtrlCreateMenuItem("Help", $MenuItem1)
$MenuItem6 = GUICtrlCreateMenu("Language")
$MenuItem8 = GUICtrlCreateMenuItem("English", $MenuItem6)
$MenuItem7 = GUICtrlCreateMenuItem("Deutsch", $MenuItem6)
$Label1 = GUICtrlCreateLabel("Cmd Look", 8, 8, 51, 17)
GUICtrlSetCursor (-1, 0)
$Input1 = GUICtrlCreateInput("/help", 8, 32, 161, 21)
GUICtrlSetLimit(-1, 30)
$Input2 = GUICtrlCreateInput("-----Testing-----", 176, 32, 161, 21, BitOR($GUI_SS_DEFAULT_INPUT,$ES_READONLY,$ES_CENTER))
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
GUICtrlSetBkColor(-1, 0x00FFFF)
$Label2 = GUICtrlCreateLabel("Status", 176, 8, 34, 17)
$Pic1 = GUICtrlCreatePic("C:\Users\"&@UserName&"\Desktop\bin\On.bmp", 80, 64, 28, 28)
GUICtrlSetCursor (-1, 0)
$Label3 = GUICtrlCreateLabel("Wom :", 8, 72, 68, 17)
$Label4 = GUICtrlCreateLabel("©2012 Cread by iK3ksii <3", 232, 80, 108, 15)
GUICtrlSetFont(-1, 7, 400, 0, "MS Serif")
GUISetState(@SW_SHOW)
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Label1
$1 = FileRead("Info.pps")
$I1 = GUICtrlRead($Input1)
Case $Pic1
ToolTip("Waiting...",40,18,"Wom.exe",48,2)
Run("Wom.exe")
EndSwitch
WEnd
/ ! \ ACHTUNG BEI $Label1 IST DIE STELLE .. / ! \
|
|
|
01/13/2012, 23:12
|
#2
|
elite*gold: 42
Join Date: Jun 2008
Posts: 5,426
Received Thanks: 1,888
|
Bist du eigentlich dumm oder <12?
OrthographieGrammatik
Satzzeichen
Aber falls ich deine Vergewaltigung der deutschen Sprache richtig verstanden habe:
Code:
if input in datei
succes
else
fail
|
|
|
01/13/2012, 23:17
|
#3
|
elite*gold: 0
Join Date: Nov 2011
Posts: 121
Received Thanks: 45
|
danke .. aber nein .. ich bin halt net so lange am coden ..
schreib mal lieber was verwendbares .. du ***** !
|
|
|
01/13/2012, 23:19
|
#4
|
elite*gold: 42
Join Date: Jun 2008
Posts: 5,426
Received Thanks: 1,888
|
Quote:
Originally Posted by iK3ksii
danke .. aber nein .. ich bin halt net so lange am coden ..
|
Ach und deshalb beherrschst du nichtmal Ansatzweise die deutsche Sprache?
|
|
|
01/13/2012, 23:21
|
#5
|
elite*gold: 0
Join Date: Nov 2011
Posts: 121
Received Thanks: 45
|
ach geh weg man und heul wen anders voll !!
|
|
|
01/13/2012, 23:24
|
#6
|
elite*gold: 42
Join Date: Jun 2008
Posts: 5,426
Received Thanks: 1,888
|
Quote:
Originally Posted by iK3ksii
ach geh weg man und heul wen anders voll !!
|
Ach, ich heule rum? Wär mir neu.
Naja, lolkop hat ja schon Aufgegeben dir zu helfen, werde es nun genau so halten. Und wir scheinen ja nicht die einzigen zu sein.
Viel spaß beim dumm bleiben :>
|
|
|
01/14/2012, 01:50
|
#7
|
elite*gold: 95
Join Date: May 2011
Posts: 982
Received Thanks: 189
|
yey jessica is back!
|
|
|
01/14/2012, 02:14
|
#8
|
elite*gold: 0
Join Date: Mar 2009
Posts: 7,260
Received Thanks: 33,147
|
Dieses mal aber mit "@UserName" und nicht mit "ALex".
|
|
|
01/14/2012, 14:43
|
#9
|
elite*gold: 0
Join Date: Feb 2011
Posts: 1,342
Received Thanks: 410
|
Habe dir es hier mal so geschrieben, wie du es wolltest. In deinem Script einfügen solltest du es aber schon selber.
Code:
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
$GUI = GUICreate("Beispiel", 265, 41, 192, 124)
$Start = GUICtrlCreateButton("Start", 184, 8, 75, 25)
$Input1 = GUICtrlCreateInput("", 8, 8, 169, 21)
GUISetState(@SW_SHOW)
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Start
$I1 = Guictrlread($Input1) ; Liest die Eingaben in Input1 aus
$1 = FileRead("Datei.txt") ; Liest die Textdatei "Datei.txt"
If StringInStr ($1,$I1) Then ; Wenn Datei.txt die Eingaben von Input1
; irgendwo im Text stehen hat, dann ...
MsgBox(48,".:iIi:.","--Succefully!--")
Else
MsgBox(16,".:iIi:.","Error")
EndIf
EndSwitch
WEnd
|
|
|
01/15/2012, 15:54
|
#10
|
elite*gold: 0
Join Date: May 2008
Posts: 23
Received Thanks: 10
|
Wenn du es noch genauer haben willst, als wie netterwurm8 bereits schrieb:
PHP Code:
#include <File.au3>
Global $FileName = "Info.pps", $FileLine
Case $Label1 Local $aFileData, $UserInput = GUICtrlRead($Input1) _FileReadToArray($FileName, $aFileData) ; liest die Datei in ein Array (Zeile für Zeile) For $i = 1 To $aFileData[0] Step 1 If StringInStr($aFileData[$i], $UserInput) Then ; prüft ob der String in Zeile $i ist $FileLine = $i MsgBox(48,".:iIi:.","Found!" & @CRLF & "Line: " & $FileLine) ExitLoop ; springt aus der For-Schleife, da Begriff gefunden EndIf Next
Solltest du die genaue Zeile wissen wollen in der der String gefunden wurde, bekommst du diese so in $FileLine gespeichert.
|
|
|
01/16/2012, 22:24
|
#11
|
elite*gold: 0
Join Date: Nov 2011
Posts: 121
Received Thanks: 45
|
Quote:
Originally Posted by butter123
yey jessica is back!
|
werd erwachsen und machs wie die anderen .. schreib ne lösung keine dummen unnötigen kommentare die kein schwein interesieren ! DANKE SEHR !
|
|
|
01/16/2012, 22:36
|
#12
|
elite*gold: 95
Join Date: May 2011
Posts: 982
Received Thanks: 189
|
aber gerne doch
da lösung aller probleme
kostet dich höchstens 1 minute... aber, nachdenken, was man suchen soll ist echt schon hart...
|
|
|
01/16/2012, 22:56
|
#13
|
elite*gold: 42
Join Date: Jun 2008
Posts: 5,426
Received Thanks: 1,888
|
Quote:
Originally Posted by iK3ksii
werd erwachsen und machs wie die anderen .. schreib ne lösung keine dummen unnötigen kommentare die kein schwein interesieren ! DANKE SEHR !
|
Du sagst jemandem er soll Erwachsen werden? Btw, von diesen Posts hast du im Moment 30. :>
|
|
|
All times are GMT +2. The time now is 21:10.
|
|