设为首页收藏本站Access中国

Office中国论坛/Access中国论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

12
返回列表 发新帖
楼主: wjb5645
打印 上一主题 下一主题

[Access本身] 用WINSOCK控件的源码来做网络通信的问题?

[复制链接]
11#
发表于 2008-4-11 10:11:53 | 只看该作者
Public Const GWL_HINSTANCE = (-6)

        Dim hInst As Long
         hInst = api_GetWindowLong(Forms!客户端_API.hwnd, GWL_HINSTANCE)

m_lngWindowHandle = api_CreateWindowEx(0&, "STATIC", "SOCKET_WINDOW", 0&, 0&, 0&, 0&, 0&, 0&, 0&, hInst, ByVal 0&)

这样照说应该能够通过,调试窗口出现连接到主机成功的字样,但程序还是被迫退出了。
12#
 楼主| 发表于 2008-4-11 10:55:41 | 只看该作者
是不是: Debug.Assert i 这句是关键呢?

我只把它加 '   当注释来跳过, app.处改改,结果就是和你测的一样
13#
发表于 2008-4-11 14:16:42 | 只看该作者
[:39]
14#
发表于 2008-4-12 10:30:24 | 只看该作者
Debug.Assert  i
这句只是用于调试时使用的,一般对程序的执行是没有影响的,一般遇到这句需选择继续运行就行了。
15#
 楼主| 发表于 2008-4-12 10:30:41 | 只看该作者
顶上,求助
16#
发表于 2008-4-17 10:20:25 | 只看该作者
最近在用它开发邮件收发系统,收集了一些关于winsock的资料
17#
发表于 2016-1-6 13:11:02 | 只看该作者
xiexi
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则

QQ|站长邮箱|小黑屋|手机版|Office中国/Access中国 ( 粤ICP备10043721号-1 )  

GMT+8, 2024-5-13 14:44 , Processed in 0.085663 second(s), 29 queries .

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

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