Click or drag to resize

IAddressAddress2 Property

Address line 2 Addressline 2 is used both in postal and street addresses for the contact

Namespace:  SuperOffice.COM.SuperOfficeDB
Assembly:  SuperOfficeDB.Interop (in SuperOfficeDB.Interop.dll) Version: 8.0.0.0
Syntax
string Address2 { get; set; }

Property Value

Type: String
String - Address line number 2 for the object
Examples

Show address of ownercompany

This text may be copied to the notepad, and saved as a *.vbs file. Remember to change the login information.

VB
set objso = CreateObject("superofficedb.database")
if objso.login("<USERNAME>", "<PASSWORD>") then
    set contact = objso.GetContact(objso.OwnerContactId)
        msg = msg & "************* Street address *************" & vbCrLf
        msg = msg & "Address1: " &  contact.StreetAddress.Address1 & vbcrlf  
        msg = msg & "Address2: " &  contact.StreetAddress.Address2 & vbcrlf  
        msg = msg & "Address3: " &  contact.StreetAddress.Address3 & vbcrlf 
        msg = msg & "AddressId: " &  contact.StreetAddress.AddressId & vbcrlf 
        msg = msg & "City: " &  contact.StreetAddress.City & vbcrlf 
        msg = msg & "CountryId: " &  contact.StreetAddress.CountryId & vbcrlf 
        msg = msg & "County: " &  contact.StreetAddress.County & vbcrlf 
        msg = msg & "FormattedAddress: " &  contact.StreetAddress.FormattedAddress & vbcrlf
        msg = msg & "State: " &  contact.StreetAddress.State & vbcrlf 
        msg = msg & "Type: " &  contact.StreetAddress.Type & vbcrlf  
        msg = msg & "TypeIdx: " &  contact.StreetAddress.TypeIdx & vbcrlf 
        msg = msg & "ValidFrom: " &  contact.StreetAddress.ValidFrom & vbcrlf 
        'bug id 6147
        'msg = msg & "ValidTo: " &  contact.StreetAddress.ValidTo() & vbcrlf 
        msg = msg & "ZipCode: " &  contact.StreetAddress.ZipCode & vbcrlf  
        msg = msg & "************* Postal address *************" & vbCrLf
        msg = msg & "Address1: " &  contact.PostalAddress.Address1 & vbcrlf  
        msg = msg & "Address2: " &  contact.PostalAddress.Address2 & vbcrlf  
        msg = msg & "Address3: " &  contact.PostalAddress.Address3 & vbcrlf 
        msg = msg & "AddressId: " &  contact.PostalAddress.AddressId & vbcrlf 
        msg = msg & "City: " &  contact.PostalAddress.City & vbcrlf 
        msg = msg & "CountryId: " &  contact.PostalAddress.CountryId & vbcrlf 
        msg = msg & "County: " &  contact.PostalAddress.County & vbcrlf 
        msg = msg & "FormattedAddress: " &  contact.PostalAddress.FormattedAddress & vbcrlf
        msg = msg & "State: " &  contact.PostalAddress.State & vbcrlf 
        msg = msg & "Type: " &  contact.PostalAddress.Type & vbcrlf  
        msg = msg & "TypeIdx: " &  contact.PostalAddress.TypeIdx & vbcrlf 
        msg = msg & "ValidFrom: " &  contact.PostalAddress.ValidFrom & vbcrlf 
        'bug id 6147
        'msg = msg & "ValidTo: " &  contact.PostalAddress.ValidTo & vbcrlf 
        msg = msg & "ZipCode: " &  contact.PostalAddress.ZipCode & vbcrlf  
    msgbox msg, ,"SuperCOM"
else
    MsgBox "Unable to connect to database"
end if
Set objSO = Nothing

See Also