Danke für die Unterstützung an Euch drei.
Beiträge von Decide
-
-
Moin Leute,
ich bin Björn, derzeit junge 37 aus dem Norden Deutschlands. Beruflich bin ich Systemadmin, hauptsächlich für AV-Systeme, Web-Proxys und Firewalls. Ich lese hier immer mal mit, meistens dann wenn ich wieder selber ein Skript schreibe und nicht weiterkomme. Ich hab mal einen Post eingestellt und möchte mich aber nicht vor der Vorstellung drücken.
Wenn ich mal Skripte mache, dann meistens AutoIt, VB-Geschichten in Excel und Python. Vor langer Zeit auch mal C und Assembler.
Die Freizeit nutze ich mit der Familie, Frau und Tochter und wenn es die Zeit zulässt wird an der PS4 gezockt. Meist Shooter oder Beat´Em´Up.
-
Hallo zusammen,
bisher konnte ich alles was ich hilfsmäßig benötigt habe, immer im Forum finden. Nun komme ich aber an einer Stelle nicht weiter und vielleicht weiß einer hier Rat.
Ich habe einen Text, in dem Fall eine URL von einer Subdomain, der in eine Variable übergeht und benötge jetzt dafür die Teilstrings bis zum ersten und vom letzten Punkt.
Beispiel:
domainurl.test.comDavon brauche ich quasi
domainurl und comZum Testen bring ich das in eine MsgBox und habe das schon mit SplitStringTeilstring gemacht. Der erste Teil domainurl ist damit kein Problem, allerdings bekomme ich das com nicht raus.
Wenn ich SplitStringTeilstring nutze bekomme ich domainurl und test.Daher die Frage ob es die Möglichkeit gibt, den String ab dem letzten Punkt zu bekommen? Da dieser nicht immer 3-stellig ist, kann man ja schlecht mir StringRight arbeiten, oder?
Danke vorab und Gruß Björn
Hier mal der aktuelle Code:
C
Alles anzeigen; Begin AutoIt Includes #include <ButtonConstants.au3> #include <EditConstants.au3> #include <GUIConstantsEx.au3> #include <StaticConstants.au3> #include <WindowsConstants.au3> #include <MsgBoxConstants.au3> #include <Misc.au3> #include <File.au3> ; End AutoIt Includes ; Variables $Input_URL_Beispiel = "URL hier eingeben" $URLFront = "Teil1" $URLMiddle = "Teil2" $URLEnd = "Teil3" ; Begin Menue $Form1 = GUICreate("Hauptmenue", 331, 153, 783, 463) $Button_Create = GUICtrlCreateButton("Create", 224, 112, 97, 25) $Button_Beenden = GUICtrlCreateButton("Beenden", 8, 112, 99, 25) $Input_URL = GUICtrlCreateInput($Input_URL_Beispiel, 16, 72, 297, 21, BitOR($GUI_SS_DEFAULT_INPUT, $ES_CENTER, $WS_BORDER)) GUICtrlSetFont (-1,9, 800); bold GUISetState(@SW_SHOW) While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit Case $Button_Beenden Exit Case $GUI_EVENT_PRIMARYDOWN $Input_URL_Leer = GUIGetCursorInfo() If IsArray($Input_URL_Leer) Then If $Input_URL_Leer[4] = $Input_URL Then GUICtrlSetData($Input_URL, "") Else EndIf EndIf Case $Button_Create $URL = GUICtrlRead($Input_URL) _Single() EndSwitch WEnd ; End Menue Func _Single() MsgBox(64, "Information", $URLFront & StringSplitTeilstring ($URL, ".", 1) & $URLMiddle & StringSplitTeilstring ($URL, ".",2) & $URLEnd, $BS_Left) EndFunc Func StringSplitTeilstring ($sString, $sDelimiters, $iNummer) Local $aTEMP $aTEMP = StringSplit ($sString, $sDelimiters, 0) Return($aTEMP[$iNummer]) EndFunc