MFC客户端程序如何获得服务器端数据库里的数据？

有远程直接方法数据库的方法。大中型数据库基本都是网络数据库，如常见的ORACLE / MSSQL / MYSQL等。

MFC编程，对这些数据库可以直接通过ADO进行查询和修改，常用的办法，就是用IP地址和实例（一般为默认）作为连接字符串中的SERVER即可。

对于网络型数据库（ACCESS、DBASE不在此列），你不需要做服务器端程序，只需要通过数据库支持的通讯协议和方法进行远程操作即可。

我这有一个以前自学用的例子，你看看需要不？

运行程序，打开程序主界面，如图1.1所示。输入FTP服务器IP地址、服务器端口、用户名及密码，单击“快速登录”按钮，连接FTP服务器。连接成功后，设置下载文件存储目录，然后就可以上传及下载文件了。下载文件过程中，可以暂停及删除下载任务。

图1.1  FTP文件上传下载模块主窗口

在“功能选项”菜单下选择“下载后关机”命令，文件下载完成后，自动关闭计算机。

//服务端：

//服务器接受线程数据

UINT CTcpSrvDlg::ReThreadFunc(LPVOID lParam)

{

CTcpSrvDlg *pDlgSrv = (CTcpSrvDlg*)lParam

WORD wVersionRequested//当前网络Socket版本号

WSADATA wsaData//定义当前网络信息对象

int err

int iError

CString str

wVersionRequested = MAKEWORD( 1, 1 )//(1.1)版本

//===1、初始化网络设备环境===

err = WSAStartup( wVersionRequested, &wsaData )

//如果WSAStartup返回值为0，则初始化成功

if ( err != 0 )

{

return 1L

}

//如果网络环境版本不对应，则清空网络设备环境并结束当前线程

if ( LOBYTE( wsaData.wVersion ) != 1 || HIBYTE( wsaData.wVersion ) != 1 )

{

AfxMessageBox("版本不匹配")

//清空网络设备环境

::WSACleanup()

return 1L

}

//===2、加载套接字===

SOCKET socketSvr = ::socket(AF_INET/*通信区域*/, SOCK_STREAM/*数据流式——TCP*/, 0)

if (INVALID_SOCKET == ::WSAGetLastError())

{

AfxMessageBox("加载套接字失败")

::WSACleanup()

::closesocket(socketSvr)

return 1L

}

//===3、套接字绑定

//初始化当前主机地址信息结构体对象

SOCKADDR_IN addSrv

addSrv.sin_addr.S_un.S_addr = htonl(INADDR_ANY)//允许任何IP的主机与之相连

addSrv.sin_family = AF_INET//通信网际域

addSrv.sin_port = htons(7000)//0——65355端口，自定义要大一些>1000

iError = ::bind(socketSvr, (SOCKADDR*)&addSrv, sizeof(SOCKADDR_IN))

//校验是否绑定成功

if (SOCKET_ERROR == iError)

{

AfxMessageBox("套接字绑定失败")

::WSACleanup()

::closesocket(socketSvr)

return 1L

}

//===监听===

iError = ::listen(socketSvr, SOMAXCONN/*等待连接堆内的最大来访者个数,

如果设置为SOMAXCONN，

则下层的服务提供者负责将套接字设置backlog值为最大的合理的值。*/

)

if (SOCKET_ERROR == iError)

{

AfxMessageBox("监听失败")

::WSACleanup()

::closesocket(socketSvr)

return 1L

}

//===5、接受请求的客户机的套接字信息===

SOCKET sockClient

SOCKADDR_IN addrClient

int iAddrLen = sizeof(SOCKADDR_IN)

while (1)

{

//接受对方的套接字信息

::accept(socketSvr/*服务器接受*/, (SOCKADDR*)&addrClient, &iAddrLen)

//===6、接受客户端发过来的数据===

char recvBuf[100]

iError = ::recv(sockClient, recvBuf, 100, 0)

if(SOCKET_ERROR == iError)

{

AfxMessageBox("数据接受失败")

}

//将接受过来的数据显示ListBox中

str.Format("%s",recvBuf)

pDlgSrv->m_lbRecv.AddString(str)

}

::closesocket(socketSvr)

::WSACleanup()

return 1L

}

---