本文整理匯總了VB.NET中System.Runtime.Remoting.Lifetime.LifetimeServices.SponsorshipTimeout屬性的典型用法代碼示例。如果您正苦於以下問題：VB.NET LifetimeServices.SponsorshipTimeout屬性的具體用法？VB.NET LifetimeServices.SponsorshipTimeout怎麽用？VB.NET LifetimeServices.SponsorshipTimeout使用的例子？那麽, 這裏精選的屬性代碼示例或許可以為您提供幫助。您也可以進一步了解該屬性所在類System.Runtime.Remoting.Lifetime.LifetimeServices的用法示例。
在下文中一共展示了LifetimeServices.SponsorshipTimeout屬性的1個代碼示例，這些例子默認根據受歡迎程度排序。您可以為喜歡或者感覺有用的代碼點讚，您的評價將有助於係統推薦出更棒的VB.NET代碼示例。
示例1: TcpChannel
' Register the channel.
Dim myChannel As New TcpChannel()
ChannelServices.RegisterChannel(myChannel)
RemotingConfiguration.RegisterActivatedClientType( _
GetType(HelloService), "Tcp://localhost:8085")
Dim myTimeSpan As TimeSpan = TimeSpan.FromMinutes(10)
' Create a remote object.
Dim myService As New HelloService()
Dim myLease As ILease
myLease = CType(RemotingServices.GetLifetimeService(myService), ILease)
If myLease Is Nothing Then
Console.WriteLine("Cannot lease.")
Return
End If
Console.WriteLine("Initial lease time is " & myLease.InitialLeaseTime.ToString())
Console.WriteLine("Current lease time is " & myLease.CurrentLeaseTime.ToString())
Console.WriteLine("Renew on call time is " & myLease.RenewOnCallTime.ToString())
Console.WriteLine("Sponsorship timeout is " & myLease.SponsorshipTimeout.ToString())
Console.WriteLine("Current lease state is " & myLease.CurrentState.ToString())開發者ID:VB.NET開發者，項目名稱:System.Runtime.Remoting.Lifetime，代碼行數:23，代碼來源:LifetimeServices.SponsorshipTimeout