Newbie Question: Class Writing

[sktanmoy]

I'm trying to write a class to check if internet connection is available. Code is

'Class module
Sub Class_Globals
   
End Sub

'Initializes the object. You can add parameters to this method if needed.
Public Sub Initialize

End Sub

Public Sub Status As Boolean
   Dim P As  Phone
   If (P.GetDataState == "CONNECTED" ) Then
   Return True
   End If
End Sub

But not working while I'm trying to use it.

Dim net As Connection
   If net.Status = True Then
   Msgbox("Connected", "")
   Else
   Msgbox("No Connection", "")
   End If

Please help me to understand the error.

 

[Erel]

You should post the error message from the logs (right click to copy it).

You didn't call net.Initialize.

 

[sktanmoy]

net.Initialize solved the issue.
Thanks.