基本信息

---

下载

   友情提示：（无需注册或充值，赞助后即可获取资源下载链接）

---

     嘿，亲！知识可是无价之宝呢，但咱这精心整理的资料也耗费了不少心血呀。小小地破费一下，绝对物超所值哦！如有下载和支付问题，请联系我们QQ(微信同号)：813200300

本次赞助数额为： 5 元　

支付宝支付

微信支付

   源码介绍

---

// OpcClientDlg.cpp : 实现文件
//

/**********************************************************************
							代码说明
**********************************************************************

编写时间：2018年6月1日07:50:43

编写环境：win7_VS2015

功能：opc客户端，连接远程（局域网内）opc服务器

最后修改：2018年8月25日17:34:40

笔者刚刚学习这块内容，如有不妥之处，欢迎交流，qq1055311345

注意！！！运行时请确保opc主机ip，opc服务器名，组名，项名正确，否则会报错
**********************************************************************/


/**********************************************************************
							代码移植说明
**********************************************************************

1.添加头文件及源文件
	头文件3个，opccomn.h/opcda.h/opcenum.h
	源文件3个，opccomn_i.c/opcda_i.c/opcenum_i.c

	首先把6个文件考到你的代码目录，然后做以下操作：
	opcda.h和opcenum.h		在xxxDlg.h中引用（需自己添）
	opccomn.h				在opcenum.h使用（不需自己添）
	3个源文件				在解决方案中的源文件中添加现有项

2.如需循环采集数据，则需要线程
	创建线程，可以点击按钮触发（我的在OnBnClickedBtnGain函数中），也可以在初始化函数中触发（在OnInitDialog函数中）
	注意线程ID和线程函数名，注意在头文件中声明函数
	在线程函数中建立死循环，自循环中采集opc数据
	！！！获取数据时，注意将opc主机ip，opc服务器名，组名，项名改为你自己的

3.采集到的数据如需在界面控件中显示出来，还需自定义消息（因为涉及到了跨线程访问控件）
	首先自定义消息ID
	然后在BEGIN_MESSAGE_MAP(COpcClientDlg, CDialogEx) 和 END_MESSAGE_MAP()之间添加消息映射
	接下来就是自定义消息处理函数，在里面访问更新控件，注意在头文件中声明函数

**********************************************************************/

#include "stdafx.h"
#include "OpcClient.h"
#include "OpcClientDlg.h"
#include "afxdialogex.h"
 
#ifdef _DEBUG
#define new DEBUG_NEW
#endif

#define WM_UPDATE_STATIC (WM_USER   100)   //自定义消息ID*****
CString out; //存储opc服务器的数据，在ThreadFunc函数中获得，供OnUpdateStatic函数使用**



// 用于应用程序“关于”菜单项的 CAboutDlg 对话框

class CAboutDlg : public CDialogEx
{
public:
	CAboutDlg();

// 对话框数据
#ifdef AFX_DESIGN_TIME
	enum { IDD = IDD_ABOUTBOX };
#endif

	protected:
	virtual void DoDataExchange(CDataExchange* pDX);    // DDX/DDV 支持

// 实现
protected:
	DECLARE_MESSAGE_MAP()
};

CAboutDlg::CAboutDlg() : CDialogEx(IDD_ABOUTBOX)
{
}

void CAboutDlg::DoDataExchange(CDataExchange* pDX)
{
	CDialogEx::DoDataExchange(pDX);
}

BEGIN_MESSAGE_MAP(CAboutDlg, CDialogEx)
END_MESSAGE_MAP()


// COpcClientDlg 对话框

COpcClientDlg::COpcClientDlg(CWnd* pParent /*=NULL*/)
	: CDialogEx(IDD_OPCCLIENT_DIALOG, pParent)
{
	m_hIcon = AfxGetApp()->LoadIcon(IDR_MAINFRAME);
}

void COpcClientDlg::DoDataExchange(CDataExchange* pDX)
{
	CDialogEx::DoDataExchange(pDX);
}

BEGIN_MESSAGE_MAP(COpcClientDlg, CDialogEx)
	ON_WM_SYSCOMMAND()
	ON_WM_PAINT()
	ON_WM_QUERYDRAGICON()
	ON_BN_CLICKED(IDC_BTN_GAIN, &COpcClientDlg::OnBnClickedBtnGain)
	ON_MESSAGE(WM_UPDATE_STATIC, &COpcClientDlg::OnUpdateStatic) //添加消息映射 OnUpdateStatic为自定义消息处理函数名*****
END_MESSAGE_MAP()


// COpcClientDlg 消息处理程序

BOOL COpcClientDlg::OnInitDialog()
{
	CDialogEx::OnInitDialog();

	// 将“关于...”菜单项添加到系统菜单中。

	// IDM_ABOUTBOX 必须在系统命令范围内。
	ASSERT((IDM_ABOUTBOX & 0xFFF0) == IDM_ABOUTBOX);
	ASSERT(IDM_ABOUTBOX < 0xF000);

	CMenu* pSysMenu = GetSystemMenu(FALSE);
	if (pSysMenu != NULL)
	{
		BOOL bNameValid;
		CString strAboutMenu;
		bNameValid = strAboutMenu.LoadString(IDS_ABOUTBOX);
		ASSERT(bNameValid);
		if (!strAboutMenu.IsEmpty())
		{
			pSysMenu->AppendMenu(MF_SEPARATOR);
			pSysMenu->AppendMenu(MF_STRING, IDM_ABOUTBOX, strAboutMenu);
		}
	}

	// 设置此对话框的图标。  当应用程序主窗口不是对话框时，框架将自动
	//  执行此操作
	SetIcon(m_hIcon, TRUE);			// 设置大图标
	SetIcon(m_hIcon, FALSE);		// 设置小图标

	// TODO: 在此添加额外的初始化代码

	return TRUE;  // 除非将焦点设置到控件，否则返回 TRUE
}

void COpcClientDlg::OnSysCommand(UINT nID, LPARAM lParam)
{
	if ((nID & 0xFFF0) == IDM_ABOUTBOX)
	{
		CAboutDlg dlgAbout;
		dlgAbout.DoModal();
	}
	else
	{
		CDialogEx::OnSysCommand(nID, lParam);
	}
}

// 如果向对话框添加最小化按钮，则需要下面的代码
//  来绘制该图标。  对于使用文档/视图模型的 MFC 应用程序，
//  这将由框架自动完成。

void COpcClientDlg::OnPaint()
{
	if (IsIconic())
	{
		CPaintDC dc(this); // 用于绘制的设备上下文

		SendMessage(WM_ICONERASEBKGND, reinterpret_cast<WPARAM>(dc.GetSafeHdc()), 0);

		// 使图标在工作区矩形中居中
		int cxIcon = GetSystemMetrics(SM_CXICON);
		int cyIcon = GetSystemMetrics(SM_CYICON);
		CRect rect;
		GetClientRect(&rect);
		int x = (rect.Width() - cxIcon   1) / 2;
		int y = (rect.Height() - cyIcon   1) / 2;

		// 绘制图标
		dc.DrawIcon(x, y, m_hIcon);
	}
	else
	{
		CDialogEx::OnPaint();
	}
}

//当用户拖动最小化窗口时系统调用此函数取得光标
//显示。
HCURSOR COpcClientDlg::OnQueryDragIcon()
{
	return static_cast<HCURSOR>(m_hIcon);
}

/*******************************************************************
函数说明：
	功能：连接指定的opc服务器
	参数：
		serverIP   服务器ip
		serverName   服务器名
	返回值：
		如正确连接，返回服务器接口指针，否则返回空指针
*******************************************************************/
IOPCServer* ConnectOpcServer(CString serverIP, CString serverName)
{
	//***************************连接服务器*****************************
	CLSID   clsid_citect;
	HRESULT flag;

	//1.初始化com库
	CoInitialize(NULL);

	//2.创建server对象
	COSERVERINFO si;
	ZeroMemory(&si, sizeof(si)); //内存1 存放服务器信息  
	MULTI_QI mqi[1];
	ZeroMemory(&mqi, sizeof(mqi)); //内存2 存放MULTI_QI用以获取OPC服务器列表  
	CATID catID[2];
	ZeroMemory(&catID, 2 * sizeof(CATID));  //内存3 存放OPC标准接口1.0和2.0  
	CLSID clsid[20];
	ZeroMemory(&clsid, 20 * sizeof(CLSID)); //内存4 存放枚举出的OPC服务器的CLSID  

	/*****************************初始化指针**********************************************/
	IOPCServerList *pIServerList = NULL;  //第一个接口指针，指向OPC服务器列表  
	IEnumGUID *pIEnumGUID = NULL; //第二个接口指针，指向OPC服务器列表枚举  
	IUnknown *pIUnknown = NULL; //第三个指针，服务器接口指针  
	IOPCServer *pIServer = NULL; //第四个指针，指向OPC服务器的接口指针  


	CoInitializeEx(NULL, COINIT_MULTITHREADED); //注册DCOM组件，获取结果  
	HRESULT hr_sec = CoInitializeSecurity(NULL, -1, NULL, NULL, RPC_C_AUTHN_LEVEL_NONE, RPC_C_IMP_LEVEL_IMPERSONATE, NULL, EOAC_NONE, NULL);
	ASSERT(hr_sec == S_OK || RPC_E_TOO_LATE == hr_sec);

	si.pwszName = (LPWSTR)(serverIP.GetString()); //Covert CString to LPWSTR 把服务器主机名转为宽字节字符串     

	mqi[0].hr = S_OK;
	mqi[0].pIID = &IID_IOPCServerList;
	mqi[0].pItf = NULL;

	CoCreateInstanceEx(CLSID_OpcServerList, NULL, CLSCTX_ALL, &si, 1, mqi); //Connect to the target OPC SERVER & Get the target SERVER's OPC SERVER List  


	//****************OPC服务器枚举*******************
	pIServerList = (IOPCServerList*)mqi[0].pItf; //得到第一个指针  
	if (pIServerList == NULL)
	{
		CoUninitialize();   //关闭com
		return NULL;
	}

	flag = pIServerList->EnumClassesOfCategories(2, catID, 2, catID, &pIEnumGUID); //Enum OPCDASERVER1.0 & OPCDASERVER2.0 得到第二个指针  
	if (flag != S_OK)
	{
		CoUninitialize();   //关闭com
		return NULL;
	}

	ULONG nCount;
	HRESULT hr_1;

	do
	{
		hr_1 = pIEnumGUID->Next(20, clsid, &nCount);
		for (ULONG i = 0; i < nCount; i  )
		{
			LPOLESTR szProID;
			LPOLESTR szUserType;
			HRESULT hr_2 = pIServerList->GetClassDetails(clsid[i], &szProID, &szUserType);
			CoTaskMemFree(szProID);
			CoTaskMemFree(szUserType);
		}
	} while (hr_1 == S_OK);

	flag = pIServerList->CLSIDFromProgID(serverName, &clsid_citect); //获取OPC服务器的CLSID  

	if (flag != S_OK)
	{
		CoUninitialize();   //关闭com
		return NULL;
	}

	mqi[0].hr = S_OK;
	mqi[0].pIID = &IID_IOPCServer;
	mqi[0].pItf = NULL;

	flag = CoCreateInstanceEx(clsid_citect, NULL, CLSCTX_ALL, &si, 1, mqi);
	if (FAILED(flag))
	{
		CoUninitialize();   //关闭com
		return NULL;
	}

	pIUnknown = (IUnknown*)mqi[0].pItf;

	pIUnknown->QueryInterface(IID_IOPCServer,/*OUT*/(void**)&pIServer); //得到第四个指针 

	return pIServer;
}


#pragma region **获取opc数据** 
/******************************************************************
函数说明：
	参数：
	pIServer  服务器接口
	szItemID  服务器项的名称（数据地址）

	返回值：CString型的数据，不是opc服务器数据的类型，经过转换
******************************************************************/

CString GetOpcData(IOPCServer *pIServer, LPWSTR szItemID)
{
	//***************************初始化变量*****************************
	LONG            TimeBias = 0;
	FLOAT			PercentDeadband = 0.0;
	DWORD			AA = 0;
	OPCHANDLE       m_GrpSrvHandle;
	OPCITEMDEF      m_Items[1];

	//1.初始化com库
	CoInitialize(NULL);

	//2.创建server对象
	COSERVERINFO si;
	ZeroMemory(&si, sizeof(si)); //内存1 存放服务器信息  
	MULTI_QI mqi[1];

	/*****************************初始化指针**********************************************/
	IOPCServer     *m_IOPCServer;
	IOPCItemMgt    *m_IOPCItemMgt;
	HRESULT        *m_pErrors;
	IOPCSyncIO     *m_IOPCSyncIO;
	OPCITEMRESULT  *m_ItemResult;


	//***************************创建组和项*****************************
	//3.创建group
	pIServer->AddGroup(L"grp1",  //group名，可任意更改
		TRUE,
		500, //刷新速率
		1,
		&TimeBias,
		&PercentDeadband,
		0x409,
		&m_GrpSrvHandle,
		&AA,
		IID_IOPCItemMgt,
		(LPUNKNOWN*)&m_IOPCItemMgt);


	//4. 创建项
	m_Items[0].szAccessPath = L"";
	m_Items[0].szItemID = szItemID;  //Item名
	m_Items[0].bActive = TRUE;
	m_Items[0].hClient = 1;
	m_Items[0].dwBlobSize = 0;
	m_Items[0].pBlob = NULL;
	m_Items[0].vtRequestedDataType = 0;

	m_IOPCItemMgt->AddItems(1, //项计数
		m_Items,
		&m_ItemResult,
		&m_pErrors);

	//5.添加接口
	m_IOPCItemMgt->QueryInterface(IID_IOPCSyncIO, (void **)&m_IOPCSyncIO);


	OPCHANDLE     *phServer;
	OPCITEMSTATE  *pItemValue;
	HRESULT       *pErrors;

	//*************************读取数据*****************************

	phServer = new OPCHANDLE[1];
	phServer[0] = m_ItemResult[0].hServer;
	m_IOPCSyncIO->Read(OPC_DS_CACHE, 1, phServer, &pItemValue, &pErrors);
	delete[] phServer;

	float floatVal = pItemValue[0].vDataValue.fltVal; //获取float数据，也可获取其他类型数据，在fltVal定义处查看相应变量名
	CString floatStr;
	//将获取的数据转成CString型
	floatStr.Format(L"%-9.2f", floatVal);
	

	//*************************断开服务器*****************************

	//删除项
	phServer = new OPCHANDLE[1];
	phServer[0] = m_ItemResult[0].hServer;

	m_IOPCItemMgt->RemoveItems(1, phServer, &pErrors);

	delete[] phServer;
	CoTaskMemFree(pErrors);//释放变量内存块
	CoTaskMemFree(m_ItemResult);
	m_ItemResult = NULL;

	m_IOPCSyncIO->Release();
	m_IOPCSyncIO = NULL;

	m_IOPCItemMgt->Release();
	m_IOPCItemMgt = NULL;

	//删除组
	pIServer->RemoveGroup(m_GrpSrvHandle, TRUE);

	m_GrpSrvHandle = NULL;

	//释放服务器
	pIServer->Release();
	pIServer = NULL;
	CoUninitialize();   //关闭com

	return floatStr;
}
#pragma endregion


#pragma region **线程函数**
DWORD WINAPI ThreadFunc(LPVOID lpParam)
{
	IOPCServer *pIServer;
	while (TRUE)
	{
		pIServer = ConnectOpcServer(L"192.168.0.101", L"Knight.OPC.Server.Demo");
		out = GetOpcData(pIServer, L"a.a.f");

		COpcClientDlg *pDlg = (COpcClientDlg *)lpParam;
		::PostMessage(pDlg->m_hWnd, WM_UPDATE_STATIC, 0, 0);
	}
	return TRUE;
}
#pragma endregion

#pragma region **消息处理函数，更新界面控件数据** 
LRESULT COpcClientDlg::OnUpdateStatic(WPARAM wParam, LPARAM lParam)
{
	//在用户界面显示
	GetDlgItem(IDC_STC_OUT)->SetWindowText(out); //IDC_STC_OUT为控件句柄
	
	return TRUE;
}
#pragma endregion

#pragma region  **点击获取数据按钮，执行此函数**
void COpcClientDlg::OnBnClickedBtnGain()
{
	// TODO: 在此添加控件通知处理程序代码
	DWORD ThreadID;  //线程ID***

	CreateThread(NULL, 0, (LPTHREAD_START_ROUTINE)ThreadFunc, this, 0, &ThreadID);//创建线程，ThreadFunc为线程函数名，ThreadID线程ID
}
#pragma endregion