dim p as NSAppleEventDescriptorMBS = theEvent.paramDescriptorForKeyword("----")
Dim params() as String
Dim s() as String
Dim line as String
line = DecodeURLComponent(p.stringValue)
params = line.Split("?")
If params.count = 2 Then
Dim param() as String = params(1).Split("&")
For Each par as String in param
s = par.Split("=")
Parameters.Add(s(0))
Values.Add(s(1))
Next
End If
If Parameters.count > 0 Then
For i as Integer = 0 to Parameters.LastIndex
Dim ctrl as DesktopTextField
ctrl = Window1.GetControl(Parameters(i))
If ctrl <> nil Then
ctrl.Text = Values(i)
End If
Next
End If
I get with using PHP urlencode for GET parameters: