Android Question Use a socket in 2 activities

' 
Main Activity ''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
Sub Process_Globals
    Public CltSock As Socket
    Public Astreams As AsyncStreams
    Public cemp_ip As String = "192.168.4.1"
    Public cemp_port As Int = 1336
End Sub   

Sub Activity_Create(FirstTime As Boolean)
    ....
    CltSock.Initialize("Client")
    CltSock.Connect(cemp_ip,cemp_port,2000)
    .....
End Sub       

Sub Client_Connected(ConStatus As Boolean)
    cemp_connected=ConStatus   
    Log ("connected main: " & cemp_connected)
End Sub
    
'Activity 1''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''   
Sub Process_Globals
    Public Astreams As AsyncStreams
    ............   
End Sub

Sub Activity_Create(FirstTime As Boolean)
    If FirstTime And Main.cemp_connected  Then   
        Astreams.Initialize (Main.CltSock.InputStream,  Main.CltSock.OutputStream, "AStreams")
    End If
End sub

Sub DoSomeThing ()
    Astreams.Write(buffer_cmd)
End sub
    
Sub AStreams_NewData (Buffer() As Byte)       
    .......
End sub   

'Activity 2''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''   
Sub Process_Globals
    Public Astreams As AsyncStreams
    ............   
End Sub

Sub Activity_Create(FirstTime As Boolean)
    If FirstTime And Main.cemp_connected  Then   
        Astreams.Initialize (Main.CltSock.InputStream,  Main.CltSock.OutputStream, "AStreams")
    End If
End sub

Sub DoSomeThing ()
    Astreams.Write(buffer_cmd)
End sub
    
Sub AStreams_NewData (Buffer() As Byte)       
    .......
End sub