关于Connect失败求助
时间:2011-08-10
来源:互联网
Socket通讯了解的少,这两天在学写客户端的通讯,写了个小工具测试,代码如下:
FSockAccept.sin_family := AF_INET;
FSockAccept.sin_port := htons(StrToInt(edtIPPort.Text));
FSockAccept.sin_addr.S_addr := inet_addr(PChar(edtIPAddr.Text));
if WSAStartUp(2, TempWSAData) = 1 then
begin
mm.Lines.Add('WSAStartUp 失败!');
Exit;
end;
AcceptSock := Socket(PF_INET, SOCK_STREAM, 0)
if AcceptSock = SOCKET_ERROR then
begin
mm.Lines.Add('Socket创建失败!');
Exit;
end;
if Connect(AcceptSock, FSockAccept, sizeof(FSockAccept)) <> 0 then
begin
mm.Lines.Add('Connect失败!');
CloseSocket(AcceptSock);
WSACleanup;
mm.Lines.Add('Socket关闭!');
Exit;
end;
WSAAsyncSelect(AcceptSock, Application.Handle, WM_MYSOCK, FD_READ or FD_CLOSE);
路由这边也设置好了,但是这个连接结果是Connect失败,请问主要原因有哪些可能?
FSockAccept.sin_family := AF_INET;
FSockAccept.sin_port := htons(StrToInt(edtIPPort.Text));
FSockAccept.sin_addr.S_addr := inet_addr(PChar(edtIPAddr.Text));
if WSAStartUp(2, TempWSAData) = 1 then
begin
mm.Lines.Add('WSAStartUp 失败!');
Exit;
end;
AcceptSock := Socket(PF_INET, SOCK_STREAM, 0)
if AcceptSock = SOCKET_ERROR then
begin
mm.Lines.Add('Socket创建失败!');
Exit;
end;
if Connect(AcceptSock, FSockAccept, sizeof(FSockAccept)) <> 0 then
begin
mm.Lines.Add('Connect失败!');
CloseSocket(AcceptSock);
WSACleanup;
mm.Lines.Add('Socket关闭!');
Exit;
end;
WSAAsyncSelect(AcceptSock, Application.Handle, WM_MYSOCK, FD_READ or FD_CLOSE);
路由这边也设置好了,但是这个连接结果是Connect失败,请问主要原因有哪些可能?
作者: icegirl914 发布时间: 2011-08-10
该回复于2011-08-11 09:07:24被管理员删除
- 对我有用[0]
- 丢个板砖[0]
- 引用
- 举报
- 管理
- TOP
|
#2楼 得分:0回复于:2011-08-11 08:41:19
|
作者: kleinregen 发布时间: 2011-08-11
相关阅读 更多
热门阅读
-
office 2019专业增强版最新2021版激活秘钥/序列号/激活码推荐 附激活工具
阅读:74
-
如何安装mysql8.0
阅读:31
-
Word快速设置标题样式步骤详解
阅读:28
-
20+道必知必会的Vue面试题(附答案解析)
阅读:37
-
HTML如何制作表单
阅读:22
-
百词斩可以改天数吗?当然可以,4个步骤轻松修改天数!
阅读:31
-
ET文件格式和XLS格式文件之间如何转化?
阅读:24
-
react和vue的区别及优缺点是什么
阅读:121
-
支付宝人脸识别如何关闭?
阅读:21
-
腾讯微云怎么修改照片或视频备份路径?
阅读:28