ca = New ServiceHost(GetType(GetCP))
 ca.Open()

 <service behaviorConfiguration="DefaultServiceBehavior" name="OnlineRegCmd.GetCP">
                <endpoint address="" behaviorConfiguration="WebHttpBehavior"
                    binding="webHttpBinding" bindingConfiguration="" contract="OnlineRegAddon.CP">
                    <identity>
                        <dns value="localhost" />
                    </identity>
                </endpoint>
                <host>
                    <baseAddresses>
                        <add baseAddress="http://localhost:8500" />
                    </baseAddresses>
                </host>
            </service>