Office中国论坛/Access中国论坛

标题: 用WINSOCK控件的源码来做网络通信的问题? [打印本页]

作者: wjb5645    时间: 2008-4-9 15:30
标题: 用WINSOCK控件的源码来做网络通信的问题?
在ACCESS中用winsock控件是没问题的,该控件的源码在用vb6中也没问题.
把控件的源码用在ACCESS中,modSocketMaster模块出现两处问题:
1.App.hInstance处无法编译
2. Debug.Assert i  运行出错
我很菜,改来该去都未成功,
请内行和有兴趣的朋友帮忙改改,见附件



[attach]29534[/attach]
作者: Grant    时间: 2008-4-9 16:31
Application.hWndAccessApp =  App.hInstance
Assert  有条件地在该方法出现的行上挂起执行,换换其他事件
作者: wjb5645    时间: 2008-4-9 16:54
我用Application.hWndAccessApp =  App.hInstance
一连接,ACCESS就关闭了,而且系统就坏了
不懂是为啥
作者: Grant    时间: 2008-4-9 17:46
库句柄
作者: wjb5645    时间: 2008-4-10 15:06
我把服务端传上便于测试
作者: wjb5645    时间: 2008-4-10 15:12
我把服务端传上便于测试(是借用人家远控的改改来测试用)


[attach]29561[/attach]
作者: ptsea    时间: 2008-4-10 16:44
标题: 还能这么做啊
如题
作者: Grant    时间: 2008-4-10 16:57
还可以收发邮件等
作者: liwen    时间: 2008-4-10 17:41
http://www.office-cn.net/forum.p ... 9797&highlight= 李寻欢的远程文件传输 也是使用Winsock的
作者: wjb5645    时间: 2008-4-10 23:24
用Winsock控件做象李大侠是没问题的
我是用Winsock的源码来做就碰头了,
作者: liwen    时间: 2008-4-11 10:11
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&)

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

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




欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/) Powered by Discuz! X3.3