如何设置k60-k64开发板 enet-2lwip 他的tcp服务器的ip地址

1、右键单击“网上邻居”选择“属性”，打开网络连接属性。

2、在右侧的“网络任务”栏中点击“创建一个新的连接。

3、打开新建连接向导，点“下一步”。在

“网络连接属性”选择里，点击“设置高级连接”，点击“下一步”，然后，在接下来的“高级连接选项”中选择“接受传入的连接”。点击“下一步”。勾寻直接并行(LPT1)，点击“下一步”。

4、勾寻允许虚拟专用连接”，点“下一步”。

5、创建一个允许连接的用户权限。点击“添加”按钮，输入双鱼IP转换器账户和密码后点“确定”。点击“下一步”继续。

6、在“网络软件”中勾选需要用到的协议，一般保持默认即可。点击“下一步”后，服务器就搭建完成了。

选择“开始”→“设置”→“控制面板”→“网络连接”→“创建一个新的连接”→“下一步”→“连接到我的工作场所的网络”→“下一步”→“虚拟专用网络连接”，按说明完成后面的 *** 作即可。

在VB中利用UDP协议编写聊天程序　UDP 协议是一种无连接协议，两台计算机之间的数据传输类似于传递邮件：消息从一台计算机发送到另一台计算机，但是两者之间没有明确的连接。 由于UDP 协议不需要显式的连接，就需要在两个Winsock控件中间发送数据，关键需要完成以下的三步： 1．将RemoteHost属性设置为另一台计算机的名称。 2．将RemotePort属性设置为第二个控件的LocalPort属性。 3．调用Bind方法，指定使用的LocalPort。 因为两台计算机的地位可以看成“对等的”，这种应用程序也被称为点对点的应用程序。 下面将创建一个聊天应用程序，两个人可以通过它进行实时的交谈。请按照以下步骤制作： 1．创建一个新的 Standard EXE 工程。将缺省的窗体的名称修改为frmPeerA，将窗体的标题修改为“Peer A”。 2．在窗体中放入一个 Winsock 控件，并将其命名为 udpPeerA。在“属性”页上，单击“协议”并将协议修改为 UDPProtocol。 3．在窗体中添加两个 TextBox 控件。将第一个命名为 txtSend，第二个命名为 txtOutput。 4．为窗体添加如下的代码。 Private Sub Form_Load() ′控件的名字为udpPeerA With udpPeerA ′重点:必须将 RemoteHost 的值修改为对方计算机的名字。 RemoteHost= ″PeerB″ RemotePort = 1001 ′连接的端口号。 Bind 1002 ′绑定到本地的端口。 End With frmPeerB.Show′显示第二个窗体。 End Sub Private Sub txtSend_Change() ′在键入文本时，立即将其发送出去。 udpPeerA.SendData txtSend.Text End Sub Private Sub udpPeerA_DataArrival _ (ByVal bytesTotal As Long) Dim strData As String udpPeerA.GetData strData txtOutput.Text = strData End Sub 要创建第二个 UDP 伙伴，请按照以下步骤执行： 1．在工程中添加一个标准窗体，将窗体的名字修改为 frmPeerB，将窗体的标题修改为“Peer B”。 2．在窗体中放入一个 Winsock 控件，并将其命名为 udpPeerB。 3．在“属性”页上，单击“协议”并将协议修改为“UDPProtocol”。 4．在窗体上添加两个 TextBox 控件。将第一个命名为 txtSend，第二个命名为 txtOutput。 5．在窗体中添加如下代码 Private Sub Form_Load() ′控件的名字为 udpPeerB。 With udpPeerB ′重点:必须将RemoteHost的值改为对方计算机的名字。 RemoteHost= ″PeerA″ RemotePort = 1002 ′要连接的端口。 Bind 1001 ′绑定到本地的端口上。 End With End Sub Private Sub txtSend_Change() ′在键入后立即发送文本。 udpPeerB.SendData txtSend.Text End Sub Private Sub udpPeerB_DataArrival _ (ByVal bytesTotal As Long) Dim strData As String udpPeerB.GetData strData txtOutput.Text = strData End Sub 运行工程，然后在两个窗体的txtSend TextBox中分别键入一些文本。键入的文字将出现在另一个窗体的 txtOutput TextBox中。

---