flexsim 如何使用server命令建立服务器

如何使用server命令建立服务器
4 b: h1 Q5 R, c. U( _
代码如下，可是连接不上

1. /**Custom Code*/
   + ~( I. `5 h5 s  N  m
2. treenode current = ownerobject(c);
   
3. 
   
4. senddelayedmessage(current,0.5,NULL);
   2 @' E2 ]# J, \
5. //SERVER:初始化
   
6. if(getlabelnum(current,"startserver"))
   " M8 K) T' i) V3 n: |0 }
7. {
   # B& Y# C' }; u
8.         setlabelnum(current,"startserver",0);
   
9.        
   # i4 u" e9 P. B) Y  p0 O" I8 S% i
10.         if(getlabelnum(current,"socknum"))              //防止重复起server
    ; `# C% l$ S: `  F' w
11.                 return 0;
    
12.        
    ; n% F3 a7 n3 Y  r  B
13.         int m=getlabelnum(current,"serverport");
    2 [6 F7 S1 \4 l+ _5 H. |
14.      servercreatemain(m);
    
15.      
    / Y. z/ X2 [% |4 j6 w6 J
16.      setlabelnum(current,"servernum",1);            //初始化成功后将值存入servernum
    
17.      pt("server()成功！");pr();
    0 c6 _4 ]* z' i( M. p
18. }
    % x' @4 B8 t' N' [) H, @. o) l2 v. L
19. 
    
20. 
    
21. if(getlabelnum(current,"startserver"))
    6 O3 F* O& e8 q! k
22. {
    , \& f. C3 n3 O) k# W, f$ U8 ?4 g
23. 
    
24.     int client = serveraccept(0);
    
25. }
    
26. 
    
27. //关闭连接
    
28. int client = serveraccept(0);        
    
29. if(getlabelnum(current,"servercloseconnection"))
    ( R- L7 q# r4 w; N& I1 P$ f
30. {
    
31.         setlabelnum(current,"servercloseconnection",0);
    0 C: z4 Z, f; X9 L' S
32.        
      u. }1 k' F! y9 Q8 K. P: O
33.         if(!getlabelnum(current,"servernum"))             //未启用server,则退出
    
34.                 return 0;
    $ o% A1 C$ R1 U) o# T' ~
35.                
    , D& f) j* c7 Z0 y4 w/ M! T  q
36.      servercloseconnection(client);
    2 \. |. e- z# M+ i1 i
37.    
    
38.      pt("servercloseconnection()成功！");pr();   
    
39. 
    
40. }
    * l; T; K+ |! F5 b
41. 
    
42. //关闭SERVER
    4 J) q5 i5 w) ^  p1 q  }
43. 
    
44. if(getlabelnum(current,"serverclosemain"))
    ' @% v) q+ k; ?3 m3 k9 Z
45. {
    
46.         setlabelnum(current,"serverclosemain",0);
    $ `8 B; O: S7 H% S/ o5 k  ]
47.        
    
48.         if(!getlabelnum(current,"servernum"))             //未启用server,则退出
    
49.                 return 0;
    
50.                
    
51.      serverclosemain();
      x- j+ A* g  m7 T
52.      setlabelnum(current,"servernum",0);
    ; Q. I  J! G/ B% B  X( b
53.      pt("serverclosemain()成功！");pr();   
    
54. }
    
55. 
    
56. 
    
57. //接受信息
    
58. if(getlabelnum(current,"servernum"))                  //如果起了server服务(servernum标签非零)
    0 N6 J) e6 \* V3 T0 G0 W
59. {
    : v7 [. }9 l$ y. L. p
60.         int servernum = getlabelnum(current,"servernum");
    + M* R+ W% B  F
61.        
    
62.         string buffer = "";
    
63.        
    $ ^5 a- j9 ^" ?# G! Z# U
64.         buffer = clientreceive(servernum, NULL, 1024, 1);
    
65.        
      I" M, Z+ a: e6 V# y* i8 Q
66.         if(stringlen(buffer))
    & M0 ~7 X4 Y- d( b' W
67.                 setlabelstr(current,"serverreceive",buffer);
    4 v- k& q+ t; }$ d8 x8 ~0 T0 J
68. 
    # W2 O$ Z- y5 o: x
69. }
    & n4 a. i+ l! ^0 t6 N
70. //发送信息
    ) {9 C- Y* e% M1 H
71. 
    
72. 
    
73. if(getlabelnum(current,"servernum"))                     //如果起了SERVER服务(servernum标签非零)
    
74. {
    0 V& M) w* X/ e; a
75.         string buffer = getlabelstr(current,"serversend");
    
76.        
    / h9 X# T# B% e/ ]- u* x- }! v" y! v
77.         if(stringlen(buffer))
    
78.         {
    * r% N/ Y& F  w1 A' Q" `+ L) f
79.                 int servernum = getlabelnum(current,"servernum");
    
80.                
    6 S! n. C  V4 A9 n
81.                 serversend(servernum,buffer);
    
82.                 setlabelstr(current,"send","");
    
83.                
    / Q; H/ R' K. `( _5 p, o) k
84.                 pt("serversend()成功！");pr();
    5 g% v4 O' K+ ^. [# Y
85.         }
    
86. }

复制代码

求教

您的目标是什么呢？这个是FlexSim的模型之间用socket链接的功能。
1 H& }* O* v$ j/ [) y连接不上的话有什么报错么？

3# 慧娴亚伦
& I0 {5 I* G, d. I( Y: j, c陈老师，您好

' W- A/ N1 l  V8 Y$ h4 [- ?再将startserver标签设为1后，output console提示启动成功，可是tcp调试工具却无法连接FLEXSIM,好困扰！

我将文件重新修改了一下，如附件。

模型目标是能够利用flexsim建立服务器，并能通过tcp工具与外部通信

您能上传或者介绍一下您使用的tcp调试工具么？另外请尝试使用高版本软件，最好使用最新的2016版本。

6# 慧娴亚伦
8 A! b5 x6 V" T
老师，楼上附件里有调试工具，另外我找到原因了：在启动服务器时要将socket初始化。

附件为经测试成功的文件

lllflflf

谢谢分享