I saw that Mike had mentioned how to indent code that gets posted. He said you insert , and the forum will do the indention for you. I thought I'd give that a try.<br>
<br>
Public Property Get USER() As String<br>
USER = m_USER<br>
End Property<br>
Public Property Let USER(ByVal New_User As String)<br>
<br>
m_USER = New_User<br>
PropertyChanged "User"<br>
<br>
#If dodebug = 1 Then<br>
MsgBox "User is now:" & m_USER<br>
#End If<br>
<br>
If Not (m_IP Is Nothing) Then<br>
Call Fetch<br>
End If<br>
End Property<br>
<br>
End of test.<br>
<br>
Chip H.<br>
<br>
Public Property Get USER() As String<br>
USER = m_USER<br>
End Property<br>
Public Property Let USER(ByVal New_User As String)<br>
<br>
m_USER = New_User<br>
PropertyChanged "User"<br>
<br>
#If dodebug = 1 Then<br>
MsgBox "User is now:" & m_USER<br>
#End If<br>
<br>
If Not (m_IP Is Nothing) Then<br>
Call Fetch<br>
End If<br>
End Property<br>
<br>
End of test.<br>
<br>
Chip H.<br>