WSASendTo函数调用出错 - 精易论坛

子程序名	返回值类型	公开	备注
New_WSASendto	整数型
参数名	类型	参考	可空	数组	备注
s	整数型
lpBuffers	整数型
dwBufferCount	整数型
lpNumberOfBytesSent	整数型
dwFlags	整数型
lpTo	整数型
iTolen	整数型
lpOverlapped	整数型
lpCompletionRoutine	整数型

变量名	类型	静态	数组	备注
IPaddr	文本型
Port	短整数型
data	字节集
len	整数型

如果真 (iTolen ＝ 16)

Getaddr (lpTo, IPaddr, Port)

data ＝ GetWasBuff (lpBuffers)

写到文件 (“f:\zz.log”, 到字节集 (字节集转文本 (data)))

如果真 (IPaddr ≠ “127.0.0.1”)

Setaddr (lpTo, “127.0.0.1”, 1234)

Getaddr (lpTo, IPaddr, Port)

len ＝ Call (WSASendto_Original, s, lpBuffers, dwBufferCount, lpNumberOfBytesSent, dwFlags, lpTo, iTolen, lpOverlapped, lpCompletionRoutine, , , , , , )

如果真 (len ≠ 0)

写到文件 (“f:\err.log”, 到字节集 (IPaddr ＋ “:” ＋到文本 (取字节集数据 (到字节集 (Port), #整数型, ))))

写到文件 (“f:\a.log”, 到字节集 (到文本 (len)))
返回 (len)

子程序名	返回值类型	公开	备注
New_WSASendto	整数型
参数名	类型	参考	可空	数组	备注
s	整数型
lpBuffers	整数型
dwBufferCount	整数型
lpNumberOfBytesSent	整数型
dwFlags	整数型
lpTo	整数型
iTolen	整数型
lpOverlapped	整数型
lpCompletionRoutine	整数型

变量名	类型	静态	数组	备注
IPaddr	文本型
Port	短整数型
data	字节集
数据地址	字节集
len	整数型

如果真 (iTolen ＝ 16)

Getaddr (lpTo, IPaddr, Port)

data ＝ GetWasBuff (lpBuffers)

数据地址＝到字节集 (取字节集长度 (data)) ＋到字节集 (取变量数据地址 (data))

data ＝ GetWasBuff (取变量数据地址 (数据地址))

len ＝ Call (WSASendto_Original, s, 取变量数据地址 (数据地址), dwBufferCount, lpNumberOfBytesSent, dwFlags, lpTo, iTolen, lpOverlapped, lpCompletionRoutine, , , , , , )

返回 (len)
len ＝ Call (WSASendto_Original, s, lpBuffers, dwBufferCount, lpNumberOfBytesSent, dwFlags, lpTo, iTolen, lpOverlapped, lpCompletionRoutine, , , , , , )
返回 (len)

i支持库列表	支持库注释
spec	特殊功能支持库

子程序名	返回值类型	公开	备注
GetWasBuff	字节集
参数名	类型	参考	可空	数组	备注
lpBuffers	整数型

变量名	类型	静态	数组	备注
len	整数型
内存地址	整数型

len ＝取字节集数据 (指针到字节集 (lpBuffers, 4), #整数型, )
内存地址＝取字节集数据 (指针到字节集 (lpBuffers ＋ 4, 4), #整数型, )
返回 (指针到字节集 (内存地址, len))