loBridge = GetwwDotnetBridge() LOCAL loOriginalAddress as SysManager.Address LOCAL loVerifiedAddress as SysManager.VerifiedAddress loBridge.LoadAssembly("Sysmanager.dll") && assume it's in path loOriginalAddress = loBridge.CreateInstance("SysManager.Address") loOriginalAddress.Address1 ="2170 S Josephine St Unit 1&/>" loOriginalAddress.Address2 = "" loOriginalAddress.City = "Denver" loOriginalAddress.Country = "Bad" loOriginalAddress.State = "CO" loOriginalAddress.Zip = "80210" loVerifiedAddress = loBridge.CreateInstance("SysManager.VerifiedAddress") loVerifiedAddress = loVerifiedAddress.VerifyAddress(loOriginalAddress) ?loVerifiedAddress.Result ?loVerifiedAddress.CountryOther than LoadAssembly and loBridge.CreateInstance() you get to use the same exact code - minus the COM registration requirement.
>LOCAL loOriginalAddress as SysManager.Address >LOCAL loVerifiedAddress as SysManager.VerifiedAddress >loOriginalAddress = CREATEOBJECT("SysManager.Address") >loOriginalAddress.Address1 ="2170 S Josephine St Unit 1&/>" >loOriginalAddress.Address2 = "" >loOriginalAddress.City = "Denver" >loOriginalAddress.Country = "Bad" >loOriginalAddress.State = "CO" >loOriginalAddress.Zip = "80210" > > >loVerifiedAddress = CREATEOBJECT("SysManager.VerifiedAddress") > >loVerifiedAddress = loVerifiedAddress.VerifyAddress(loOriginalAddress) > >?loVerifiedAddress.Result > >?loVerifiedAddress.Country>
>>>>loNet = loBridge.Createinstance("Westwind.WebConnection.TypePassingTests") >>>> >>>>*** Create ComValue objects for each parameter >>>>loInt = loBridge.CreateComValue() >>>>loInt.Value = INT(10) >>>>loString = loBridge.CreateComValue() >>>>loString.Value = "Hello World." >>>>loDecimal = loBridge.CreateComValue() >>>>loDecimal.Value = CAST( 5.22 as Currency) >>>> >>>>lobridge.InvokeStaticMethod("Westwind.WebConnection.TypePassingTests",; >>>> "PassByReferenceStatic",; >>>> loInt,loString,loDecimal) >>>> >>>>*** Look at the result values >>>>? loInt.Value, loString.Value, loDecimal.Value >>>>>>>>
>>>>>static public string VerifyAddress( ref string AddressLine1, ref string AddressLine2, ref string City, ref string State, ref string ZipCode, ref string Country)>>>>>
>>>>>lcResult = loBridge.Invokestaticmethod("Siriusware.Library.Cass", "VerifyAddress", @Address1, @Address2, @City, @State, @Zipcode, @Country) >>>>> ?Address1 >>>>> ?ZipCode >>>>> >>>>> ?lcResult >>>>>>>>>>
>>>>>>>do wwDotNetBridge >>>>>>>local loBridge as wwDotNetBridge >>>>>>>loBridge = createobject("wwDotNetBridge", 'V4') >>>>>>>if vartype(loBridge) = 'O' >>>>>>> if loBridge.LoadAssembly("Siriusware.Library.dll") >>>>>>> >>>>>>> Address1 = "2170 S Josephine St Unit 1" >>>>>>> Address2 = "" >>>>>>> City = "Denver" >>>>>>> State = "CO" >>>>>>> Zipcode = "80210" >>>>>>> Country = "USA" >>>>>>> >>>>>>> * string sResult = Cass.VerifyAddress( ref Address1, ref Address2, ref City, ref State, ref Zipcode, ref Country); >>>>>>> >>>>>>> loCass = loBridge.CreateInstance("Cass") >>>>>>> if isnull(loCass) >>>>>>> ? loBridge.cErrorMsg >>>>>>> return >>>>>>> endif >>>>>>> >>>>>>> *loPop.Connect("mail.gorge.net",587,.f.) >>>>>>> >>>>>>> >>>>>>> * loPop.Connect("mail.gorge.net",587,.f.) >>>>>>> *? loBridge.InvokeMethod(loPop,"Connect","pop3.gorge.net",110,.f.) >>>>>>> >>>>>>> ? loCass.VerifyAddress(@Address1, @Address2, @City, @State, @Zipcode, @Country) >>>>>>> endif >>>>>>>endif >>>>>>>>>>>>>>