Property Setting Problem 1

[PoppapumpJ]

Hey, I have a property that I want to store the network IP address in. I Would like to pass in the client's IP addres and truncate off the last ".XXX"

I put some formatting statements into the set area of the property but it keeps setting and returning the value passed in instead of my formatted value

it looks like this:

private mvarIPAddress as string

Public Property IpAddress() As String
Get
IpAddress = mvarIPAddress
End Get
Set(ByVal Value As String)
'Truncate Local IP to Network IP
Dim intLastDot As Integer
Dim intAmountToKeep As Integer
intLastDot = InStr(Value, ".&quot
intAmountToKeep += intLastDot
intLastDot = InStr(Right(Value, Len(Value) - intLastDot), ".&quot
intAmountToKeep += intLastDot
intLastDot = InStr(Right(Value, Len(Value) - intLastDot), ".&quot
intAmountToKeep += intLastDot
mvarIPAddress = Left(Value, intAmountToKeep + 1)
End Set
End Property

 

[Zarcom]

Try this it worked for me.

mvarIPAddress = Value.Remove(Value.LastIndexOf(".&quot, (Value.Length - Value.LastIndexOf(".&quot)) That'l do donkey, that'l do
Mark
If you are unsure of forum etiquette check here faq796-2540

 

[PoppapumpJ]

Thanks, That worked perfectly!

.NET has all kinds of cool stuff like this that make things so much easier.

 

[Zarcom]

no problem. Yes .NET does have alot of cool stuff you just have to find it which can turn out to be a challenge sometimes.

Thx for the start J That'l do donkey, that'l do
Mark
If you are unsure of forum etiquette check here faq796-2540