Dim loginName As String = "spread@reasonables.com"

Dim APIKey As String = "TEST0000-TEST-0000-TEST-0000TEST0000"

Dim CampaignName As String = "NoClone Promotion"

'Create a SpreadWebService object and use its method.

Dim MySpread As New SpreadWebService

Dim campaignID As Integer = MySpread.getCampaignID(loginName, APIKey , CampaignName)

  /**
    * @name     getCampaignID
    * @function get the id of Campaign
    * @param
    *  loginEmail Login Email of Spread.
    *  APIKey Spread account API Key.
    *  CampaignName   The name of campaign
    * @return
    *  		campaignID.
    */
    public function getCampaignID($loginEmail,$APIKey,$CampaignName){
        $paraArray = array(
	            'loginEmail' 	=> $loginEmail,
	            'APIKey'     	=> $APIKey,
		    'CampaignName'      => $CampaignName
        );
        $Client = new SoapClient("http://service.rspread.com/Service.asmx?WSDL");
        $campaignID = $Client -> getCampaignID( $paraArray );
        return $campaignID ;
    }