Beiträge von MojoeB

MojoeB

schließen ohne speichern?

ProcessClose('EXCEL.EXE')

Das Killt den Prozess, Nachteil es werden alle deine offenen EXCEL Tabellen geschlossen.

@Edit :

Du könntest auch das Fenster suchen Class: NUIDialog | "Speichern: Ja/nein".

Wenn da kein Controlclick funktioniert, dann mach es mit (MouseCoordMode 2 oder CaretCoordMode 2)

block deine Maus & Tastatur mit BlockInput ( 1 ) & nehme die Fenster Koordinaten, von Class: NUIDialog & bestätige nicht speichern mit (Mousemove & Mouseclick).

Danach natürlich BlockInput wieder auf ( 0 ) setzen.

MojoeB

Hay danke hab grad mal nur die Funktion getestet und es sieht gut aus, werde am Montag versuchen damit weiter zu arbeiten.

Danke danke danke

MojoeB

Ich habe es fast mit dem durchklicken der Zahlen wo ich das Problem hatte in einem anderem Thread, mir fehlt nur noch ein Teil den Loop zu beendet wenn etwas bestimmtes eintritt.

Zahlen trennen - Hilfe & Unterstützung - AutoIt.de - Das deutschsprachige Forum.

So Lese ich jedes mal wenn das Ende erreicht ist die Zahlen erneut aus :

Code

$oSeitenZahl2 = _IETableGetCollection($oIE, 4)
If @Error then _WriteLog('Fehler'&'- '&'Es ist ein Fehler aufgetretten @_IETableWriteToArray');MSGBOX(5, 'Fehler', 'Es ist ein Fehler aufgetretten @_IETableGetCollection')
$aSeitenZahlData2 = _IETableWriteToArray($oSeitenZahl2, True)
If @Error then   _WriteLog('Fehler'&'- '&'Es ist ein Fehler aufgetretten @_IETableWriteToArray')

Kann ich mit _Arrayadd col 22 mit einem anderen Wert hinzufügen wenn Row 0, col 22 nicht existiert?

Ich habe versucht mit _Arrayadd($aSeitenZahlData2, 'test')

aber dann bekomm ich nur Row 1, Col 0 = 'test'

Ich hab auch andere Kombinationen versucht lade aber irgendwie immer wieder auf Row1 Col 0.

Ich denke ich könnte das Problem so lösen wenn ich in jedem Durchlauf einfach Row 0 Col 22 oder col 23 durch arrayadd erstellen lasse.
& wenn dann der Wert in Col 22 abfrage & es dann der wert ist den man selbst hinzugefügt hat dann beende den loop.

kann mir einer sagen wie genau ich Row0 Col 22 hinzufüge wenn es nicht existiert?

Ergebnisse mit _Arraydisplay :

So sieht es aus wenn es bei 0 bzw einer zehner zahl endet. ich kann dann meinen Loop nicht beenden weil Col 22 nicht abgefragt werden kann. Somit lande ich entweder bei einem error

oder in der dauerschleife

*ich habe momentan noch die Dauerschleife drin.^^

punktbis10.PNG

So sieht es aus wenn es nach der zehner zahl noch weiter geht da existiert dann col 22.

punktbispunkt.PNG

Ich nehme verschiedene Abzweigungen & die dann andere Funktionen auslösen damit ich bis zur Letzen Seite komme das klappt auch aber wenn das eintrifft wie in Bild 1 komme ich immer wieder in die schleife zurück und bin im endlos loop.

Wäre super nett wenn Ihr für mich einen guten Rat habt, wie das genau funktionieren könnte.

_ArrayAdd <- wie funktioniert das genau zusammen mit -> _IETableWritetoArray

Mfg.

Mojoe

MojoeB

Compilert oder uncompilert ? Das scirpt ist nicht zufällig auf einer Festplatte sondern im Netzwerk?

@edit

& dein Rechner bleibt auch an wenn du ihn wegsteckst? Stromsparmodi oder Stand-by ? oder volle power.

MojoeB

eher unrealistisch

du könntest Office installieren. Dann schauen wie groß das Ordner ist.

Praxis 1: Wenn du weißt wie groß der Ordner nach der Installation ist. Kannst während der silent Installation den Ordner auf diese größe überprüfen lassen und somit deine progressbar aufbauen.

Praxis 2: Du findest heraus wo die temporären Dateien beim Installieren hin kopiert werden & dort die die MB, GB überprüfen wie groß der Ordner ist & dadurch deine progressbar steigen lassen.

Aber was das für ein Nutzen dann haben sollte, ergibt sich mir nicht.

Sry Google Translator^^ :

Code

Rather unrealistic



you could install Office. Then look how big the folder is.



Practice 1: If you know how big the folder is after the installation. You can have the folder checked for this size during the silent installation and thus build your progressbar.



Practice 2: You find out where the temporary files are copied during installation & there the MB, GB check how big the folder is & thereby increase your progressbar.



But what kind of use that should have then does not arise to me.

Alles anzeigen

MojoeB

Ja ich hatte mehr Varianten, aber alle nicht erfolgreich, bzw. am ende lief es immer darauf hinnaus das er nach 21 wieder auf 20 zurück ist.

MojoeB

do you mean so ?

C

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <GuiStatusBar.au3>
#include <ProgressConstants.au3>
#include <StaticConstants.au3>
#include <TabConstants.au3>
#include <WindowsConstants.au3>

#Region gui


$Form1 = GUICreate("Software Tool", 640, 555, 228, 312)
$MenuItem1 = GUICtrlCreateMenu("Menu")
$copy = GUICtrlCreateMenuItem("Dateien von DVD kopieren", $MenuItem1)
$MenuInfo0 = GUICtrlCreateMenuItem("Info", $MenuItem1)
$ExitM = GUICtrlCreateMenuItem("Bennden", $MenuItem1)
$MenuItem2 = GUICtrlCreateMenu("Empfohlene Auswahl")
$p64 = GUICtrlCreateMenuItem("Windows 64xBit Programme", $MenuItem2)
$p32 = GUICtrlCreateMenuItem("Windows 32xBit Programme", $MenuItem2)
$Internet = GUICtrlCreateCheckbox("Internet vorhanden", 503, 36)
$Tab1 = GUICtrlCreateTab(16, 40, 593, 377)

$TabSheet1 = GUICtrlCreateTabItem("Office Bereich")


$Checkbox1 = GUICtrlCreateCheckbox("Checkbox1", 80, 113, 161, 31)
GUICtrlSetState(1, $GUI_DISABLE)
$Checkbox2 = GUICtrlCreateCheckbox("Checkbox2", 80, 176, 161, 31)
$Checkbox3 = GUICtrlCreateCheckbox("Checkbox3", 80, 248, 161, 31)
$Checkbox4 = GUICtrlCreateCheckbox("Checkbox4", 80, 328, 169, 31)
$Checkbox5 = GUICtrlCreateCheckbox("Checkbox5", 384, 112, 161, 31)
$Checkbox6 = GUICtrlCreateCheckbox("Checkbox6", 384, 176, 161, 31)
$Checkbox7 = GUICtrlCreateCheckbox("Checkbox7", 384, 248, 161, 31)
$Checkbox8 = GUICtrlCreateCheckbox("Microsoft Office 2016 64x", 384, 328, 169, 31)

;$Pic1 = GUICtrlCreatePic(@ScriptDir & "\autitico\acrobat-9-logo-150x150.jpg", 32, 112, 33, 33)
;$Pic2 = GUICtrlCreatePic(@ScriptDir & "\autitico\graphix-adobe-dreamweaver_200x200.jpg", 32, 168, 33, 33)
;$Pic3 = GUICtrlCreatePic(@ScriptDir & "\autitico\1787269002.jpg", 32, 240, 33, 33)
;$Pic4 = GUICtrlCreatePic(@ScriptDir & "\autitico\flash_icon.jpg", 344, 104, 33, 33)
;$Pic5 = GUICtrlCreatePic(@ScriptDir & "\autitico\1372729694.jpg", 344, 176, 33, 33)
;$Pic6 = GUICtrlCreatePic(@ScriptDir & "\autitico\openoffice_icon.jpg", 344, 248, 33, 33)
;$Pic7 = GUICtrlCreatePic(@ScriptDir & "\autitico\off.jpg", 32, 328, 33, 33)
;$Pic8 = GUICtrlCreatePic(@ScriptDir & "\autitico\off.jpg", 345, 323, 33, 33)

$TabSheet2 = GUICtrlCreateTabItem("Multimedia")

$Checkbox9 = GUICtrlCreateCheckbox("Checkbox9", 80, 128, 161, 31)
$Checkbox10 = GUICtrlCreateCheckbox("Checkbox10", 80, 192, 161, 31)
$Checkbox11 = GUICtrlCreateCheckbox("Checkbox11", 80, 256, 161, 31)
$Checkbox12 = GUICtrlCreateCheckbox("Checkbox12", 80, 336, 161, 31)
$Checkbox13 = GUICtrlCreateCheckbox("Checkbox13", 368, 128, 161, 31)
$Checkbox14 = GUICtrlCreateCheckbox("VLC Player", 368, 192, 161, 31)
$Checkbox15 = GUICtrlCreateCheckbox("Checkbox15", 368, 256, 161, 31)
$Checkbox16 = GUICtrlCreateCheckbox("Checkbox16", 368, 336, 161, 31)

;$Pic9 = GUICtrlCreatePic(@ScriptDir & "\autitico\Adobe_Photoshop_CS3_icon_by_iirojappinen.jpg", 40, 120, 33, 33)
;$Pic10 = GUICtrlCreatePic(@ScriptDir & "\autitico\20080605070947!Adobe_Audition_2.0_icon.jpg", 328, 128, 33, 33)
;$Pic11 = GUICtrlCreatePic(@ScriptDir & "\autitico\vlc_icon.jpg", 328, 192, 33, 33)
;$Pic12 = GUICtrlCreatePic(@ScriptDir & "\autitico\Divx Player.jpg", 40, 184, 33, 33)
;$Pic13 = GUICtrlCreatePic(@ScriptDir & "\autitico\adobe-flash-player-icon-300x300.jpg", 40, 256, 33, 33)

$TabSheet3 = GUICtrlCreateTabItem("Internet Bereich")

$Checkbox17 = GUICtrlCreateCheckbox("Google Chrome", 96, 104, 161, 31)
$Checkbox18 = GUICtrlCreateCheckbox("ICQ", 96, 176, 161, 31)
$Checkbox19 = GUICtrlCreateCheckbox("Windows Live Mail", 96, 256, 161, 31)
$Checkbox20 = GUICtrlCreateCheckbox("Google Mail", 96, 336, 161, 31)
$Checkbox21 = GUICtrlCreateCheckbox("Monzilla Firefox", 344, 104, 161, 31)
$Checkbox22 = GUICtrlCreateCheckbox("Skype", 344, 176, 161, 31)
$Checkbox23 = GUICtrlCreateCheckbox("Thunderbird", 344, 256, 161, 31)
$Checkbox24 = GUICtrlCreateCheckbox("Trillian", 344, 336, 161, 31)

$TabSheet4 = GUICtrlCreateTabItem("System")

$Checkbox25 = GUICtrlCreateCheckbox("TuneUp2010", 96, 112, 161, 31)
$Checkbox26 = GUICtrlCreateCheckbox("OO PartitionManager", 96, 176, 161, 31)
$Checkbox27 = GUICtrlCreateCheckbox("UltraISO", 96, 248, 161, 31)
$Checkbox28 = GUICtrlCreateCheckbox("Ati Grafik Treiber", 96, 328, 161, 31)
$Checkbox29 = GUICtrlCreateCheckbox("OO Defrag 12 Pro", 352, 112, 161, 31)
$Checkbox30 = GUICtrlCreateCheckbox("Checkbox30", 352, 176, 161, 31)
$Checkbox31 = GUICtrlCreateCheckbox("VMware Workstation", 352, 248, 161, 31)
$Checkbox32 = GUICtrlCreateCheckbox("Nvida Grafik Treiber", 352, 328, 161, 31)

$TabSheet5 = GUICtrlCreateTabItem("Fun und Co")

$Checkbox33 = GUICtrlCreateCheckbox("Wallpapers", 96, 112, 161, 31)
$Checkbox34 = GUICtrlCreateCheckbox("Steam", 96, 192, 161, 31)
$Checkbox35 = GUICtrlCreateCheckbox("Checkbox35", 96, 280, 161, 31)
$Checkbox36 = GUICtrlCreateCheckbox("Checkbox36", 96, 352, 161, 31)
$Checkbox37 = GUICtrlCreateCheckbox("Styles", 368, 112, 161, 31)
$Checkbox38 = GUICtrlCreateCheckbox("Checkbox38", 368, 192, 161, 31)
$Checkbox39 = GUICtrlCreateCheckbox("Checkbox39", 368, 280, 161, 31)
$Checkbox40 = GUICtrlCreateCheckbox("Checkbox40", 368, 352, 161, 31)

$TabSheet6 = GUICtrlCreateTabItem("Antivirus")

$Group1 = GUICtrlCreateGroup("Entweder", 56, 96, 289, 81)
$Radio1 = GUICtrlCreateRadio("Kaspersky", 192, 128, 113, 25)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group2 = GUICtrlCreateGroup("Oder", 272, 272, 305, 97)
$Radio2 = GUICtrlCreateRadio("Mcafee", 424, 312, 113, 25)
GUICtrlCreateGroup("", -99, -99, 1, 1)

$Checkbox41 = GUICtrlCreateCheckbox("Checkbox41", 376, 104, 161, 31)
$Checkbox42 = GUICtrlCreateCheckbox("Checkbox42", 376, 160, 161, 31)
$Checkbox43 = GUICtrlCreateCheckbox("Checkbox43", 96, 256, 161, 31)
$Checkbox44 = GUICtrlCreateCheckbox("Checkbox44", 96, 320, 161, 31)

$Group3 = GUICtrlCreateGroup("Gar kein Antivirenprgramm", 168, 200, 353, 49)
$Radio3 = GUICtrlCreateRadio("Keines von beiden", 264, 224, 209, 17)
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUICtrlCreateTabItem("")
$xxx = GUICtrlCreateButton("Schliesen", 488, 440, 121, 25)
$sys = GUICtrlCreateButton("sysInfo", 16, 440, 49, 25)
$Start = GUICtrlCreateButton("Install Starten", 520, 0, 113, 33)
$Label1 = GUICtrlCreateLabel("Starten wenn sie alle Programme Ausgewählt haben die sie möchten :", 64, 8, 416, 20)

$pgbCopy = GUICtrlCreateProgress(16, 424, 585, 9)

$pgbcopy2 = GUICtrlCreateProgress(74, 448, 398, 9)


$StatusBar1 = _GUICtrlStatusBar_Create($Form1)

$free_size_label = GUICtrlCreateLabel("", 150, 490, 300, 15)

$free_size = DriveSpaceFree(@HomeDrive)
$free_size_converted = StringFormat("%.2f", $free_size)
GUICtrlSetData($free_size_label, "Free on Drive " & @HomeDrive & " " & $free_size_converted & " MB")

_GUICtrlStatusBar_SetMinHeight($StatusBar1, 57)
GUISetState(@SW_SHOW)
#EndRegion gui





While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit

        Case $copy
            ;kommt noch
        Case $MenuInfo0
            ;kommt noch
        Case $Internet
            $Checkbox1 = GUICtrlSetState(1, $GUI_Enable)

        Case $ExitM
            Exit

        Case $xxx
            Exit
        Case $Start
                GUICtrlSetData($pgbCopy, 1)
                GUICtrlSetData($pgbcopy2, 25)

                If GUICtrlRead($Checkbox1) = $GUI_CHECKED Then RunWait ("notepad.exe")
                   GUICtrlSetData($pgbCopy, 3)
                   GUICtrlSetData($pgbcopy2, 25)
                   GUICtrlSetData($pgbcopy2, 90)
                If GUICtrlRead($Checkbox2) = $GUI_CHECKED Then RunWait ("notepad.exe")
                   GUICtrlSetData($pgbCopy, 6)
                   GUICtrlSetData($pgbcopy2, 25)
                   GUICtrlSetData($pgbcopy2, 100)
                If GUICtrlRead($Checkbox3) = $GUI_CHECKED Then RunWait ("notepad.exe")
                   GUICtrlSetData($pgbCopy, 9)
                   GUICtrlSetData($pgbcopy2, 25)
                   GUICtrlSetData($pgbcopy2, 90)
                If GUICtrlRead($Checkbox4) = $GUI_CHECKED Then RunWait ("notepad.exe")
                   GUICtrlSetData($pgbCopy, 12)
                   GUICtrlSetData($pgbcopy2, 25)
                   GUICtrlSetData($pgbcopy2, 100)
                If GUICtrlRead($Checkbox5) = $GUI_CHECKED Then RunWait ("notepad.exe")
                   GUICtrlSetData($pgbCopy, 15)
                   GUICtrlSetData($pgbcopy2, 25)
                   GUICtrlSetData($pgbcopy2, 90)
                If GUICtrlRead($Checkbox6) = $GUI_CHECKED Then RunWait ("notepad.exe")
                   GUICtrlSetData($pgbCopy, 18)
                   GUICtrlSetData($pgbcopy2, 25)
                   GUICtrlSetData($pgbcopy2, 100)
                If GUICtrlRead($Checkbox7) = $GUI_CHECKED Then RunWait ("notepad.exe")
                   GUICtrlSetData($pgbCopy, 21)
                   GUICtrlSetData($pgbcopy2, 25)
                   GUICtrlSetData($pgbcopy2, 90)
                If GUICtrlRead($Checkbox8) = $GUI_CHECKED Then RunWait ("\setup\8office\Office 2016 Pro Plus x64_silent.exe");bsp
                   GUICtrlSetData($pgbCopy, 24)
                   GUICtrlSetData($pgbcopy2, 25)
                   GUICtrlSetData($pgbcopy2, 100)
                If GUICtrlRead($Checkbox9) = $GUI_CHECKED Then RunWait ("notepad.exe")
                   GUICtrlSetData($pgbCopy, 27)
                   GUICtrlSetData($pgbcopy2, 25)
                   GUICtrlSetData($pgbcopy2, 90)
                If GUICtrlRead($Checkbox10) = $GUI_CHECKED Then RunWait ("notepad.exe")
                   GUICtrlSetData($pgbCopy, 30)
                   GUICtrlSetData($pgbcopy2, 25)
                   GUICtrlSetData($pgbcopy2, 100)
                If GUICtrlRead($Checkbox11) = $GUI_CHECKED Then RunWait ("notepad.exe")
                   GUICtrlSetData($pgbCopy, 32)
                   GUICtrlSetData($pgbcopy2, 25)
                   GUICtrlSetData($pgbcopy2, 90)
                If GUICtrlRead($Checkbox12) = $GUI_CHECKED Then RunWait ("notepad.exe")
                   GUICtrlSetData($pgbCopy, 33)
                   GUICtrlSetData($pgbcopy2, 25)
                   GUICtrlSetData($pgbcopy2, 100)
                If GUICtrlRead($Checkbox13) = $GUI_CHECKED Then RunWait ("notepad.exe")
                   GUICtrlSetData($pgbCopy, 34)
                   GUICtrlSetData($pgbcopy2, 25)
                   GUICtrlSetData($pgbcopy2, 90)
                If GUICtrlRead($Checkbox14) = $GUI_CHECKED Then RunWait("notepad.exe")
                   GUICtrlSetData($pgbCopy, 35)
                   GUICtrlSetData($pgbcopy2, 25)
                   GUICtrlSetData($pgbcopy2, 100)
                If GUICtrlRead($Checkbox15) = $GUI_CHECKED Then RunWait ("notepad.exe")
                   GUICtrlSetData($pgbCopy, 36)
                   GUICtrlSetData($pgbcopy2, 25)
                   GUICtrlSetData($pgbcopy2, 90)
                If GUICtrlRead($Checkbox16) = $GUI_CHECKED Then RunWait ("notepad.exe")
                   GUICtrlSetData($pgbCopy, 37)
                   GUICtrlSetData($pgbcopy2, 25)
                   GUICtrlSetData($pgbcopy2, 100)
                If GUICtrlRead($Checkbox17) = $GUI_CHECKED Then RunWait("notepad.exe")
                   GUICtrlSetData($pgbCopy, 38)
                   GUICtrlSetData($pgbcopy2, 25)
                   GUICtrlSetData($pgbcopy2, 90)
                If GUICtrlRead($Checkbox18) = $GUI_CHECKED Then RunWait ("notepad.exe")
                   GUICtrlSetData($pgbCopy, 39)
                   GUICtrlSetData($pgbcopy2, 25)
                   GUICtrlSetData($pgbcopy2, 100)
                If GUICtrlRead($Checkbox19) = $GUI_CHECKED Then RunWait ("notepad.exe")
                   GUICtrlSetData($pgbCopy, 40)
                   GUICtrlSetData($pgbcopy2, 25)
                   GUICtrlSetData($pgbcopy2, 90)
                If GUICtrlRead($Checkbox20) = $GUI_CHECKED Then RunWait ("notepad.exe")
                   GUICtrlSetData($pgbCopy, 42)
                   GUICtrlSetData($pgbcopy2, 25)
                   GUICtrlSetData($pgbcopy2, 100)
                If GUICtrlRead($Checkbox21) = $GUI_CHECKED Then RunWait ("notepad.exe")
                   GUICtrlSetData($pgbCopy, 43)
                   GUICtrlSetData($pgbcopy2, 25)
                   GUICtrlSetData($pgbcopy2, 90)
                If GUICtrlRead($Checkbox22) = $GUI_CHECKED Then RunWait ("notepad.exe")
                   GUICtrlSetData($pgbCopy, 44)
                   GUICtrlSetData($pgbcopy2, 25)
                   GUICtrlSetData($pgbcopy2, 100)
                If GUICtrlRead($Checkbox23) = $GUI_CHECKED Then RunWait ("notepad.exe")
                   GUICtrlSetData($pgbCopy, 45)
                   GUICtrlSetData($pgbcopy2, 25)
                   GUICtrlSetData($pgbcopy2, 90)
                If GUICtrlRead($Checkbox24) = $GUI_CHECKED Then RunWait ("notepad.exe")
                   GUICtrlSetData($pgbCopy, 46)
                   GUICtrlSetData($pgbcopy2, 25)
                   GUICtrlSetData($pgbcopy2, 100)
                If GUICtrlRead($Checkbox25) = $GUI_CHECKED Then RunWait ("notepad.exe")
                   GUICtrlSetData($pgbCopy, 47)
                   GUICtrlSetData($pgbcopy2, 25)
                   GUICtrlSetData($pgbcopy2, 90)
                If GUICtrlRead($Checkbox26) = $GUI_CHECKED Then RunWait ("notepad.exe")
                   GUICtrlSetData($pgbCopy, 48)
                   GUICtrlSetData($pgbcopy2, 25)
                   GUICtrlSetData($pgbcopy2, 100)
                If GUICtrlRead($Checkbox27) = $GUI_CHECKED Then RunWait ("notepad.exe")
                   GUICtrlSetData($pgbCopy, 49)
                   GUICtrlSetData($pgbcopy2, 25)
                   GUICtrlSetData($pgbcopy2, 90)
                If GUICtrlRead($Checkbox28) = $GUI_CHECKED Then RunWait ("notepad.exe")
                   GUICtrlSetData($pgbCopy, 50)
                   GUICtrlSetData($pgbcopy2, 25)
                   GUICtrlSetData($pgbcopy2, 100)
                If GUICtrlRead($Checkbox29) = $GUI_CHECKED Then RunWait ("notepad.exe")
                   GUICtrlSetData($pgbCopy, 53)
                   GUICtrlSetData($pgbcopy2, 25)
                   GUICtrlSetData($pgbcopy2, 90)
                If GUICtrlRead($Checkbox30) = $GUI_CHECKED Then RunWait ("notepad.exe")
                   GUICtrlSetData($pgbCopy, 55)
                   GUICtrlSetData($pgbcopy2, 25)
                   GUICtrlSetData($pgbcopy2, 100)
                If GUICtrlRead($Checkbox31) = $GUI_CHECKED Then RunWait ("notepad.exe")
                   GUICtrlSetData($pgbCopy, 59)
                   GUICtrlSetData($pgbcopy2, 25)
                   GUICtrlSetData($pgbcopy2, 90)
                If GUICtrlRead($Checkbox32) = $GUI_CHECKED Then RunWait ("notepad.exe")
                   GUICtrlSetData($pgbCopy, 62)
                   GUICtrlSetData($pgbcopy2, 25)
                   GUICtrlSetData($pgbcopy2, 100)
                If GUICtrlRead($Checkbox33) = $GUI_CHECKED Then RunWait ("notepad.exe")
                   GUICtrlSetData($pgbCopy, 65)
                   GUICtrlSetData($pgbcopy2, 25)
                   GUICtrlSetData($pgbcopy2, 90)
                If GUICtrlRead($Checkbox34) = $GUI_CHECKED Then RunWait ("notepad.exe")
                   GUICtrlSetData($pgbCopy, 69)
                   GUICtrlSetData($pgbcopy2, 25)
                   GUICtrlSetData($pgbcopy2, 100)
                If GUICtrlRead($Checkbox35) = $GUI_CHECKED Then RunWait ("notepad.exe")
                   GUICtrlSetData($pgbCopy, 72)
                   GUICtrlSetData($pgbcopy2, 25)
                   GUICtrlSetData($pgbcopy2, 90)
                If GUICtrlRead($Checkbox36) = $GUI_CHECKED Then RunWait ("notepad.exe")
                   GUICtrlSetData($pgbCopy, 75)
                   GUICtrlSetData($pgbcopy2, 25)
                   GUICtrlSetData($pgbcopy2, 100)
                If GUICtrlRead($Checkbox37) = $GUI_CHECKED Then RunWait ("notepad.exe")
                   GUICtrlSetData($pgbCopy, 79)
                   GUICtrlSetData($pgbcopy2, 25)
                   GUICtrlSetData($pgbcopy2, 90)
                If GUICtrlRead($Checkbox38) = $GUI_CHECKED Then RunWait ("notepad.exe")
                   GUICtrlSetData($pgbCopy, 81)
                   GUICtrlSetData($pgbcopy2, 25)
                   GUICtrlSetData($pgbcopy2, 100)
                If GUICtrlRead($Checkbox39) = $GUI_CHECKED Then RunWait ("notepad.exe")
                   GUICtrlSetData($pgbCopy, 85)
                   GUICtrlSetData($pgbcopy2, 25)
                   GUICtrlSetData($pgbcopy2, 90)
                If GUICtrlRead($Checkbox40) = $GUI_CHECKED Then RunWait ("notepad.exe")
                   GUICtrlSetData($pgbCopy, 88)
                   GUICtrlSetData($pgbcopy2, 25)
                   GUICtrlSetData($pgbcopy2, 100)
                If GUICtrlRead($Checkbox41) = $GUI_CHECKED Then RunWait ("notepad.exe")
                   GUICtrlSetData($pgbCopy, 90)
                   GUICtrlSetData($pgbcopy2, 25)
                   GUICtrlSetData($pgbcopy2, 90)
                If GUICtrlRead($Checkbox42) = $GUI_CHECKED Then RunWait ("notepad.exe")
                   GUICtrlSetData($pgbCopy, 94)
                   GUICtrlSetData($pgbcopy2, 25)
                   GUICtrlSetData($pgbcopy2, 100)
                If GUICtrlRead($Checkbox43) = $GUI_CHECKED Then RunWait ("notepad.exe")
                   GUICtrlSetData($pgbCopy, 97)
                   GUICtrlSetData($pgbcopy2, 25)
                   GUICtrlSetData($pgbcopy2, 90)
                If GUICtrlRead($Checkbox44) = $GUI_CHECKED Then RunWait ("notepad.exe")
                   GUICtrlSetData($pgbCopy, 100)
                   GUICtrlSetData($pgbcopy2, 25)
                   GUICtrlSetData($pgbcopy2, 100)


        Case $p64
            GUICtrlSetState($Radio3, $GUI_CHECKED)
            GUICtrlSetState($Checkbox1, $GUI_unCHECKED)
            GUICtrlSetState($Checkbox2, $GUI_unCHECKED)
            GUICtrlSetState($Checkbox3, $GUI_CHECKED)
            GUICtrlSetState($Checkbox4, $GUI_CHECKED)
            GUICtrlSetState($Checkbox5, $GUI_unCHECKED)
            GUICtrlSetState($Checkbox6, $GUI_unCHECKED)
            GUICtrlSetState($Checkbox7, $GUI_unCHECKED)
            GUICtrlSetState($Checkbox8, $GUI_unCHECKED)
            GUICtrlSetState($Checkbox9, $GUI_unCHECKED)
            GUICtrlSetState($Checkbox10, $GUI_CHECKED)
            GUICtrlSetState($Checkbox11, $GUI_CHECKED)
            GUICtrlSetState($Checkbox12, $GUI_unCHECKED)
            GUICtrlSetState($Checkbox13, $GUI_unCHECKED)
            GUICtrlSetState($Checkbox14, $GUI_CHECKED)
            GUICtrlSetState($Checkbox15, $GUI_unCHECKED)
            GUICtrlSetState($Checkbox16, $GUI_unCHECKED)
            GUICtrlSetState($Checkbox17, $GUI_CHECKED)
            GUICtrlSetState($Checkbox18, $GUI_unCHECKED)
            GUICtrlSetState($Checkbox19, $GUI_unCHECKED)
            GUICtrlSetState($Checkbox20, $GUI_unCHECKED)
            GUICtrlSetState($Checkbox21, $GUI_CHECKED)
            GUICtrlSetState($Checkbox22, $GUI_unCHECKED)
            GUICtrlSetState($Checkbox23, $GUI_unCHECKED)
            GUICtrlSetState($Checkbox24, $GUI_unCHECKED)
            GUICtrlSetState($Checkbox25, $GUI_CHECKED)
            GUICtrlSetState($Checkbox26, $GUI_unCHECKED)
            GUICtrlSetState($Checkbox27, $GUI_unCHECKED)
            GUICtrlSetState($Checkbox28, $GUI_unCHECKED)
            GUICtrlSetState($Checkbox29, $GUI_unCHECKED)
            GUICtrlSetState($Checkbox30, $GUI_unCHECKED)
            GUICtrlSetState($Checkbox31, $GUI_unCHECKED)
            GUICtrlSetState($Checkbox32, $GUI_unCHECKED)
            GUICtrlSetState($Checkbox33, $GUI_unCHECKED)
            GUICtrlSetState($Checkbox34, $GUI_unCHECKED)
            GUICtrlSetState($Checkbox35, $GUI_unCHECKED)
            GUICtrlSetState($Checkbox36, $GUI_unCHECKED)
            GUICtrlSetState($Checkbox37, $GUI_unCHECKED)
            GUICtrlSetState($Checkbox38, $GUI_unCHECKED)
            GUICtrlSetState($Checkbox39, $GUI_unCHECKED)
            GUICtrlSetState($Checkbox40, $GUI_unCHECKED)
            GUICtrlSetState($Checkbox41, $GUI_unCHECKED)
            GUICtrlSetState($Checkbox42, $GUI_unCHECKED)
            GUICtrlSetState($Checkbox43, $GUI_unCHECKED)
            GUICtrlSetState($Checkbox44, $GUI_unCHECKED)

        Case $p32

            GUICtrlSetState($Radio3, $GUI_CHECKED)
            GUICtrlSetState($Checkbox1, $GUI_unCHECKED)
            GUICtrlSetState($Checkbox2, $GUI_unCHECKED)
            GUICtrlSetState($Checkbox3, $GUI_CHECKED)
            GUICtrlSetState($Checkbox4, $GUI_unCHECKED)
            GUICtrlSetState($Checkbox5, $GUI_unCHECKED)
            GUICtrlSetState($Checkbox6, $GUI_unCHECKED)
            GUICtrlSetState($Checkbox7, $GUI_unCHECKED)
            GUICtrlSetState($Checkbox8, $GUI_CHECKED)
            GUICtrlSetState($Checkbox9, $GUI_unCHECKED)
            GUICtrlSetState($Checkbox10, $GUI_CHECKED)
            GUICtrlSetState($Checkbox11, $GUI_CHECKED)
            GUICtrlSetState($Checkbox12, $GUI_unCHECKED)
            GUICtrlSetState($Checkbox13, $GUI_unCHECKED)
            GUICtrlSetState($Checkbox14, $GUI_CHECKED)
            GUICtrlSetState($Checkbox15, $GUI_unCHECKED)
            GUICtrlSetState($Checkbox16, $GUI_unCHECKED)
            GUICtrlSetState($Checkbox17, $GUI_CHECKED)
            GUICtrlSetState($Checkbox18, $GUI_unCHECKED)
            GUICtrlSetState($Checkbox19, $GUI_unCHECKED)
            GUICtrlSetState($Checkbox20, $GUI_unCHECKED)
            GUICtrlSetState($Checkbox21, $GUI_CHECKED)
            GUICtrlSetState($Checkbox22, $GUI_unCHECKED)
            GUICtrlSetState($Checkbox23, $GUI_unCHECKED)
            GUICtrlSetState($Checkbox24, $GUI_unCHECKED)
            GUICtrlSetState($Checkbox25, $GUI_CHECKED)
            GUICtrlSetState($Checkbox26, $GUI_unCHECKED)
            GUICtrlSetState($Checkbox27, $GUI_unCHECKED)
            GUICtrlSetState($Checkbox28, $GUI_unCHECKED)
            GUICtrlSetState($Checkbox29, $GUI_unCHECKED)
            GUICtrlSetState($Checkbox30, $GUI_unCHECKED)
            GUICtrlSetState($Checkbox31, $GUI_unCHECKED)
            GUICtrlSetState($Checkbox32, $GUI_unCHECKED)
            GUICtrlSetState($Checkbox33, $GUI_unCHECKED)
            GUICtrlSetState($Checkbox34, $GUI_unCHECKED)
            GUICtrlSetState($Checkbox35, $GUI_unCHECKED)
            GUICtrlSetState($Checkbox36, $GUI_unCHECKED)
            GUICtrlSetState($Checkbox37, $GUI_unCHECKED)
            GUICtrlSetState($Checkbox38, $GUI_unCHECKED)
            GUICtrlSetState($Checkbox39, $GUI_unCHECKED)
            GUICtrlSetState($Checkbox40, $GUI_unCHECKED)
            GUICtrlSetState($Checkbox41, $GUI_unCHECKED)
            GUICtrlSetState($Checkbox42, $GUI_unCHECKED)
            GUICtrlSetState($Checkbox43, $GUI_unCHECKED)
            GUICtrlSetState($Checkbox44, $GUI_unCHECKED)
        Case $Radio3
            GUICtrlSetState($Radio1, $GUI_unCHECKED)
            GUICtrlSetState($Radio2, $GUI_unCHECKED)
        Case $Radio2
            GUICtrlSetState($Radio3, $GUI_unCHECKED)
            GUICtrlSetState($Radio1, $GUI_unCHECKED)
        Case $Radio1
            GUICtrlSetState($Radio2, $GUI_unCHECKED)
            GUICtrlSetState($Radio3, $GUI_unCHECKED)
        Case $sys
            run("notepad.exe")
            ;EndIf
EndSwitch
WEnd

Alles anzeigen

MojoeB

@ Moombas

ja du hast recht, es liegt an diesem Element |...|.

Ich habe das Problem leider immer noch nicht gelöst. Leider habe ich grad nicht den Quellcode hier.

ich kann zwar die links auf der Webseite herausfinden und dann den Index durch gehen. aber anscheint verändert sich der Index.

Ich kann mir das Array auch irgendwie nicht anzeigen lassen. ich habe versucht mit dem autoit Tool IE_Builder2.0.1 gegenzuprüfen.

Wenn ich mich jetzt nicht Irre war der letzte Index immer auf 63 & das war das letzte |...| auf der Seite & wird im Link auf bsp mit der 21 .. 41 angezeigt.

Erklärung :

Die reihenfolge ist so : 1 | 2 |3 bis 20 | ... |

Sobald Index |...| gedrückt würd, geht die neue Seite auf |...|21|22|23 bis 40|...|

Das klappt auch aber, das Problem ist nicht direkt das durchgehen mit einer schleife es ist das nach 20 ... gedrückt wird aber der nächste index wieder ... ist, weil 21 gedrückt ist & er somit wieder auf die ... drückt & wieder auf auf die Seite 1 - 20 zurückspringt.

Idee 1 :

_IEClickbytext For schleif 1-500

Wenn @error dann _IEClickbytext($ie, '...')

Idee 2

Wenn @error dann _IEclickbyindex ($ie, 63, 1)

Verschiedene Szenarien wurden beim rumtesten beobachtet:

1. entweder findet er nicht den IEindex 63

2. oder er klickt auf den falschen Link manchmal aufs Impressum, manchmal wieder zurück zu Seite 1 - 20

& ich habe versucht mit _IENavigate zum Seiten link zu navigieren geht leider auch nicht da der link so aussieht : javascript: .... ..... ... ('....$page21') | ich weiß grad nicht genau wie der link heißt er ist auf jeden fall so aufgebaut.

quellcode nur als beispiel für das sammeln der links.

Code

func links_()
Local $oLinks = _IELinkGetCollection($oIE)
Local $iNumLinks = @extended

Local $sTxt = $iNumLinks & " links found" & @CRLF & @CRLF
For $oLink In $oLinks
   Local $aoLinks = _IETableWriteToArray($oLink,  True)

    $sTxt &= $oLink.href & @CRLF
 Next

ConsoleWrite("Link Info"&' '&  $sTxt&@CR)
FileWrite('LINKS.txt',  $sTxt&@CR)
Global $readlinks = 'LINKS.txt'

EndFunc

Alles anzeigen

MojoeB

Du hast vollkommend recht.

& quasi hast du meine Frage beantwortet, ich habe jetzt eine ~~Lösung~~ gefunden.

~~Ich habe es so gelöst~~ :

~~Die einzelnen Seitenzahlen auslesen & mit IF die Bedingung gesetzt wenn = '...' dann von~~

code davor :

Code

func _ArraySuche_($filetxt)
Global   $sPos = FileReadLine($filetxt, 1)
Global  $aPosSplitt = StringSplit($sPos, '|')
Global   $iPosSplitt = $aPosSplitt[0]

   For $y = 1 to $iPosSplitt step 1
      Global $sPosSplitt = $aPosSplitt[$y]
   Next

   EndFunc
func links_()
Local $oLinks = _IELinkGetCollection($oIE)
Local $iNumLinks = @extended

Local $sTxt = $iNumLinks & " links found" & @CRLF & @CRLF
For $oLink In $oLinks
   Local $aoLinks = _IETableWriteToArray($oLink,  True)

    $sTxt &= $oLink.href & @CRLF
 Next

ConsoleWrite("Link Info"&' '&  $sTxt&@CR)
FileWrite('LINKS.txt',  $sTxt&@CR)
Global $readlinks = 'LINKS.txt'

EndFunc

func _1_2_3_($sPosSplitt)

   $IEbodyIndexSuche=_IEBodyReadHTML($oIE)
$aIEbodyIndexSuche=StringRegExp($IEbodyIndexSuche, '<TD><A style=(.*?)/A></TD>', 3)

For $i = 0 to UBound($aIEbodyIndexSuche) -1
            $aIndexSuche=StringRegExp($aIEbodyIndexSuche[$i], '>(.*?)<', 1)
            _ArraySuche_($filetxt)
            $sIndexSuche = _ArrayToString($aIndexSuche)
            ConsoleWrite($sIndexSuche& @CRLF)

            _IELinkClickByText($oIE, $sIndexSuche, '', 1)
            $newdata=_IEBodyReadText($oIE)
            $result = StringInStr($newdata, $sPosSplitt)
      If $result > 1 Then
          MsgBox(0, 'SUCHSTRING', $sPosSplitt & " Found")
       Else
           EndIf
                    Next
                 EndFunc

Alles anzeigen

Ich habe erstmal _ArraySuche_ rausgenommen.

Muss da muss ich noch schauen wie ich das hinbekomme das es auch richtig funktioniert.

Dann die Funktion die Funktion zum auslesen geändert & zusammengefasst.

Ergebnis :

Code

func IE_INDEX_FUNC()
   $IEbodyIndexSuche=_IEBodyReadHTML($oIE)

$aIEbodyIndexSuche=StringRegExp($IEbodyIndexSuche, '<TD><A style=(.*?)/A></TD>', 3)
for $i = 1 to UBound($aIEbodyIndexSuche) -1 Step 1
$aIEbodyIndexSuche=StringRegExp($aIEbodyIndexSuche, '>(.*?)<', 1)
$Q = 21
$Z = 20
_IELinkClickByText($oIE, $i)
If $i = $Q   then _IELinkClickByText($oIE, '...')
If $i = $Q+$Z then _IELinkClickByText($oIE, '...')

next
EndFunc

Alles anzeigen

hatte das Fenster schon mega lange offen.. deswegen die durchgestrichenen Lienen

Ich dachte ich hätte es gelöst und wollte grad das Ergebnis mitteilen dann hatte ich nochmal getestet & gemerkt das ich nur bis Seite 39 komme, egal wie ich ändere ich denke es liegt an UBound($aIEbodyIndexSuche)

weil wenn er bei 1 oder 0 ankommt ist ja dann ist ja Schluss.

Dennoch danke für eure Hilfsbereitschaft.

ich werde morgen mal mit For & DO schleifen rumspielen keine Ahnung ob man die ineinander laufen lassen kann.

Ich setze das Thema mal auf beendet, falls ich nicht weiter komme mache ich nochmal ein Thread auf.

MojoeB

@Musashi

|Danke hab´s mir mal angesehen, das ist leider nicht das was ich brauche oder falls doch weiß ich nicht ich das damit verknüpfen soll soll ich hab noch nicht ganz durchgeblickt ... mein Problem ist eher das nach 20 ein |...| kommt.

es ist glaub ich nicht ganz das was ich brauche, ich habe meine Start frage völlig falsch gestellt, aber auf Grund dessen da ich noch eine andere funktionsweiße verfolgt habe.

Nun ist es so ich ich haberausgefunden wie ich den Index des IE durchgehen kann, bzw. vorher auslesen & dann clickbytext mit einer schiefe durchlaufen lassen kann

Ich hatte mehrere Möglichkeiten.

Ich hab noch eine Idee aber ich geh nun schlafen.

melde mich morgen wieder

Trotzdem danke für den Hilfe versuch.

Das Problem ist nur noch die Zeichen |...|...| .

Sry ich bin zu müde ich schreibe morgen wieder.

MojoeB

So ich habe es leider nicht mehr geschafft, aber nun eine abgeänderte Version Basierend auf der Demo Page.

Da ich mit einer anderen Datei Ordner Struktur & manche Variablen, erstellen lasse, stehen für dieses Beispiel alle Variabel im Skript voll ausgeschrieben.

Es wird nur die Demo Seite gezeigt. Damit Ihr sehen könnt was ich vor habe.

Um das laufen zu lassen müssen folgende dinge erfüllt werden :

- Ordnerstruktur @Scriptdir \Datensatz

@Scriptdir \BS.ini

@Scriptdir \Datensatz\DB\DB.lvdb

@Scriptdir \Datensatz\TXT\CarsucheNach.txt

Inhalt :

BS.ini

Code

[tel]
=

DB. lvdb

Code

<data>MKK-PT 62 (4916090807759)</data>=<SIM>4916090807759</SIM><TYP> (4916090807759)</TYP><BS>tel</BS>
<data>Service Vito (4916092178795)</data>=<SIM>4916092178795</SIM><TYP>to (4916092178795)</TYP><BS>tel</BS>
<data>Test AS</data>=<SIM>4915115152326</SIM><TYP></TYP><BS>tel</BS>

CarsucheNach.txt

Code

Suchstring1|suchsting2|[Time stamp] (60000): 11.03.2020 15:01:19|

au3 quelle :

C

#include <GUIConstantsEx.au3>
#include <MsgBoxConstants.au3>
#include <WindowsConstants.au3>
#include <ButtonConstants.au3>
#include <StaticConstants.au3>
#include <FileConstants.au3>
#include <GUIListView.au3>
#include <Constants.au3>
#include <IE.au3>
#Include <GuiEdit.au3>
#include <Inet.au3>
#include <Array.au3>
#include <File.au3>


#Region Global
#Region Globale GUI VAR
;#gui1
Global $GUIusername, $GUIpasswort, $logON, $browser, $GUIvON, $GUIbIS, $GUIvONuHR, $GUIbISuHR, $Menu
Global $dropdown_Main000, $dropdown_Main001, $dropdown_Main002, $_dropdown_Main0021, $_dropdown_Main0022, $_dropdown_Main0031, $_dropdown_Main0032
;#gui2
Global $hForm1, $idListView, $idBtn1, $idBtn2, $idBtn3, $idBtn4, $Pos, $zahl
Global $idListView, $hListView, $File
Global $iOption = 0, $iSelected, $iExListViewStyle = BitOR($LVS_EX_FULLROWSELECT, $LVS_EX_GRIDLINES, $LVS_EX_DOUBLEBUFFER)
Global $aNames, $combo, $sPosSplitt,$aPosSplitt, $y
Global $server = 'protelematik'
Global  $refrech = 'http://www.mapfleet.de/images/Icons/refresh.png'
Global $His="http://www.mapfleet.de/FleetMan/datcom/Level10/History2.aspx?vhid="
Global $filetxt = '\Datensatz\TXT\StringsSuche\CARsucheNach.txt', $sMessage
Global $txVon = "ctl00_ContentPlaceHolder1_txVon", $txVonZeit = "ctl00_ContentPlaceHolder1_txVonZeit", $txBis = "ctl00_ContentPlaceHolder1_txBis", $txBisZeit = "ctl00_ContentPlaceHolder1_txBisZeit"
Global $sFileOpenDialog = FileOpenDialog($sMessage, @Scriptdir & "\Datensatz", "Datenbank (*.lvdb)", BitOR($FD_FILEMUSTEXIST, ''))

Global $1, $2, $4, $5, $6, $7
#EndRegion Globale GUI VAR
#Region Globale VAR Funktionen
#EndRegion Globale VAR Funktionen
Do
   Global $oIE = _IECreateEmbedded()
Until IsObj ($oIE)
#EndRegion Global

#Region GUI Main
func _GUI_Login_Browser_()
GUICtrlCreateLabel("Account", 24, 10, 52, 20)
GUICtrlCreateLabel("Passwort", 24, 30, 59, 20)


Global    $GUIusername = GUICtrlCreateInput("protel", 75, 7, 140, 15)
Global    $GUIpasswort = GUICtrlCreateInput("demo.1111", 75, 27, 140, 15, $ES_PASSWORD)

gloBAL $logON = GUICtrlCreateButton('LOGIN',  220, 13, 50, 25)


$browser = GUICtrlCreateObj ($oIE, 8, 45, 1340, 800)
GUISetBkColor(0xFFFFFF)

Global $3 = GUICtrlCreateLabel("Von", 301, 10, 52, 20)
Global $4 = GUICtrlCreateLabel("Bis", 301, 30, 59, 20)

Global    $GUIvON = GUICtrlCreateInput('19.08.2016', 330, 27-19, 60, 15);@MDAY &'.'& @MON &'.'& @YEAR, 330, 7, 60, 15)
Global    $GUIbIS = GUICtrlCreateInput(@MDAY &'.'& @MON &'.'& @YEAR, 330, 27, 60, 15)

Global    $GUIvONuHR = GUICtrlCreateInput('00:00:01', 400, 7, 50, 15)



Global    $GUIbISuHR = GUICtrlCreateInput('12:00:00', 400, 27, 50, 15)
Global       $Menu = GUICtrlCreateButton("Menü",  450, 7, 100, 25)
GUISetState(@SW_SHOW)
EndFunc

Func _GUI_dropdown_Main_()
Global $dropdown_Main000 = GUICtrlCreateMenu("&Start")
_dropdown_Main000()
Global $dropdown_Main001 = GUICtrlCreateMenu("&Bearbeiten")
_dropdown_Main002()
Global $dropdown_Main002 = GUICtrlCreateMenu("&Extras")
_dropdown_Main003()
EndFunc

Func _dropdown_Main000()
Global $_dropdown_Main0001 = GUICtrlCreateMenuItem("Anmelden"&@TAB&"Shift+Alt+T", $dropdown_Main000)
Global $_dropdown_Main0002 = GUICtrlCreateMenuItem("Beenden"&@TAB&"", $dropdown_Main000)
EndFunc

Func _dropdown_Main002()
Global $_dropdown_Main0021 = GUICTrlCreateMenuItem("Datenbank laden."&@Tab&"", $dropdown_Main001)
Global $_dropdown_Main0022 = GUICTrlCreateMenuItem("Optionen"&@Tab&"", $dropdown_Main001)
EndFunc

Func _dropdown_Main003()
Global $_dropdown_Main0031 = GUICTrlCreateMenuItem("Optionen"&@Tab&"", $dropdown_Main002)
Global $_dropdown_Main0032 = GUICTrlCreateMenuItem("Verlauf"&@Tab&"", $dropdown_Main002)
EndFunc

#Region GUI Menu
func _AuswahlMEN($File)
   Global $aFile = FileReadToArray($File), $aDATA[UBound($aFile)][4], $aRx

For $i = 0 To UBound($aFile) - 1 Step 1
    $aRx = StringRegExp($aFile[$i], "<data>(.*?)</data>=<SIM>(.*?)</SIM><TYP>(.*?)</TYP><BS>(.*?)</BS>", 3)
    If @error Then
        ConsoleWrite("! Error parsing line " & $i & ": '" & $aFile[$i] & "'" & @CRLF)
    Else
        For $j = 0 To UBound($aRx) -1 Step 1
            $aDATA[$i][$j] = $aRx[$j]
        Next
    EndIf
Next
$hForm1 = GUICreate("Datenbank - Suche - Filter | ", 1000, 800)
$idBtn1 = GUICtrlCreateButton("Btn1", 800, 30, 30, 30, BitOR($BS_NOTIFY, $BS_FLAT))
$idBtn2 = GUICtrlCreateButton("Btn2", 5, 580, 590, 32, BitOR($BS_NOTIFY, $BS_FLAT))
$idBtn3 = GUICtrlCreateButton("all Unchecked", 5, 400, 590, 32, BitOR($BS_NOTIFY, $BS_FLAT))
$idBtn4 = GUICtrlCreateButton("BTN4", 5, 500, 590, 32, BitOR($BS_NOTIFY, $BS_FLAT))

$aNames = IniReadSectionNames(@ScriptDir &'\BS.ini')
$combo = GUICtrlCreateCombo ("Gruppe wählen...", 60, 430) ;


$idListView = GUICtrlCreateListView("Kennzeichen|SIM|TYP|Gruppe", 5, 5, 590, 350, BitOR($GUI_SS_DEFAULT_LISTVIEW, $WS_BORDER), BitOR($LVS_EX_FULLROWSELECT, $LVS_EX_CHECKBOXES))
$hListView  = GUICtrlGetHandle($idListView)
_GUICtrlListView_SetExtendedListViewStyle($hListView, $LVS_EX_CHECKBOXES)
_GUICtrlListView_SetColumnWidth($idListView, 0, 150) ; data
_GUICtrlListView_SetColumnWidth($idListView, 1, 100) ; SIM
_GUICtrlListView_SetColumnWidth($idListView, 2, 150) ; TYP
_GUICtrlListView_SetColumnWidth($idListView, 3, 150) ; BS
_GUICtrlListView_AddArray($idListView, $aDATA)
GUISetBkColor(0xFFFFFF)
GUISetState(@SW_SHOW)

For $i =  1 To $aNames[0]
GUICtrlSetData ($combo, $aNames[$i] &'|')
Next

_GUICtrlListView_RegisterSortCallBack($hListView)
menuwhile()
EndFunc
#EndRegion GUI Menu

#EndRegion GUI Main


#Region funktionen
func _login_Button_Menu()
Global $1=GUICtrlRead($GUIusername)
Global $2=GUICtrlRead($GUIpasswort)
               signIn($oIE,$1,$2)

EndFunc

Func signIn($oIE,$TBuser,$TBpass)
     _IENavigate($oIE, 'http://www.mapfleet.de/')


    $username = _IEGetObjByName($oIE, "ctl00$ContentPlaceHolder1$Login1$UserName")
    $password = _IEGetObjByName($oIE, "ctl00$ContentPlaceHolder1$Login1$Password")
    $buttonIE =   _IEGetObjById  ($oIE, "ctl00_ContentPlaceHolder1_Login1_LoginButton")

      _IEFormElementSetValue($username, $TBuser)
      _IEFormElementSetValue($password, $TBpass)
sleep(2000)
      _IEAction($buttonIE, 'click')
      _korrektesLogin()
   EndFunc

Func _korrektesLogin()
   Local $PassNegativ     = 'Die Anmeldung verlief nicht erfolgreich. Wiederholen Sie den Vorgang.'
   Local $BenuNegativ     = 'Dieser Benutzer ist dem System nicht bekannt. Bitte verwenden Sie einen anderen Login!'
   Local $loginpass       = 'Sie sind eingeloggt'
   Local $Servername     = 'Protelematik'
IF StringInStr(_IEBodyReadText($oIE), $PassNegativ) then
   MsgBox(1, 'Fehler', 'Passwort falsch!')
ElseIf StringInStr(_IEBodyReadText($oIE), $BenuNegativ) then
   MsgBox(1, 'Fehler', 'Benutzer falsch eingetragen bitte korrekt eingeben!')
Else
   $i = 3
while $i > 0
      MsgBox(1, 'Erfolgreich', 'Sie sind eingeloggt.' &@CRLF&$i, 1)
      $i = $i - 1
      WEnd
   EndIf
EndFunc

Func _datum ()

$6=GUICtrlRead($GUIvON)
$7=GUICtrlRead($GUIbIS)
$4=GUICtrlRead($GUIvONuHR)
$5=GUICtrlRead($GUIbISuHR)
$Input3 = _IEGetObjByName($oIE,$txVon)
_IELoadWait($oIE)
_IEFormElementSetValue($Input3,$6)
_IELoadWait($oIE)
$Input4 = _IEGetObjByName($oIE,$txBis)
_IELoadWait($oIE)
_IEFormElementSetValue($Input4,$7)
Sleep(10)
$Input5 = _IEGetObjByName($oIE,$txVonZeit)
_IELoadWait($oIE)
_IEFormElementSetValue($Input5,$4)
$Input6 = _IEGetObjByName($oIE,$txBisZeit)
_IELoadWait($oIE)
_IEFormElementSetValue($Input6,$5)
iF StringInStr(_IEDocReadHTML($oIE), "refresh.png") Then
      _IEFormImageClick($oIE, $refrech)

   EndIf
   sleep(150)
EndFunc


func _ArraySuche_($filetxt)
Global   $sPos = FileReadLine($filetxt, 1)
Global  $aPosSplitt = StringSplit($sPos, '|')
Global   $iPosSplitt = $aPosSplitt[0]

   For $y = 1 to $iPosSplitt step 1
      Global $sPosSplitt = $aPosSplitt[$y]
   Next

   EndFunc
func links_()
Local $oLinks = _IELinkGetCollection($oIE)
Local $iNumLinks = @extended

Local $sTxt = $iNumLinks & " links found" & @CRLF & @CRLF
For $oLink In $oLinks
   Local $aoLinks = _IETableWriteToArray($oLink,  True)

    $sTxt &= $oLink.href & @CRLF
 Next

ConsoleWrite("Link Info"&' '&  $sTxt&@CR)
FileWrite('LINKS.txt',  $sTxt&@CR)
Global $readlinks = 'LINKS.txt'

EndFunc

func _1_2_3_($sPosSplitt)

   $IEbodyIndexSuche=_IEBodyReadHTML($oIE)
$aIEbodyIndexSuche=StringRegExp($IEbodyIndexSuche, '<TD><A style=(.*?)/A></TD>', 3)

For $i = 0 to UBound($aIEbodyIndexSuche) -1
            $aIndexSuche=StringRegExp($aIEbodyIndexSuche[$i], '>(.*?)<', 1)
            _ArraySuche_($filetxt)
            $sIndexSuche = _ArrayToString($aIndexSuche)
            ConsoleWrite($sIndexSuche& @CRLF)

            _IELinkClickByText($oIE, $sIndexSuche, '', 1)
            $newdata=_IEBodyReadText($oIE)
            $result = StringInStr($newdata, $sPosSplitt)
      If $result > 1 Then
          MsgBox(0, 'SUCHSTRING', $sPosSplitt & " Found")
       Else
           EndIf
                    Next
                 EndFunc

 func _combobox()
                   $autoC=GUICtrlRead($combo)
            For $i = 0 To UBound($aDATA) - 1 Step 1
                If $aDATA[$i][3] = $autoC Then
                   _GUICtrlListView_SetItemChecked ($idListView, $i)
                    ConsoleWrite('> Checked the Box! \t -->>'& $aDATA[$i][0]& @CRLF)
                EndIf
             Next
          EndFunc

func _btn1_()
               For $i = 0 To UBound($aDATA) - 1 Step 1
                If _GUICtrlListView_GetItemChecked($idListView, $i) Then
                    MsgBox(1, $aDATA[$i][1], '')
                    ConsoleWrite(StringFormat('> Item %i is checked! \t -->> data: %-26s SIM: %14s TYP: %-26s BS: %s\n', $i, $aDATA[$i][0], $aDATA[$i][1], $aDATA[$i][2], $aDATA[$i][3]))
                     _GUICtrlListView_SetItemChecked ($idListView, $i, 0)
                    ConsoleWrite('> Uncheck the Box! \t -->>'& $aDATA[$i][0])
                EndIf
             Next
EndFunc

func _btn2_()
             $autoC=GUICtrlRead($combo)

            For $i = 0 To UBound($aDATA) - 1 Step 1
                If $aDATA[$i][3] = $autoC Then
                   _GUICtrlListView_SetItemChecked ($idListView, $i)
                    ConsoleWrite('> Checked the Box! \t -->>'& $aDATA[$i][0]& @CRLF)
                EndIf
             Next
EndFunc
func _btn3_()
                $autoC=GUICtrlRead($combo)
            For $i = 0 To UBound($aDATA) - 1 Step 1
                IF _GUICtrlListView_GetItemChecked($idListView, $i) = 'Alles abwählen' Then
                   _GUICtrlListView_SetItemChecked ($idListView, $i, 0)
                    ConsoleWrite('> Unchecked the Box! \t -->>'& $aDATA[$i][0]& @CRLF)
                EndIf
            Next
         EndFunc
func _btn4_()
                           $autoC=GUICtrlRead($combo)
            For $i = 0 To UBound($aDATA) - 1 Step 1
         If _GUICtrlListView_GetItemChecked($idListView, $i) Then
            _IENavigate($oIE, $his&$aDATA[$i][1])
            _datum ()
            _1_2_3_($sPosSplitt)
_GUICtrlListView_SetItemChecked ($idListView, $i, 0)
    ConsoleWrite('> Uncheck the Box! \t -->>'& $aDATA[$i][0])
         EndIf
         Next
      EndFunc



Func __SELECT__DB__()
    Local Const $sMessage = "- 1 File wählen. -"

    ; Display an open dialog to select a list of file(s).
    If @error Then
        MsgBox($MB_SYSTEMMODAL, "", "Keine Datei ausgewählt.")
        FileChangeDir(@ScriptDir)
    Else
        FileChangeDir(@ScriptDir)
        $sFileOpenDialog = StringReplace($sFileOpenDialog, "|", @CRLF)
        MsgBox($MB_SYSTEMMODAL, "", "Diese Datenbank wurde ausgewählt : " & @CRLF & $sFileOpenDialog)
         _AuswahlMEN($sFileOpenDialog)
        ConsoleWrite($sFileOpenDialog)
    EndIf
EndFunc
Func _ExitApp()
    Exit
 EndFunc
#EndRegion funktionen



#Region Beginn
$F1 = GUICreate("Test", 1860, 849, 34, 120)
_GUI_dropdown_Main_()
_GUI_Login_Browser_()
GUIwhile()
#EndRegion Beginn

#Region While Schleife Main
func GUIwhile()
While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
       Exit
    Case $_dropdown_Main0002
      _ExitApp()

    case $_dropdown_Main0021
       MsgBox(1, '', 'kommt in einem anderne Skript enthalen @Datenbank laden.')
            ;kommt in einem anderne Skript enthalen @Datenbank laden.
         Case $_dropdown_Main0022
             MsgBox(1, '', 'noch in Planung')
            ;noch in Planung
         Case $logON
            _login_Button_Menu()
         Case $Menu
            __SELECT__DB__()
         Case $_dropdown_Main0021
            MsgBox(1, '', 'kommt in einem anderne Skript enthalen @Datenbank laden.')
            Exit
   EndSwitch
WEnd
EndFunc
#EndRegion While Schleife Main
#Region While Schleife Menu
func menuwhile()
While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
        Case $idListView
;~             ; Kick off the sort callback
            _GUICtrlListView_SortItems($hListView, GUICtrlGetState($idListView))
         Case $combo
            _combobox()
        Case $idBtn1
            _btn1_()
          Case $idBtn2
               _btn2_()
         Case $idBtn3
               _btn3_()
         Case $idBtn4
               _btn4_()
EndSwitch
WEnd
EndFunc
#EndRegion While Schleife Menu

Alles anzeigen

Das Login ist schon eingestellt, einfach auf LOGIN klicken.

Erklärung :

1 . LOGIN drücken.

2. das Datum ist extra auf 2016 gestellt damit wir Testdaten zur Verfügung haben.

3. Menü-Taste Datenbank laden : die selbst erstellte *lvdb datei auswählen.

4. Dann Test AS auswählen (dort sind die meisten TEST daten vorhanden.

Button BT4 klicken.

Dann kann man sehen was ich vor habe.

Funktionen um die es geht :

_btn4_()

_1_2_3_($sPosSplitt)

_ArraySuche_

Ich suche auf der aufgerufenen Seite mit der Datei : CARsucheNach.txt, nach Strings, die in der Datei mit | getrennt sind. auf dem IEhtml/Bodytext (leider funktioniert das so im oberen Beispiel nicht.(das Suchen)

Man kann beobachten das die Zahlen oben & unten gelesen werden & dann geklickt. Das Problem bei 20 Seiten kommt '...' wenn '...' geklickt ist kommt man zur Seite 21 aber vor der 21 steht dann wieder '...' & das wird dann wieder angeklickt anstatt 22.

Einfach mal ausführen dann kann man sehen was ich meine.

Das ist ja nur eine Beispielseite, bei uns im Netz, suchen wir manchmal nach bestimmten Wörtern, dort kann es auch vorkommen das 1 Fahrzeug mehrere tausend Seiten am Tag hat.

Deshalb wollte ich fragen wie man die Zahlen Trennt, weil ich erst den Quelltext geparst in einzelne Array hatte und dann 1234567891011121314151617181920... bei raus kam.

Ich hoffe ich muss kein neuen Thread aufmachen dafür .

Mit freundlichen Grüßen

Mojoe

MojoeB

Ja da hast du recht, nachdem ich das abgeschickt hatte, dachte ich mir das so eine Frage kommt.

ich bin grad auf dem Sprung ich werde die Frage mit Beispiel noch mal präzisieren, mit beispiel seite wo & wie das ganze geschehen soll.

ich hoffe das ich es heute Abend noch schaffe.

MojoeB

Hallo zusammen,

Ist weiß jemand ob es möglich ist Zahlen zu trennen.

Also bsp.

Vorgabe : 123456789101112131415161718192021

Endergebnis als Array: 1 - 2 - 3 - 4 - 5 - 6 - 7 - 8 - 9 -10 - 11 - 12 - 13 - 14 - 15 - 16 - 17 - 18 - 19 - 20 - 21 also jede Zahl in ein als eigene spalte.

& falls das geht würde das dann auch mit mehr Ziffern gehen ? bsp : 1001100210031004 = 1001 1002, 1003, 1004

Ich weiß das man mit StringSplit die Zahlen trennen kann allerdings geht das in der einfachen Form mit mit einern ich weiß nicht wie das mit Zehnern oder hunderter gar tausender gehen soll.

Mit freundlichen Grüßen

Mojoe

MojoeB

@Kanashius : Danke :), für deine große mühe, aber ich meinte das so wie Bitnugger gepostet hat.

Ich werde mir deinen Code dennoch mal genauer anschauen, super Arbeit auch mit dem @error darauf hätte ich auch kommen können. Super Arbeit

@Bitnugger : '<' Danke :), ich dachte schon das es was blödes ist.^^ Genau so habe ich das gemeint ich danke dir ebenso werde nun damit weiter arbeiten.

Danke euch beiden.

MojoeB

nene war der Arbeits--laptop hab ich nicht gemerkt beim rausschicken.

es sollte natürlich *kein <- heißen

MojoeB

Hallo zusammen ich hoffe Ihr könnt mir ein wenig helfen, leider komme ich selber nicht weiter.

Ich lese oft in diesem Forum & habe mich jetzt mal angemeldet.

Ich versuche mal schnell zu erklären.

Ich benötige das für die Arbeit.

Möchte so unseren Mitarbeitern die Arbeit etwas erleichtern.

Ich lasse, erst auf einer (internen)Homepage, die Datenbank auslesen, das klappt auch & lass mir eine Datenbank in einer Datei erstellen.

Im Beispiel habe ich mal die Dateiendung .bbdb genommen.

Der Inhalt der Test.bbdb wird mit StringRegExp ausgelesen & dabei in einer For schleife erstellt.

Ich habe einige testzeilen gelöscht vor dem Post, nun bekomm ich nur noch einen Fehler x: & kann die Viewlist nicht mehr öffnen.

Aber warum ich eigentlich schreibe ist bekomm die ausgelesenen Variablen in der For Schleife einfach nicht in die While schleife um diese dort mit einer Funktion dann dort weiter zu arbeiten.

Ich habe zwar schon hinbekommen mit GUICtrlRead($listview, 2) den letzten Wert in der Datenbank bzw. Viewlist auszugeben.

Aber eigentlich wollte ich:

Verschiedene Checkboxen anklicken -> danach auf Button klicken -> funktion $hlink+$aDATA01| (die ausgewählten Checkboxen lesen & mit einem Link+Datensatz auf der Homepage zu öffnen.)

& dann weiter.... nach einander nicht nur die letzte Checkbox ^^.

Ich hoffe Ihr könnt mir helfen, wäre sehr nett.

Ich habe einige Varianten die letzten paar Tage ausprobiert, ich bin kein experte, das ist klar aber ich habe es einfach nicht hinbekommen.

Leider habe ich grade einen Fehler mit eingebaut :

Code

"C:\Datensatz\2\bspppp.au3" (54) : ==> Subscript used on non-accessible variable.:
Global $acbl[][5] = [[ $aDATA02[1], $aDATA01[1], $aDATA03[1], $aDATA04[1] ] ]
Global $acbl[][5] = [[ $aDATA02[1], $aDATA01[1], $aDATA03^ ERROR

& kann diesen ebenfalls nicht finden, aber vielleicht seh ich einfach den Wald lauter Bäume nicht mehr.

Mit freundlichen Grüßen

Mojoe

die Test.bbdb :

Code

<data>TEST GERÄT 2327</data>=<SIM>4916093114052</SIM><TYP>testtyp</TYP><BS>HAMBURG</BS>
<data>TEST GERÄT 2421</data>=<SIM>4916093113907</SIM><TYP>(16)</TYP><BS>BISS</BS>
<data>TEST GERÄT 0999</data>=<SIM>4916092192082</SIM><TYP>(16)</TYP><BS>KAMERUN</BS>
<data>TEST GERÄT 0088</data>=<SIM>4916090506695</SIM><TYP>testtyp</TYP><BS>BERGHAUPTEN</BS>
<data>TEST GERÄT 2222</data>=<SIM>4915143124082</SIM><TYP>testtyp</TYP><BS>BERLIN</BS>
<data>TEST GERÄT 3230</data>=<SIM>4915117922365</SIM><TYP>testtyp</TYP><BS>MONHEIM</BS>
<data>TEST GERÄT 3632</data>=<SIM>4916092180511</SIM><TYP>testtyp</TYP><BS>IN DER ALL</BS>
<data>TEST GERÄT 3633</data>=<SIM>4916092180375</SIM><TYP>testtyp</TYP><BS>ZUSATZ</BS>
<data>TEST GERÄT 3634</data>=<SIM>4916092172661</SIM><TYP>testtyp</TYP><BS>COSMUS</BS>
<data>TEST GERÄT 3792</data>=<SIM>491622729776</SIM><TYP>testtyp</TYP><BS>ZWIEBLE</BS>
<data>TEST GERÄT 4754</data>=<SIM>4915119435278</SIM><TYP>Bahn</TYP><BS>TISCHER</BS>
<data>TEST GERÄT 7708</data>=<SIM>4915162722911</SIM><TYP>testtyp</TYP><BS>BERLIN</BS>
<data>TEST GERÄT 8833</data>=<SIM>4915117901056</SIM><TYP>testtyp</TYP><BS>MÜNCHEN</BS>
<data>TEST GERÄT 8836</data>=<SIM>491755502399</SIM><TYP>testtyp</TYP><BS>STUTTGART/BS>
<data>TEST GERÄT 8850</data>=<SIM>4915128347813</SIM><TYP>testtyp</TYP><BS>STASSHAUS</BS>
<data>TEST GERÄT 8885</data>=<SIM>491601672520</SIM><TYP>GWT/A</TYP><BS>BEISPIELSTADT</BS>
<data>TEST GERÄT 8887</data>=<SIM>491601657760</SIM><TYP>GWT/A</TYP><BS>HUGO</BS>
<data>TEST GERÄT 9880</data>=<SIM>4915172690936</SIM><TYP>testtyp(16)</TYP><BS>TELMIN</BS>
<data>TEST GERÄT 9922</data>=<SIM>4915172690934</SIM><TYP>testtyp(16)</TYP><BS>ZUKKER</BS>
<data>TEST GERÄT 9927</data>=<SIM>491718398763</SIM><TYP>testtyp(16)</TYP><BS>NIERNSTEH</BS>
<data>TEST GERÄT 9938</data>=<SIM>4916092170761</SIM><TYP>testtyp(16)</TYP><BS>BERLIN</BS>

Alles anzeigen

& das Script momentan für den Zweck den ich oben beschreibe :

C

#include <Array.au3>
#include <File.au3>
#include <MsgBoxConstants.au3>
#include <StringConstants.au3>
#include <WindowsConstants.au3>
#include <GUIConstantsEx.au3>
;~ #include <funktion.au3>
#include <GUIListView.au3>
#include <ListViewConstants.au3>
#include <ButtonConstants.au3>
local $vdb
;~ $sections = IniReadSectionNames('hersteller.ini')
;~ For $a = 1 To UBound($sections) - 1
;~  $keys = IniReadSection('hersteller.ini', $sections[$a])
;~       For $b = 1 to  UBound($keys) - 1

;~           $h0=$keys[0][0];int
;~ ;
;~    Next
;~ Next



Global $Form1 = GUICreate("Form1", 1000, 800)
Global $Bt1 = GUICtrlCreateButton("Test", 16, 120, 50, 30, BitOR($BS_NOTIFY,$BS_FLAT))
$x = 16
$y = 16
$step = 120
$ListView = GUICtrlCreateListView("Daten01 | Daten02 | Daten03 | Daten04 |", 100, 100, 580, 280, $WS_BORDER, $LVS_EX_FULLROWSELECT + $LVS_EX_CHECKBOXES)

Dim $NumbStringSim, $hLink, $aDATA01, $aDATA02, $aDATA03, $aDATA04


                       $hLink = 'http://google.de'


Local $iCountLines = _FileCountLines('test.bbdb')
ConsoleWrite($iCountLines)
for $po = 1 to $iCountLines    _FileReadToArray('test.bbdb', $vdb, $iCountLines, '')

next


For $in = 1 to UBound($vdb)-1

Global $aDATA01 = StringRegExp($vdb[$in], '<SIM>(.*?)</SIM>', $STR_REGEXPARRAYFULLMATCH)
Global $aDATA02 = StringRegExp($vdb[$in], '<data>(.*?)</data>', $STR_REGEXPARRAYFULLMATCH)
Global $aDATA03 = StringRegExp($vdb[$in], '<BS>(.*?)</BS>', $STR_REGEXPARRAYFULLMATCH)
Global $aDATA04 = StringRegExp($vdb[$in], '<TYP>(.*?)</TYP>', $STR_REGEXPARRAYFULLMATCH)
;~

Global $acbl[][5] = [[ $aDATA02[1], $aDATA01[1], $aDATA03[1], $aDATA04[1] ] _
]
$name=$acbl[0][0]
$sim=$acbl[0][1]
$bsss=$acbl[0][2]
$herges=$acbl[0][3]
ConsoleWrite($name &'_____________________'&' '&$sim&' '&$bsss& '  '&$herges&@CRLF )

;~ ConsoleWrite($acb[0][1] &@CRLF)
;~ ConsoleWrite($acb[0][3] &@CRLF)



$item=GUICtrlCreateListViewItem($name &' | '& $sim &' | '& '$herges noch nicht definiert'  & ' | '& $bsss,$ListView ); ConsoleWrite($aDATA03[0])
;~ GUICtrlCreateListViewItem($aDATA02[1] &' | '& $aDATA01[1] &' | '&$aDATA03[1]& ' | '& $aDATA04[1] &' | ', $ListView );
Next

GUISetState(@SW_SHOW)


While 1  $nMsg = GUIGetMsg()  Switch $nMsg    Case $GUI_EVENT_CLOSE      Exit
      Case $Bt1

;~ For $i = 0 To UBound($item) - 1
;~ If _GUICtrlListView_GetItemChecked($item, $i) Then
;~             ConsoleWrite($item)

;~ EndIf
;~ Next
  EndSwitch
WEnd

Alles anzeigen

MojoeB

Hay leute ich lese schon sehr sehr lange mit & dachte mir ich trete mal bei um mich mit euch auszutauschen & besser zu werden, den ich mache gerne Sachen in Autoit, leider bin ich noch ein experte.

Beiträge von MojoeB

Excel - Exceldatei schließen ohne speichern ... geht nicht

_ArrayAdd +IETableWriteToArray

_ArrayAdd +IETableWriteToArray

Script stoppt wenn Notebook aus Docking-Station gezogen wird

Office-Installation mit Fortschrittsbalken, der den Prozentsatz anzeigt

Zahlen trennen

Office-Installation mit Fortschrittsbalken, der den Prozentsatz anzeigt

Zahlen trennen

Zahlen trennen

Zahlen trennen

Zahlen trennen

Zahlen trennen

Zahlen trennen

Viewlist Checkboxen, Array Container

Mojoe is DA :D

Viewlist Checkboxen, Array Container

Mojoe is DA :D