Hallo!
Code
$ret = "otpauth://totp/Autodesk%3Amaierz%40maier.de?period=30&digits=6&algorithm=SHA1&secret=MMMMMMMMM&issuer=Autodesk"
$ret = StringReplace($ret, "QR-Code:", "")
$ret = StringReplace($ret, "Â", "")
$ret = StringReplace($ret, "ä", "ä")
$ret = StringReplace($ret, "ö", "ö")
$ret = StringReplace($ret, "ü", "ü")
$ret = StringReplace($ret, "ß", "ß")
$ret = StringReplace($ret, "é", "é")
$ret = StringReplace($ret, Chr(160), " ")
If StringInStr($ret, "&") Then
$ret = StringSplit($ret, "?")
$ret = StringSplit($ret, "&")
MsgBox (64,"",Ubound($ret))
For $inString = 1 To $ret[0] ;(oder "Ubound($ret)"?)
$outString = $ret($inString)
MsgBox(64,"",$outString)
If StringMid($outString, 0, 7) = "secret=" Then
$outString = StringReplace($ret($inString), "secret=", "")
MsgBox(64, "Hinweis", $outString)
ExitLoop
EndIf
Next
Else
MsgBox(64, "Hinweis", "&-Zeichen ist nicht vorhanden")
EndIf
Alles anzeigen
Mit obigen Code möchte ich einen String nach "&" splitten. Zuerst muss alles bis zum Fragezeichen weg. Das funktioniert auch ($ret = StringSplit($ret, "?")). Dann soll nach "&" gesplittet werden. Rauskommen müssten 5 Werte ("period=", "algorithm=", "secret=", "digits=" und "issuer="). Funktioniert aber nicht. In VBA funktioniert das genau so. Aber wie funktioniert es in AutoIt richtig, so das ich die Werte bekomme? Danke!
Gruß, René