Wireless Communication Library Support Forum

Frameworks => Bluetooth Framework => Topic started by: benjamin.martini.r on July 08, 2011, 12:07:16 AM

Title: Bt Chat Server
Post by: benjamin.martini.r on July 08, 2011, 12:07:16 AM

I have this code in the server, but i can't connect with the wclClient.

Dim API                 As wclAPIX
Dim WithEvents Server   As wclServerX

Sub Form1_Load
   Set API = New wclAPIX
   Set Server = New wclServerX
   Set Discovery = New wclBluetoothDiscovery
   API.Load
   Server.Listen
End Sub

Private Sub Server_OnData(ByVal Buffer As Variant)
On Error GoTo ErrHandler
    Text1.Text = Buffer
ErrHandler:
    Exit Sub
End Sub

Title: Re: Bt Chat Server
Post by: Mike Petrichenko on July 08, 2011, 02:16:10 AM

Hello,

You have to specify service's UUID (the same on Client and on Server sides). Please, take a look on Bluetooth Chat demo.

Title: Re: Bt Chat Server
Post by: benjamin.martini.r on July 08, 2011, 02:54:50 PM

Where i can download it?

Title: Re: Bt Chat Server
Post by: Mike Petrichenko on July 08, 2011, 03:49:13 PM

Download what? All the demos are available in WCL installation.