Sign in to follow this  
Followers 0
Markir

Registry String Question

2 posts in this topic

#1 ·  Posted (edited)

123

Edited by Markir

Share this post


Link to post
Share on other sites



I think the functions have the same structure.

So you can use

#Region PhoneMail Abfrage
$PM_Protocol = 1
While 1
   $key = RegEnumKey("HKLM\SOFTWARE\PP-COM\MRS\IsdnApl\Protocols",$PM_Protocol)
   If @error Then ExitLoop
   $str = RegRead("HKLM\SOFTWARE\PP-COM\MRS\IsdnApl\Protocols\" & $key,"Name")
   
   $PM_Protocol = $PM_Protocol + 1 
   If $str = ("PhoneMail") Then
       $PM_Protocol = Regread("HKLM\SOFTWARE\PP-COM\MRS\IsdnApl\Protocols\" & $key, "ParamBlock")
;Msgbox(0,"Test",$PM_Protocol)
Msgbox(0, "", _getValue_PM( "da"))
Msgbox(0, "", _getValue_PM( "ga"))
Msgbox(0, "", _getValue_PM( "ca"))
Msgbox(0, "", _getValue_PM( "fa"))
Msgbox(0, "", _getValue_PM( "ta"))
Msgbox(0, "", _getValue_PM( "ua"))
ExitLoop
   EndIf
WEnd
#EndRegion PhoneMail Abfrage

#Region PhoneMail Einstellungen
Func _getValue_PM($Label_PM)

    $sOut1 = StringTrimLeft($PM_Protocol, StringInStr($PM_Protocol, $Label_PM & "="))
    $sOut2 = StringMid($sOut1, StringInStr($sOut1, "=") + 1, (StringInStr($sOut1, " ") - StringInStr($sOut1, "=")))
    Return $sOut2
EndFunc

See $sOut1 and $sOut2!

Maybe this helps.

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!


Register a new account

Sign in

Already have an account? Sign in here.


Sign In Now
Sign in to follow this  
Followers 0