Hallo,
hab ein kleines Problem 
$iresult = StringRegExp($iquellcode1, '<div class="blablablabla" blablablabla"blablablabla('blablablabla');">blablablabla</div>', 3)Im Pattern ist jetzt " und ' wie kann ich das jetzt in Anführungzeichen setzen?
Dein Wunsch soll in erfüllung gehen jedoch erst im 22. Jahrhundert
Ich wünsche mir mehr Wünsche
Wenn ich IE ohne AutoIt im Privat-Modus starte funktioniert mein vorhaben ja also sollte es doch so auch gehen
muss nur noch wissen wie ich das Ganze in die GUI integriere.
Danke für deine Antwort
Das hab ich so mittlerweile auch rausgefunden aber ich schaffe es noch nicht "IE InPrivate" in der GUI auszuführen.
eig. mein ich nicht facebook aber mit Facebook würde es im prinzip erstmal auch reichen
//edit
es würde mir auch reichen zu wissen wie ich IE im Privaten Modus starte
dein problem war doch das wenn du ein doppelten eintrag hast das der eine gelöscht wird oder?
#include <File.au3>
#include <Array.au3>
Local $aArray, $sPath = @ScriptDir & "\Test.ini"
_FileReadToArray($sPath, $aArray)
$aArray = _ArrayUnique($aArray, 1, 1)
_FileWriteFromArray($sPath, $aArray, 1)
;~ #include <File.au3>
;~ #include <Array.au3>
Local $aArray, $sPath = @ScriptDir & "\Test.ini"
_FileReadToArray($sPath, $aArray)
$aArray = _ArrayUnique($aArray, 1, 1)
_FileWriteFromArray($sPath, $aArray, 1)
Func _FileReadToArray($sFilePath, ByRef $aArray, $iFlag = 1)
If $iFlag Or $iFlag = Default Then
Local $hFileOpen = FileOpen($sFilePath, 0)
If $hFileOpen = -1 Then Return SetError(1, 0, 0)
Local $sFileRead = FileRead($hFileOpen)
FileClose($hFileOpen)
If StringLen($sFileRead) Then
$aArray = StringRegExp(@CRLF & $sFileRead, "([^\r\n]*)(?:\r\n|\n|\r|$)", 3)
$aArray[0] = UBound($aArray) - 2
ReDim $aArray[UBound($aArray) - 1]
Else
Return SetError(2, 0, 0)
EndIf
Else
$aArray = FileReadToArray($sFilePath)
If @error Then Return SetError(@error, 0, 0)
EndIf
Return 1
EndFunc ;==>_FileReadToArray
Func _FileWriteFromArray($sFilePath, Const ByRef $aArray, $iBase = Default, $iUBound = Default, $sDelimeter = "|")
; Check if we have a valid array as input
If Not IsArray($aArray) Then Return SetError(2, 0, 0)
; Check the number of dimensions
Local $iDims = UBound($aArray, 0)
If $iDims > 2 Then Return SetError(4, 0, 0)
; Determine last entry of the array
Local $iLast = UBound($aArray) - 1
If $iUBound = Default Or $iUBound > $iLast Then $iUBound = $iLast
If $iBase < 0 Or $iBase = Default Then $iBase = 0
If $iBase > $iUBound Then Return SetError(5, 0, 0)
If $sDelimeter = Default Then $sDelimeter = "|"
; Open output file for overwrite by default, or use input file handle if passed
Local $hFileOpen = $sFilePath
If IsString($sFilePath) Then
$hFileOpen = FileOpen($sFilePath, 2)
EndIf
If $hFileOpen = -1 Then Return SetError(1, 0, 0)
; Write array data to file
Local $iError = 0
Switch $iDims
Case 1
For $i = $iBase To $iUBound
If FileWrite($hFileOpen, $aArray[$i] & @CRLF) = 0 Then
$iError = 3
ExitLoop
EndIf
Next
Case 2
Local $sTemp
Local $iCols = UBound($aArray, 2)
For $i = $iBase To $iUBound
$sTemp = $aArray[$i][0]
For $j = 1 To $iCols - 1
$sTemp &= $sDelimeter & $aArray[$i][$j]
Next
If FileWrite($hFileOpen, $sTemp & @CRLF) = 0 Then
$iError = 3
ExitLoop
EndIf
Next
EndSwitch
; Close file only if specified by a string path
If IsString($sFilePath) Then FileClose($hFileOpen)
; Return results
If $iError Then Return SetError($iError, 0, 0)
Return 1
EndFunc ;==>_FileWriteFromArray
Func _ArrayUnique(Const ByRef $aArray, $iColumn = Default, $iBase = Default, $iCase = Default, $iFlags = Default)
If $iColumn = Default Then $iColumn = 1
If $iBase = Default Then $iBase = 0
If $iCase = Default Then $iCase = 0
If $iFlags = Default Then $iFlags = 1
; Start bounds checking
If UBound($aArray) = 0 Then Return SetError(1, 0, 0) ; Check if array is empty, or not an array
; $iBase can only be 0 or 1, if anything else, return with an error
If $iBase < 0 Or $iBase > 1 Or (Not IsInt($iBase)) Then Return SetError(2, 0, 0)
If $iCase < 0 Or $iCase > 1 Or (Not IsInt($iCase)) Then Return SetError(2, 0, 0)
If $iFlags < 0 Or $iFlags > 1 Or (Not IsInt($iFlags)) Then Return SetError(4, 0, 0)
Local $iDims = UBound($aArray, 0), $iNumColumns = UBound($aArray, 2)
If $iDims > 2 Then Return SetError(3, 0, 0)
; checks the given dimension is valid
If ($iColumn < 1) Or ($iNumColumns = 0 And ($iColumn - 1 > $iNumColumns)) Or ($iNumColumns > 0 And ($iColumn > $iNumColumns)) Then Return SetError(3, 0, 0)
; make $iColumn an array index, note this is ignored for 1D arrays
$iColumn -= 1
; create dictionary
Local $oD = ObjCreate("Scripting.Dictionary")
; compare mode for strings
; 0 = binary, which is case sensitive
; 1 = text, which is case insensitive
; this expression forces either 1 or 0
$oD.CompareMode = Number(Not $iCase)
Local $vElem
; walk the input array
For $i = $iBase To UBound($aArray) - 1
If $iDims = 1 Then
; 1D array
$vElem = $aArray[$i]
Else
; 2D array
$vElem = $aArray[$i][$iColumn]
EndIf
; add key to dictionary
; NOTE: accessing the value (.Item property) of a key that doesn't exist creates the key
; keys are guaranteed to be unique
$oD.Item($vElem)
Next
;
; return the array of unique keys
If BitAND($iFlags, 1) = 1 Then
Local $aTemp = $oD.Keys()
_ArrayInsert($aTemp, 0, $oD.Count)
Return $aTemp
Else
Return $oD.Keys()
EndIf
EndFunc ;==>_ArrayUnique
Func _ArrayInsert(ByRef $avArray, $iElement, $vValue = "")
If Not IsArray($avArray) Then Return SetError(1, 0, 0)
If UBound($avArray, 0) <> 1 Then Return SetError(2, 0, 0)
; Check element in array bounds + 1
If $iElement > UBound($avArray) Then Return SetError(3, 0, 0)
; Add 1 to the array
Local $iUBound = UBound($avArray) + 1
ReDim $avArray[$iUBound]
; Move all entries over til the specified element
For $i = $iUBound - 1 To $iElement + 1 Step -1
$avArray[$i] = $avArray[$i - 1]
Next
; Add the value in the specified element
$avArray[$iElement] = $vValue
Return $iUBound
EndFunc ;==>_ArrayInsert
wenn ich Cookies deaktivere kann ich mich garnicht mehr anmelden 
//edit keiner der helfen kann
Hallo
hab eine frage ist es möglich mit AutoIt gleichzeitig in 2 "Accounts" Online zu sein (mit IE) ?
z. B. Facebook
; Trap COM errors so that 'Back' and 'Forward'
; outside of history bounds does not abort script
; (expect COM errors to be sent to the console)
#include <GUIConstantsEx.au3>
#include <IE.au3>
#include <WindowsConstants.au3>
Local $oIE = _IECreateEmbedded()
GUICreate("Embedded Web control Test", 640, 580, _
(@DesktopWidth - 640) / 2, (@DesktopHeight - 580) / 2, _
$WS_OVERLAPPEDWINDOW + $WS_CLIPSIBLINGS + $WS_CLIPCHILDREN)
GUICtrlCreateObj($oIE, 10, 40, 600, 360)
Local $idButton_Back = GUICtrlCreateButton("Back", 10, 420, 100, 30)
Local $idButton_Forward = GUICtrlCreateButton("Forward", 120, 420, 100, 30)
Local $idButton_Home = GUICtrlCreateButton("Home", 230, 420, 100, 30)
Local $idButton_Change = GUICtrlCreateButton("Change", 340, 420, 100, 30)
Global $g_idError_Message = GUICtrlCreateLabel("", 100, 500, 500, 30)
GUICtrlSetColor(-1, 0xff0000)
GUISetState(@SW_SHOW) ;Show GUI
[/autoit] [autoit][/autoit] [autoit]_IENavigate($oIE, "www.facebook.com")
_IEAction($oIE, "stop")
; Waiting for user to close the window
[/autoit] [autoit][/autoit] [autoit]Example()
[/autoit] [autoit][/autoit] [autoit]While 1
Local $iMsg = GUIGetMsg()
Select
Case $iMsg = $GUI_EVENT_CLOSE
;~ ExitLoop
Case $iMsg = $idButton_Home
_IENavigate($oIE, "www.facebook.com")
_IEAction($oIE, "stop")
_IEAction($oIE, "back")
CheckError("Home", @error, @extended)
Case $iMsg = $idButton_Back
_IEAction($oIE, "back")
CheckError("Back", @error, @extended)
Case $iMsg = $idButton_Forward
_IEAction($oIE, "forward")
CheckError("Forward", @error, @extended)
Case $iMsg = $idButton_Change
_IENavigate($oIE, InputBox("Url","Url","www.google.de"))
_IEAction($oIE, "stop")
EndSelect
WEnd
GUIDelete()
[/autoit] [autoit][/autoit] [autoit]Exit
[/autoit] [autoit][/autoit] [autoit]Func CheckError($sMsg, $iError, $iExtended)
If $iError Then
$sMsg = "Error using " & $sMsg & " button (" & $iExtended & ")"
Else
$sMsg = ""
EndIf
GUICtrlSetData($g_idError_Message, $sMsg)
EndFunc ;==>CheckError
Func Example()
Local $oIE
Local $msg
$oIE = ObjCreate("Shell.Explorer.2")
; Create a simple GUI for our output
GUICreate("Embedded Web control Test", 640, 580, (@DesktopWidth - 640) / 2, (@DesktopHeight - 580) / 2)
GUICtrlCreateObj($oIE, 10, 10, 630, 570)
GUISetState(@SW_SHOW) ;Show GUI
$oIE.navigate("www.facebook.com") ; Loop until the user exits.
EndFunc ;==>Example
MfG
Bedanke mich für eure Hilfe
Ich mache es mit der Runden Methode thx
Hallo
habe ein ganz kleines problem
AutoIT rechnet irgendwie falsch
MsgBox(0,937.55+00.01,0+(105)+(100)+(230)+(25)+(20)+(-380)+(450)+(00.02)+(20)+(-10)+(00.02)+(-400)+(480)+(10)+(-10)+(10)+(-400)+(-8)+(-1)+(420)+(-10)+(-1.25)+(-22.02)+(-1)+(50)+(-5.60)+(-2)+(10)+(-5)+(3.12)+(-0.20)+(0.15)+(-6)+(-1)+(-0.50)+(50)+(00.02)+(00.01)+(10)+(-50)+(-3)+(-3)+(-1)+(2.50)+(50)+(3)+(-2)+(10.20)+(-7)+(-10)+(-1.89)+(-0.85)+(-8.99)+(-3.00)+(-1)+(-20)+(-450)+(-1)+(10)+(10)+(295.90)+(-20)+(-20)+(250)+(-1.50)+(-3.62)+(-1.03)+(20)+(10)+(20)+(-1.20)+(-3.50)+(-0.50)+(0.45)+(-0.60)+(12.00)+(-10)+(-2.78)+(7.40)+(12.40)+(5.80)+(3.62)+(1.77)+(-5)+(-3.91)+(-3)+(-1)+(20)+(-0.57)+(10)+(20)+(-0.22)+(-3.00)+(-10)+(-10)+(-1.25)+(5)+(-2.07)+(7)+(10)+(-1.39)+(2)+(-10)+(-20)+(15)+(0.20)+(-1.15)+(0.33)+(40)+(5)+(5)+(-1.60)+(-1.20)+(-3.86)+(-1.29)+(-0.99)+(20)+(1.75)+(2.49)+(10)+(-1.09)+(2.50)+(1.50)+(-4.99)+(-00.01)+(10)+(-4.00)+(50)+(-350)+(-10)+(-50)+(-2)+(5)+(-18)+(-0.65)+(-20)+(-0.44)+(-20)+(-0.78)+(-17.20)+(10)+(-3.59)+(-1.09)+(20)+(-10)+(3.09)+(9)+(50)+(35)+(-1.50)+(-10)+(10)+(-0.44)+(-12)+(-1.69)+(-0.20)+(15)+(5)+(-2.99)+(-0.50)+(360)+(-1.34)+(-4.00)+(0.25)+(-10)+(-1)+(-30)+(-20)+(10)+(-10)+(60)+(-20))
[/autoit]
[Blockierte Grafik: http://s.gullipics.com/image/u/g/u/32qnhd-kgrlig-kfh7/Unbenannt.png]
Das richtige Ergebniss ist natürlich 936.46
Ich weiß auch wo das Problem auftaucht aber nicht wieso
0+(105) = 105
105+(100) = 205
205+(230) = 435
435+(25) = 460
460+(20) = 480
480+(-380) = 100
100+(450) = 550
550+(00.02) = 550.02
550.02+(20) = 570.02
570.02+(-10) = 560.02
560.02+(00.02) = 560.04
560.04+(-400) = 160.04
160.04+(480) = 640.04
640.04+(10) = 650.04
650.04+(-10) = 640.04
640.04+(10) = 650.04
650.04+(-400) = 250.04
250.04+(-8) = 242.04
242.04+(-1) = 241.04
241.04+(420) = 661.04
661.04+(-10) = 651.04
651.04+(-1.25) = 649.79
649.79+(-22.02) = 627.77
627.77+(-1) = 626.77
626.77+(50) = 676.77
676.77+(-5.60) = 671.17
671.17+(-2) = 669.17
669.17+(10) = 679.17
679.17+(-5) = 674.17
674.17+(3.12) = 677.29
677.29+(-0.20) = 677.09
677.09+(0.15) = 677.24
677.24+(-6) = 671.24
671.24+(-1) = 670.24
670.24+(-0.50) = 669.74
669.74+(50) = 719.74
719.74+(00.02) = 719.76
719.76+(00.01) = 719.77
719.77+(10) = 729.77
729.77+(-50) = 679.77
679.77+(-3) = 676.77
676.77+(-3) = 673.77
673.77+(-1) = 672.77
672.77+(2.50) = 675.27
675.27+(50) = 725.27
725.27+(3) = 728.27
728.27+(-2) = 726.27
726.27+(10.20) = 736.47
736.47+(-7) = 729.47
729.47+(-10) = 719.47
719.47+(-1.89) = 717.58
717.58+(-0.85) = 716.73
716.73+(-8.99) = 707.74
707.74+(-3.00) = 704.74
704.74+(-1) = 703.74
703.74+(-20) = 683.74
683.74+(-450) = 233.74
233.74+(-1) = 232.74
232.74+(10) = 242.74
242.74+(10) = 252.74
252.74+(295.90) = 548.64
548.64+(-20) = 528.64
528.64+(-20) = 508.64
508.64+(250) = 758.64
758.64+(-1.50) = 757.14
757.14+(-3.62) = 753.52
753.52+(-1.03) = 752.49
752.49+(20) = 772.49
772.49+(10) = 782.49
782.49+(20) = 802.49
802.49+(-1.20) = 801.29
801.29+(-3.50) = 797.79
797.79+(-0.50) = 797.29
797.29+(0.45) = 797.74
797.74+(-0.60) = 797.14
797.14+(12.00) = 809.14
809.14+(-10) = 799.14
799.14+(-2.78) = 796.36
796.36+(7.40) = 803.76
803.76+(12.40) = 816.16
816.16+(5.80) = 821.96
821.96+(3.62) = 825.58
825.58+(1.77) = 827.35
827.35+(-5) = 822.35
822.35+(-3.91) = 818.44
818.44+(-3) = 815.44
815.44+(-1) = 814.44
814.44+(20) = 834.44
834.44+(-0.57) = 833.87
833.87+(10) = 843.87
843.87+(20) = 863.87
863.87+(-0.22) = 863.65
863.65+(-3.00) = 860.65
860.65+(-10) = 850.65
850.65+(-10) = 840.65
840.65+(-1.25) = 839.4
839.4+(5) = 844.4
844.4+(-2.07) = 842.33
842.33+(7) = 849.33
849.33+(10) = 859.33
859.33+(-1.39) = 857.94
857.94+(2) = 859.94
859.94+(-10) = 849.94
849.94+(-20) = 829.94
829.94+(15) = 844.94
844.94+(0.20) = 845.14
845.14+(-1.15) = 843.99
843.99+(0.33) = 844.32
844.32+(40) = 884.32
884.32+(5) = 889.32
889.32+(5) = 894.32
894.32+(-1.60) = 892.72
892.72+(-1.20) = 891.52
891.52+(-3.86) = 887.66
887.66+(-1.29) = 886.37
886.37+(-0.99) = 885.38
885.38+(20) = 905.38
905.38+(1.75) = 907.13
907.13+(2.49) = 909.62
909.62+(10) = 919.62
919.62+(-1.09) = 918.53
918.53+(2.50) = 921.03
921.03+(1.50) = 922.53
922.53+(-4.99) = 917.54
917.54+(-00.01) = 917.53
917.53+(10) = 927.53
927.53+(-4.00) = 923.53
923.53+(50) = 973.53
973.53+(-350) = 623.53
623.53+(-10) = 613.53
613.53+(-50) = 563.53
563.53+(-2) = 561.53
561.53+(5) = 566.53
566.53+(-18) = 548.53
548.53+(-0.65) = 547.88
547.88+(-20) = 527.88
527.88+(-0.44) = 527.44
527.44+(-20) = 507.44
507.44+(-0.78) = 506.66
506.66+(-17.20) = 489.46
489.46+(10) = 499.46
499.46+(-3.59) = 495.87
495.87+(-1.09) = 494.78
494.78+(20) = 514.78
514.78+(-10) = 504.78
504.78+(3.09) = 507.87
507.87+(9) = 516.87
516.87+(50) = 566.87
566.87+(35) = 601.87
601.87+(-1.50) = 600.37
600.37+(-10) = 590.37
590.37+(10) = 600.37
600.37+(-0.44) = 599.93
599.93+(-12) = 587.93
587.93+(-1.69) = 586.24
586.24+(-0.20) = 586.04
586.04+(15) = 601.04
601.04+(5) = 606.04
606.04+(-2.99) = 603.05
603.05+(-0.50) = 602.55
602.55+(360) = 962.55
962.55+(-1.34) = 961.209999999999
961.209999999999+(-4.00) = 957.209999999999
957.209999999999+(0.25) = 957.459999999999
957.459999999999+(-10) = 947.459999999999
947.459999999999+(-1) = 946.459999999999
946.459999999999+(-30) = 916.459999999999
916.459999999999+(-20) = 896.459999999999
896.459999999999+(10) = 906.459999999999
906.459999999999+(-10) = 896.459999999999
896.459999999999+(60) = 956.459999999999
956.459999999999+(-20) = 936.459999999999
936.459999999999+(00.01) = 936.469999999999
Kann jemand helfen?
Bin auch dabei.
Mit 1€ wäre ich auch dabei
können ruhig mehr teilnehmen
Der hat doch nur glück 
[Blockierte Grafik: http://png-5.findicons.com/files/icons/24…ay_16x16x32.png]
//Edit
Die BONUS-Fragen kann man wieder beantworten bis zum 29.08.14 !
Es kann losgehen!
[Blockierte Grafik: http://abload.de/img/200px-bundesliga-logoairg8.png]
Am 22.08.2014 hat die Bundesliga 14/15 begonnen.
Die Tippgemeinschaft auf kicktipp.de ist wieder startklar.
Hier ist der LINK zum Tippspiel.
Mitmachen kann jeder. Es wäre schön, wenn ihr denselben Nickname benutzt wie hier im Forum.
Neuanmeldung über diesen LINK.
Die BONUS-Fragen kann man bis zum 29.08.14 beantworten!
Ganz praktisch ist auch die Tipperinnerung: Tipperinnerung
Es wird nach den Standardregeln von Kicktipp.de gespielt.
denn bekommst du doch das Grün ist Schimmel.
Ich wünsche mir ganz viel Geld
Bekommst du auch aber sie ist auf einem Kaputten Usb Stick
Ich wünsche mir ganz viele Wünsche die Genauso erfüllt werden wie ich es will und ich bin der einzige der ein Vorteill durch diese Wünsche besitzt und ich habe keine konsequenzen durch diese Wünsche oder nachteile und natürlich sollen meine Wünsche in der Realität erfüllt werden.
Die bekommst du aber sie sind schon vor 2 jahren abgelaufen also nicht mehr gültig.
Ich wünsche mir die Weltherrschaft