Jump to content

Registry String Question

Recommended Posts

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, "", _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"))
#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

See $sOut1 and $sOut2!

Maybe this helps.

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
  • Recently Browsing   0 members

    No registered users viewing this page.

  • Create New...