Ehrlich gesagt versteh ich nicht genau was du machen willst. Kannst du eine bsp. Excell Datei zeigen?
Beiträge von 4ern
-
-
@ BugFix anhand deines Beispiels habe ich versucht mein Problem mit der ListView zu lösen... und tatsächlich als $GW_CHILD erhalte ich eine "5" .... Nun weis ich leider nichts weiter damit anzufangen...
-
Du musst es auch als eine Excell Datei abspeichern.
In deinem Fall würde ich dan nur mit Excell arbeiten, wenn dir die Formatierung wichtig ist.
-
So gehts.
Code
[autoit]
[/autoit] [autoit][/autoit] [autoit]
#include <IE.au3>
#include <ScreenCapture.au3>
#include <Excel.au3>Opt('MustDeclareVars', 1)
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]LOCAL const $time = @YEAR & @MON & @MDAY & "_" & @hour & @MIN & @SEC
[/autoit] [autoit][/autoit] [autoit]
LOCAL $FrameSet,$WGTFile,$oExcel,$WGTLogLine,$oIE,$oDiv,$i,$timeBegin,$timDif,$winSize,$linktext,$hBmp,$j;--- Logdatei
[/autoit] [autoit][/autoit] [autoit]
$WGTFile = FileOpen("WGTPortalAnmeldeTest" & $time & ".csv", 1)WGTLogging("Startzeit;AnmeldeseiteGeladen[ms];HauptseiteGeladen[ms];ApplikationsseiteGeladen[ms];Ergebnis")
[/autoit] [autoit][/autoit] [autoit]
;$sFilePath1 = "C:\Test.xls"Local $excelPfad = @ScriptDir & "\WGTPortalAnmeldeTest" & $time & ".csv"
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
$oExcel = _ExcelBookOpen($excelPfad)
$oExcel.ActiveSheet.Columns("A:A").AutoFit;--- Wie oft soll geprüft werden?
[/autoit] [autoit][/autoit] [autoit]
For $j = 1 to 10000 Step 1;--Fenster schließen (wg. Cookies)
[/autoit] [autoit][/autoit] [autoit]
WinClose("[CLASS:IEFrame]", "")
$WGTLogLine=@MDAY &'.'& @MON &'.'& @YEAR &' ' & @hour &':'& @MIN &':'& @SEC
$timeBegin = TimerInit();-- Messen / Start des Tests
[/autoit] [autoit][/autoit] [autoit]
CallPortal();--- Pausenzeit zwischen den Testläufen
[/autoit] [autoit][/autoit] [autoit]
Sleep(5*60*1000) ;5 Minuten
Next;~ Schließen der .csv Datei
[/autoit] [autoit][/autoit] [autoit]
FileClose($WGTFile);-------------------------------------------------------------
[/autoit]
;--- Logging
;-------------------------------------------------------------
Func WGTLogging($Text)
FileWriteLine($WGTFile,$Text)
EndFunc -
poste doch bitte den Code
-
wie wäre es einfach mit VBA?
"Columns("A:A").EntireColumn.AutoFit"
-
??? ok dan habe ich was falsch verstanden. Vielen Dank für die Info.
-
das forum wie auch die meisten Forums übermitteln die Variablen nicht über GET (was man über http ansteuern könnte), sondern über POST. Daher denke ich nicht, dass du dein vorhaben mit WinHttp lösen kannst.
-
Ich denk mit dem Beispiel meinst du das sarkastisch, dennoch verzeiht mir meine Fehler. Trotz, dass ich auch ein Anfänger bin versuche ich zu helfen so gut ich kann.

-
Wie wäre es mit "UtzUtzUtz"

-
Oh ganz übersehen, dass es sich um eine combobox handelt

-
Was meinst du m-obi?
-
so habe auf die schnelle in 10 min was zusammen geschrieben. Ist nicht perfekt und kann evtl. noch Fehler enthalten. Sollte aber das machen was du vor hattest.
[autoit]#include <GUIConstantsEx.au3>
[/autoit][autoit][/autoit][autoit]
#include <WindowsConstants.au3>
#Include <GuiButton.au3>Local $textfeld2active = 0
[/autoit][autoit][/autoit][autoit]
Local $textfeld1active = 0Local $form = GUICreate("test",310,61,-1,-1,-1,-1)
[/autoit][autoit][/autoit][autoit][/autoit][autoit]
Local $textfeld2 = GUICtrlCreateInput("dein Text hier....",30,20,94,20,-1,512)
Local $textfeld1 = GUICtrlCreateInput("dein Text hier....",150,20,94,20,-1,512)
GUICtrlSetColor($textfeld1,"0xC0C0C0")
GUICtrlSetColor($textfeld2,"0xC0C0C0")
GUISetState(@SW_SHOW,$form)While 1
[/autoit]
$a = ControlGetFocus ($form)
$msg = GUIGetMsg()
if $msg = $GUI_EVENT_CLOSE then exit
if $a = "Edit1" Then
if $textfeld2active = 1 then ContinueLoop
GUICtrlSetData($textfeld2, "")
GUICtrlSetColor ($textfeld2, "0x000000")
$textfeld2active = 1
else
GUICtrlSetData($textfeld2, "dein Text hier....")
GUICtrlSetColor($textfeld2,"0xC0C0C0")
$textfeld2active = 0
EndIf
if $a = "Edit2" Then
if $textfeld1active = 1 then ContinueLoop
GUICtrlSetData($textfeld1, "")
GUICtrlSetColor ($textfeld1, "0x000000")
$textfeld1active = 1
else
GUICtrlSetData($textfeld1, "dein Text hier....")
GUICtrlSetColor($textfeld1,"0xC0C0C0")
$textfeld1active = 0
EndIf
sleep(10)
WEnd -
wie schon gesagt mit dem Befehl "GUICtrlGetState " ermittelst du den State deines Textfeldes. Mit If kannst du nun anhand des States mit "GUICtrlSetData()" den Wert berarbeiten.
Wenn ich heute die Zeit finde werden ich eine kleine GUI erstellen.
-
Abbrev funktioniert nicht mit der Leer Taste sondern mit der Enter Taste.
-
Ich würde mit
[autoit]_ExcelReadSheetToArray($oExcel, 2)
[/autoit]Excell in Arrays einlesen.
[autoit]
Und dann mit_ArraySearch()
[/autoit]die Werte in Array Spalten suchen und die übereinstimmungen wie gewünscht ( 7/8 ) in eine Array Spalte schreiben.
[autoit]
Zum Schluss einfach mit_ExcelWriteArray()
[/autoit]das fertige ergebniss in excell schreiben.
Wenn ich heute Zeitfinde, werde ich mal ein bsp. schreiben.
-
Daher dass System von Parrot. Das hat nur 4 Knöpfe und einen Drehregler... Kann man immer blind bedienen.
-
schreib doch einfach eine batch datei und führe Sie mit Hide aus.
-
In meinem BMW habe ich z.b. das originale Autoradio, da der Schacht keinem DIN entspricht. Das ist aber auch egal, ich habe komplett neue Boxen von boose mit Hochtönern eingbaut mit einem verstärker und einem Subwoofer. Hinter den originall Radio habe ich eine Parrot System. Somit steuere ich meine komplette Musik, Navigation, Telefon über mein iPhone via Bluetooth.
-
Ja der Schacht im Golf4 ist genormt. Du kannst also beruhigt die Standart Radios kaufen.
Für deine Bedürfnisse würde ich dir dieses empfehlen: Pioneer