按你设置没有出错,但设置的0h00200000值，设置不上，
DECLARE LONG  setsockopt IN "Ws2_32" long s ,long level,long optname ,string @optval ,long optlen
DECLARE LONG  getsockopt IN "Ws2_32" long s ,long level,long optname ,string @optval ,long @optlen
optval= 0h00200000 &&0h00200000
optlen=LEN(optval)
?setsockopt(this.obJECT.SocketHandle,SOL_SOCKET,SO_RCVBUF,@optval,optlen)

optval= REPLICATE(0h00,4)
optlen=LEN(optval)
?getsockopt(this.obJECT.SocketHandle,SOL_SOCKET,SO_RCVBUF,@optval,@optlen),optval


返回结果
0
0 0h00000000

        *!* #define SOL_SOCKET 0xffff
        *!* #define SO_RCVBUF 0x1002
        *!* DECLARE LONG setsockopt IN "Ws2_32" long,long,long,string,long
        *!* DECLARE LONG getsockopt IN "Ws2_32" long,long,long,string @,long @
        m.optvalSet = BINTOC(4096,"4RS")
        m.optvalGet = REPLICATE(0h00,4)
        m.optvalLen=4
        IF setsockopt(m.hSocket,SOL_SOCKET,SO_RCVBUF,m.optvalSet,m.optvalLen)<>-1  
            IF getsockopt(m.hSocket,SOL_SOCKET,SO_RCVBUF,@m.optvalGet,@m.optvalLen)<>-1
               MESSAGEBOX(CTOBIN(m.optvalGet,"4rs"))
            ENDIF
        ENDIF  
        实际上getsockopt倒数第2个参数可以不用string @,换成long @即可， 这样replica(0h00,4), 直接用 0  

        *!* #define SOL_SOCKET 0xffff
        *!* #define SO_RCVBUF 0x1002
        *!* DECLARE LONG setsockopt IN "Ws2_32" long,long,long,string,long
        *!* DECLARE LONG getsockopt IN "Ws2_32" long,long,long,long @,long @
        m.optvalSet = BINTOC(4096,"4RS")
        m.optvalGet = 0
        m.optvalLen=4
        IF setsockopt(m.hSocket,SOL_SOCKET,SO_RCVBUF,m.optvalSet,m.optvalLen)<>-1  
            IF getsockopt(m.hSocket,SOL_SOCKET,SO_RCVBUF,@m.optvalGet,@m.optvalLen)<>-1
               MESSAGEBOX(m.optvalGet)
            ENDIF
        ENDIF  

[此贴子已经被作者于2023-9-6 11:40编辑过]

UDP协议，这个能这样设置吗？