Help with sockets or winsock

[vagelisr]

Hi to all
I want to connect with a barcode printer and send him some specific characters and take back anything they send to me

In VB6 i have use the winsock and (for me) the things is simple....

Winsock1(totlistsite_w).RemoteHost = ListView1.ListItems(totlistsite_w).SubItems(1)
Winsock1(totlistsite_w).RemotePort = ListView1.ListItems(totlistsite_w).SubItems(2)
Winsock1(totlistsite_w).Connect
Do    
  txtCounter = ""    
  If Return_Status.Enabled = False Then Exit Do    
  If ListView1.ListItems(totlistsite_w).ListSubItems(6) = "" Then Exit Do    
  DoEvents    
    If Winsock1(totlistsite_w).State = 7 Then        
    Winsock1(totlistsite_w).SendData "!V32 1" & vbCrLf        
    txtCounter = ReadString1(Winsock1(totlistsite_w))    
  End If
Loop Until Winsock1(totlistsite_w).State = 7 Or Winsock1(totlistsite_w).State = 9
Winsock1(totlistsite_w).Close

Please could you help me to make something similar with vb.net.
What did you sugest to use sockets or winsock??
An example it will be much acceptable!!!

Thanks and regards.

[jmcilhinney]

Use the System.Net.Sockets.Socket class from the .NET Framework. Lots of examples around if you care to search. You may even be able to get away with using a TcpClient, which is simpler.

[vagelisr]

jmcilhinney thanks for your time.
I was wondering if you are able to write a simple example with a socket connection using an ip address and port and how i can send and receive data thru socket.
Believe me i have read some examples but all of them is for Server and client and confuse me more…….

Thanks again for your time and hope to help me again with 5 or 10 lines of code.

[vagelisr]

.....

[MonkOFox]

On the server side:

Dim listener as new TCPListener(IPAddress.Parse("111.111.111.111"),1000)
listener.start()
 
Dim client as TCPClient = listener.AcceptTCPClient()
 
Console.WriteLine("Client Connected!")
 
Console.ReadLine()

On the client side:

Dim client as TCPClient
 
client.connect(IPAddress.Parse("111.111.111.111"),1000)
 
if client.connected then
 
    Messagebox.show("client connected successfully!")
 
end if

That's as simple as it gets : ).

Justin

[vagelisr]

Thanks a lot MonkOFox for your time and for your code BUT.....
In my case i dont have client-server. See my first post with code from VB6
I only want to sent in printer some characters (in my case "!V32 1") and after this to receive his answer....

Please give me an example for my case!!!!!!!!!!!!!!!!!!!!!!!!!

Thanks and regards

[MonkOFox]

Oh sorry about that... Well just do what J said and use the new sub of the Socket class.

I don't know what addressfamily, sockettype or protocoltype you'd use, but I'm sure you can figure that out.

Then you can call the Socket.Connect(host as string, port as integer) to connect it.

There are send and receive subs too.

'buffer containing data to be sent over the socket.
Dim buffer As Byte() = System.Text.ASCIIEncoding.ASCII.GetBytes("!V32 1" & vbCrLf)
 
'send the data over the socket to the defined EndPoint. (host,port)
soc.send(buffer,buffer.Length,0)
 
'define byte() to hold received contents.
Dim RBytes(256) as Byte
 
'receive data into a byte()
soc.Receive(RBytes,RBytes.Length,0)
 
'the message received if anything is sent back.  Converted from Byte() to string for use.
Dim receiveStr as string = System.Text.ASCIIEncoding.ASCII.GetString(RBytes)

Justin

[vagelisr]

Thank you very much MonkOFox.
I'm sorry for delaying my answer.
Tomorrow I will try your last post.

I don't know what addressfamily, sockettype or protocoltype you'd use, but I'm sure you can figure that out.
For the connection to winsock i use 192.168.1.61 (IP Address) and 23 (port)


One last question.
How I will make the connect with the socket??
Is the connection for client or for server or none of them??
If none how I will make the connection???

I wish some day to help you as much as you help me now.

[MonkOFox]

If you're trying to connect to a printer and send it messages, once you connect via socket it should be listening for messages and send something back if you send a valid message.

That being said, I've never used socket to connect to a device before. I've used the twain API for a scanner once...

Good luck,

Justin