Attached is a Remote Picture Viewer. It is designed to allow you to post pictures to a remote computer. The Receiver is essentially the Picture Viewer here: https://www.vbforums.com/showthread....3-Image-Viewer
with TCP capabilities. It uses SimpleSock as a module and class module in order to limit the files needed to be installed.
The Sender on the other hand uses my SimplSock Control, simply to demonstrate that the two are essentially the same. To use the module and class module in the Sender program rather than the control, add the two to the program and remove the control. Then uncomment the following 2 lines:
Code:
'Dim WithEvents mSocket As SimpleSock
'Set mSocket = New SimpleSock
Then remove SimpleSockCTL from the Components list and compile or run.
In order for the Sender to connect to a Receiver, the Receiver should have a static IP address or use a registered domain name. For test purposes, "localhost" & "127.0.0.1" have been added to the combo box. They are the same thing, as I believe that "localhost" is included in all default "hosts" files. If you need to use IPv6, the IPvFlg must be set to 6. This goes for both programs. The default is 4.
When the dropdown arrow on the combo box is clicked, it closes any current connection. When an item in the dropdown list is clicked, a connection is attempted to that address. Success or failure is reflected in the bottom status bar after a one second delay. Once connected, the timer interval is changed to 30 seconds. The purpose of this interval is to allow a reconnection if the connection is broken or changed to a different destination.
Once an image is received, clicking on the image causes the window to disappear. It does not appear on the task bar, and if you look for it with the Task Manager, you will find it in with the Background Processes. Because there is no active window in this state, the only way to terminate the program is to use the Task Manager, or send another image to allow the program to be exited normally. If you want the program to start as a background process, change the form "Visible" property to False.
Reply With Quote