觅风论坛

标题: 易语言与C#互相通信源码-实现易语言和C#的相关操作源码 [打印本页]

作者: 730422343    时间: 2024-9-25 08:53
标题: 易语言与C#互相通信源码-实现易语言和C#的相关操作源码
  1. .版本 2
  2. .支持库 sock

  3. .程序集 窗口程序集_启动窗口
  4. .程序集变量 server, 网络服务器
  5. .程序集变量 client, 客户
  6. .程序集变量 客户Duan句柄, 整数型
  7. .程序集变量 接收数据, 文本型
  8. .程序集变量 发送数据, 文本型

  9. .子程序 _启动监听按钮_被单击

  10. .如果 (server.启动 (到数值 (端口号编辑框.内容)) = 真)
  11.     接收消息编辑框.加入文本 (“服务器启动成功,端口号:” + 端口号编辑框.内容 + #换行符)
  12.     客户Duan句柄 = server.监听 (5000)
  13.     .如果 (客户Duan句柄 ≠ -1)
  14.         接收消息编辑框.加入文本 (“客户进入,客户句柄:” + 到文本 (客户Duan句柄) + #换行符)
  15.         时钟1.时钟周期 = 1000
  16.     .否则
  17.         接收消息编辑框.加入文本 (“客户连接超时,服务器已关闭” + #换行符)
  18.         server.停止 ()
  19.     .如果结束

  20. .否则
  21.     接收消息编辑框.加入文本 (“服务器启动失败” + #换行符)
  22. .如果结束


  23. .子程序 _发送按钮_被单击

  24. .如果 (server.发送 (客户Duan句柄, 发送内容编辑框.内容, 500) = 真)
  25.     接收消息编辑框.加入文本 (“服务器发送:” + 发送内容编辑框.内容 + #换行符)
  26. .否则
  27.     接收消息编辑框.加入文本 (“服务器发送消息失败” + #换行符)
  28. .如果结束


  29. .子程序 _时钟1_周期事件
  30. .局部变量 消息数据, 文本型

  31. 消息数据 = 到文本 (server.接收 (客户Duan句柄, 500, ))
  32. .如果真 (消息数据 ≠ “”)
  33.     接收消息编辑框.加入文本 (到文本 (取现行时间 ()) + “收到客户Duan消息” + 消息数据 + #换行符)
  34. .如果真结束


  35. .子程序 _关闭服务器按钮_被单击

  36. .如果 (server.停止 () = 真)
  37.     时钟1.时钟周期 = 0
  38.     接收消息编辑框.加入文本 (“服务器已关闭” + #换行符)
  39. .否则
  40.     接收消息编辑框.加入文本 (“服务器关闭失败” + #换行符)
  41. .如果结束
复制代码




  1. using System;
  2. using System.Net;
  3. using System.Net.Sockets;
  4. using System.Text;
  5. class Program
  6. {
  7.     static void Main()
  8.     {
  9.         // 定义服务器的 IP 地址,这里使用本地回环地址,通常用于在同一台机器上进行测试
  10.         string serverIP = "127.0.0.1";
  11.         // 定义服务器监听的端口号
  12.         int serverPort = 8888;
  13.         // 使用 using 语句确保在代码执行完毕后正确释放 TcpClient 资源
  14.         using (TcpClient client = new TcpClient())
  15.         {
  16.             // 尝试与指定的服务器 IP 地址和端口建立连接
  17.             client.Connect(serverIP, serverPort);
  18.             // 获取与服务器连接的网络流,通过这个流可以进行数据的发送和接收
  19.             NetworkStream stream = client.GetStream();
  20.             // 创建一个大小为 1024 的字节数组,用于接收服务器返回的数据
  21.             byte[] buffer = new byte[1024];
  22.             // 进入无限循环,持续接收服务器消息
  23.             while (true)
  24.             {
  25.                 // 从网络流中读取数据到缓冲区,并获取实际读取到的字节数量
  26.                 int bytesRead = stream.Read(buffer, 0, buffer.Length);
  27.                 // 将接收到的字节数组转换为字符串,同样使用 ASCII 编码方式,然后输出接收到的服务器响应内容
  28.                 string receivedData = Encoding.ASCII.GetString(buffer, 0, bytesRead);
  29.                 Console.WriteLine("接收到服务端响应:" + receivedData);
  30.                 // 如果接收到的内容是 "exit",则退出循环
  31.                 if (receivedData == "exit")
  32.                     break;
  33.                 // 定义要发送给服务器的消息文本内容
  34.                 string messageToSend = "C#客户Duan发送的数据";
  35.                 // 将消息文本转换为字节数组,这里使用 ASCII 编码方式进行转换
  36.                 byte[] dataToSend = Encoding.ASCII.GetBytes(messageToSend);
  37.                 // 将字节数组写入网络流,从而将数据发送给服务器
  38.                 stream.Write(dataToSend, 0, dataToSend.Length);
  39.             }
  40.             // 关闭客户Duan连接,释放相关资源
  41.             client.Close();
  42.         }
  43.     }
  44. }
复制代码



作者: qq1423845446    时间: 2024-9-25 15:22
好好好好的我要下载看看看
作者: 1791703110    时间: 2024-9-25 21:52
看看,到底好不好,想学学看看
作者: 柠檬    时间: 2024-9-26 04:21
这就是传说中的好资源吗?赶紧看看去!
作者: 海绵老爹    时间: 2024-9-26 10:50
不错不错 支持下
作者: 小白    时间: 2024-9-26 17:19
很不错的哦,支持,加油
作者: vyreazda    时间: 2024-9-26 20:02
tx.jpg

作者: 凌空    时间: 2024-9-26 20:31
我要下载试试,我要下载试试...
作者: pei002    时间: 2024-9-26 20:55
9999999999999999
作者: q12138    时间: 2024-9-26 21:19
谢谢分享!~
作者: 物语    时间: 2024-9-26 21:43
学习了!!!!
作者: 物语    时间: 2024-9-26 22:07
这个不错,谢谢共享
作者: pei002    时间: 2024-9-27 06:46
我知道错了,感谢大神分享
作者: pei002    时间: 2024-9-27 15:25
厉害,我挺你,嘻嘻嘻。
作者: hgfhf    时间: 2024-9-28 00:04
谢谢分享好人有好报6666666
作者: dsdasf    时间: 2024-9-28 08:43
阿斯蒂芬撒反对
作者: a32d321as    时间: 2024-9-28 17:22
支持!!!!前排!!!!
作者: lmx0618    时间: 2024-9-28 18:45
感谢感谢分享
作者: zdf517593902    时间: 2024-9-28 20:08
谢谢分享好人有好报6666666
作者: sxy19931021    时间: 2024-9-28 21:31
提示: 作者被禁止或删除 内容自动屏蔽
作者: 企鹅6655    时间: 2024-9-28 22:54
看看,到底好不好,想学学看看
作者: 企鹅6655    时间: 2024-9-29 00:17
很不错的哦,支持,加油
作者: q12138    时间: 2024-9-29 05:02
这个资源我一直想要
作者: 1150531613    时间: 2024-9-29 09:46
人设人阿松大
作者: 微风    时间: 2024-9-29 14:31
想学唉,可惜现在的我啥都不会
作者: li123    时间: 2024-9-29 19:16
看看看看看看看看看看看看
作者: 微风    时间: 2024-9-30 00:00
谢谢分享!~
作者: 360403967    时间: 2024-9-30 02:45
666666666666666666666666
作者: 骑着蚂蚁兜风    时间: 2024-9-30 05:30
感谢这个i资源
作者: zf123456    时间: 2024-9-30 08:14
我今天才找到这个论坛,非常高兴,加入到觅风老师的论坛
作者: 骑着蚂蚁兜风    时间: 2024-9-30 10:59
谢谢楼主的辛苦分享
作者: 无聊玩玩    时间: 2024-9-30 13:43
学习了,这就去试试
作者: 无名使者    时间: 2024-9-30 13:56
9999999999999999
作者: 216341564213    时间: 2024-9-30 14:09
的法国风格化规范化
作者: yu2353173832    时间: 2024-9-30 14:22
学习了!!!!
作者: 磊磊    时间: 2024-9-30 14:34
碉堡了!
作者: 大米    时间: 2024-9-30 14:47
赞一个!
作者: 无敌少爷    时间: 2024-9-30 15:07
感谢分享LOL
作者: lllll557    时间: 2024-9-30 15:27
阿斯蒂芬撒反对
作者: lllll557    时间: 2024-9-30 15:47
谢谢楼主的辛苦分享
作者: jhasgvcah    时间: 2024-9-30 16:07
支持你们一下下哈
作者: 86992894    时间: 2024-9-30 16:27
这个不错,谢谢共享
作者: 天汇    时间: 2024-10-1 06:15
我要下载试试,我要下载试试...
作者: 天汇    时间: 2024-10-1 20:04
学习了!!!!
作者: 大蒜先生    时间: 2024-10-2 09:52
不错!顶LZ
作者: 4414513216511    时间: 2024-10-2 23:40
顶起  很好的帖
作者: 1377687493qq    时间: 2024-10-3 13:28
很不错的哦,支持,加油
作者: 张庆伟23    时间: 2024-10-3 14:09
厉害,我挺你,嘻嘻嘻。
作者: 6360120    时间: 2024-10-3 14:49
不错不错 支持下
作者: 霸王喝粥    时间: 2024-10-3 15:30
期待中......
作者: 无敌少爷    时间: 2024-10-3 16:11
碉堡了!
作者: 尘封    时间: 2024-10-3 16:51
赞一个!




欢迎光临 觅风论坛 (https://www.eyyba.com/) Powered by Discuz! X3.4