Fortran Coder

楼主: YHWHIT
打印 上一主题 下一主题

[绘图界面库] fortran语言实现socket通信/winsock

[复制链接]

737

帖子

4

主题

0

精华

大师

农村外出务工人员

F 币
704 元
贡献
361 点

新人勋章爱心勋章水王勋章元老勋章热心勋章

11#
发表于 2015-8-11 12:58:38 | 只看该作者
我觉得最好不要用字符串发送。都是数据,用二进制多好。
干嘛要转换成字符串,然后接收以后再转换回来呢?多此一举不是。

对于后面有二进制的数据,你可以直接用 fortran read 。
也可以控制 matlab,发送完字符串以后,接着发送一系列的 \0 或空格。都可以

12

帖子

2

主题

0

精华

入门

F 币
78 元
贡献
29 点
12#
 楼主| 发表于 2015-8-11 19:49:56 | 只看该作者
楚香饭 发表于 2015-8-11 12:58
我觉得最好不要用字符串发送。都是数据,用二进制多好。
干嘛要转换成字符串,然后接收以后再转换回来呢? ...

嗯哪  谢谢
对二进制不太了解,我先用字符串做做。

12

帖子

2

主题

0

精华

入门

F 币
78 元
贡献
29 点
13#
 楼主| 发表于 2015-8-13 17:07:03 | 只看该作者
楚香饭 发表于 2015-8-11 12:58
我觉得最好不要用字符串发送。都是数据,用二进制多好。
干嘛要转换成字符串,然后接收以后再转换回来呢? ...

代码如下:
        ! 接收数据
      ireceivelen=recv(isender,ClientServerMessage%buffer,500,0)
         if(ireceivelen<0)then
          write(*,*)"连接失败"
          stop
         else
             dpred=ClientServerMessage%buffer
             write(*,*)"sever say:"
             write(*,*) dpred
             write(*,*) ClientServerMessage%buffer
         end if
      
      
      ! 发送数据
      write(*,*)"please enter message:"
      ClientServerMessage%bufferout=rfoutput
      isendlen=send(isender,ClientServerMessage%bufferout,500,0)
      write(*,*) ClientServerMessage%bufferout
      if(isendlen<0)then
          write(*,*)"连接失败"
      end if为什么先发送数据,后接收不好使?先发送那面收不到
如果改为先接收(后面不变),再发送,再接收却又好使,那面也能收到。

2033

帖子

12

主题

5

精华

论坛跑堂

臭石头雪球

F 币
1641 元
贡献
709 点

美女勋章热心勋章星光勋章新人勋章贡献勋章管理勋章帅哥勋章爱心勋章规矩勋章元老勋章水王勋章

14#
发表于 2015-8-13 17:18:42 | 只看该作者
winsock 的发送接收,有 TCP 和 UPD 两种。
其中 UDP 是没有反馈信息的,发送方只管发送,不知道接收方是否接收到。
而这又分为阻塞和非阻塞两种。
如果你使用的是非阻塞方式,那可能需要循环一段时间,来判断是否接收到。
即:
发送方发送后,循环等待回应。
接收方循环接收,直到收到,发送回应。

如果你需要一边发送,一边接收(而且两者还有关联)。那么 TCP 其实更适合你。

12

帖子

2

主题

0

精华

入门

F 币
78 元
贡献
29 点
15#
 楼主| 发表于 2015-8-14 09:15:05 | 只看该作者
fcode 发表于 2015-8-13 17:18
winsock 的发送接收,有 TCP 和 UPD 两种。
其中 UDP 是没有反馈信息的,发送方只管发送,不知道接收方是否 ...

嗯那,我用的就是tcp
只是同样的代码,如果我先发送,再接收,不成功
如果把发送代码复制在前,接收,然后再发送,却是成功了。
您需要登录后才可以回帖 登录 | 极速注册

本版积分规则

捐赠本站|Archiver|关于我们 About Us|小黑屋|Fcode ( 京ICP备18005632-2号 )

GMT+8, 2024-12-24 22:16

Powered by Tencent X3.4

© 2013-2024 Tencent

快速回复 返回顶部 返回列表