一个VC读写刷卡器的例子

    这个程序是2006年编写的，用来读写金诚信刷卡器，提供了IDispatch接口，可以在VB或网页中使中。

    由于这是我第一次用VC写程序，所以程序流程和注释不太详细，不过代码很简单，对希望利用VC读写串口的朋友有一定帮助。

    一、接口文件：

import "oaidl.idl"; import "ocidl.idl"; [ object, uuid(9D6A9AC7-9C3E-46A1-859B-B1F2FCFBB320), dual, helpstring("ICard Interface"), pointer_default(unique) ] interface ICard : IDispatch { [id(1), helpstring("method Write")] HRESULT Write([in]long TrackIndex,[in]BSTR bstrValue,[out,retval]BOOL *pbResult); [id(2), helpstring("method Read")] HRESULT Read([in]long TrackIndex,[out,retval]BSTR* pbstrValue); [id(3), helpstring("method SetParameters")] HRESULT SetParameters(long lngComPort,long lngBaudRate); [id(4), helpstring("method Reset")] HRESULT Reset(); [propget, id(5), helpstring("property ComPort")] HRESULT ComPort([out, retval] long *pVal); [propput, id(5), helpstring("property ComPort")] HRESULT ComPort([in] long newVal); }; [ uuid(19CB32FB-3424-48D1-AD65-572DE2BFD9EA), version(1.0), helpstring("MagCard 1.0 Type Library") ] library MAGCARDLib { importlib("stdole32.tlb"); importlib("stdole2.tlb"); [ uuid(05E20EF2-E3A8-4060-8837-8E9966354A1C), helpstring("Card Class") ] coclass Card { [default] interface ICard; }; };

    二、头文件：

#ifndef __CARD_H_ #define __CARD_H_ #include "resource.h" // main symbols ///////////////////////////////////////////////////////////////////////////// // CCard class ATL_NO_VTABLE CCard : public CComObjectRootEx<CComSingleThreadModel>, public IObjectSafetyImpl<CCard,INTERFACESAFE_FOR_UNTRUSTED_CALLER | INTERFACESAFE_FOR_UNTRUSTED_DATA>, public CComCoClass<CCard, &CLSID_Card>, public IDispatchImpl<ICard, &IID_ICard, &LIBID_MAGCARDLib> { public: CCard(); ~CCard(); DECLARE_REGISTRY_RESOURCEID(IDR_CARD) DECLARE_PROTECT_FINAL_CONSTRUCT() BEGIN_COM_MAP(CCard) COM_INTERFACE_ENTRY(ICard) COM_INTERFACE_ENTRY(IDispatch) COM_INTERFACE_ENTRY(IObjectSafety) END_COM_MAP() // ICard public: STDMETHOD(get_ComPort)(/*[out, retval]*/ long *pVal); STDMETHOD(put_ComPort)(/*[in]*/ long newVal); STDMETHOD(Reset)(); STDMETHOD(SetParameters)(/*[in]*/long lngComPort,/*[in]*/long lngBaudRate); STDMETHOD(Read)(/*[in]*/long TrackIndex,/*[out,retval]*/BSTR *pbstrValue); STDMETHOD(Write)(/*[in]*/long TrackIndex,/*[in]*/BSTR bstrValue,/*[out,retval]*/BOOL *pbResult); HANDLE hCom; //串口句柄 char m_szComName[15]; //串口名称,即COM1、COM2等。 long m_lComPort; char m_szResetCtl[2]; //复位控制符 char m_szFormatCtl[5]; //数据格式：当第5位为31表示ISO格式，32表示IBM格式 char m_szStartPosCtl[4]; //起始位置：当第4位为36表示16，37表示20，38表示22，39表示25 char m_szDensityCtl[4]; //高密格式：第4位为48表示高密，4C表示低密 }; #endif //__CARD_H_

    三、体文件：

#include "stdafx.h" #include "MagCard.h" #include "Card.h" ///////////////////////////////////////////////////////////////////////////// // CCard CCard::CCard() { hCom = NULL; m_lComPort = 0; strcpy(m_szComName,"COM1"); SetParameters(1,9600); } CCard::~CCard() { if(hCom != NULL) CloseHandle(hCom); } STDMETHODIMP CCard::Write(long TrackIndex, BSTR bstrValue, BOOL *pbResult) { if(hCom == NULL) return E_FAIL; //定义写操作控制符 char m_Buff[127]; char m_StartWrite[] = {0x1B,'0',0x1B,'/0','/0','/0'}; //定义写操作头部控制符,随不同磁道而不同 char m_EndWrite[] = {0x1D,0x1B,'//',0x1B,'j','/0'}; //定义写操作尾部(即结束)控制符 switch(TrackIndex) { case 1: m_StartWrite[3] = 'w'; break; case 2: m_StartWrite[3] = 't'; break; default: m_StartWrite[3] = 't'; m_StartWrite[4] = 'A'; } //将头控制符、数据、尾控制符组装到一起 char szTemp[127]; CComBSTR bstrTemp(bstrValue); WideCharToMultiByte(CP_ACP,WC_COMPOSITECHECK,bstrTemp.m_str,-1,szTemp,128,NULL,NULL); memset(m_Buff,0,128); strcat(m_Buff,m_StartWrite); strcat(m_Buff,szTemp); strcat(m_Buff,m_EndWrite); bstrTemp.Empty(); //发送给刷卡器 DWORD dwCount; WriteFile(hCom,m_Buff,strlen(m_Buff),&dwCount,NULL);//将数据写入指定磁道 Sleep(500); //等待500毫秒 //等待刷卡器返回结果 memset(m_Buff,0,127); ReadFile(hCom,m_Buff,127,&dwCount,NULL); FlushFileBuffers(hCom); PurgeComm(hCom,PURGE_TXABORT|PURGE_RXABORT|PURGE_TXCLEAR|PURGE_RXCLEAR); //清空全部缓冲区,PURGE_TXCLEAR发送缓冲区,PURGE_RXCLEAR接收缓冲区 return S_OK; } STDMETHODIMP CCard::Read(long TrackIndex, BSTR *pbstrValue) { if(hCom == NULL) return E_FAIL; if(TrackIndex>3 ||TrackIndex <1) return E_FAIL; //发送读准备操作控制符 DWORD dwCount; char m_szRead[] = {0x1B,'0','/0'}; WriteFile(hCom,m_szRead,2,&dwCount,NULL); //发送读取磁道数控制符 char m_szTrack[]={0x1B,'0',0x1B,'/0','/0','/0'}; switch(TrackIndex) { case 1: //第一磁道 m_szTrack[3] = 'r'; break; case 2: //第二磁道 m_szTrack[3] = ']'; break; default: //默认为第三磁道 m_szTrack[3] = 'T'; m_szTrack[4] = ']'; break; } WriteFile(hCom,m_szTrack,5,&dwCount,NULL); Sleep(20); //读取指定的磁道 char m_Buff[127]; memset(m_Buff,0,128); ReadFile(hCom,m_Buff,127,&dwCount,NULL); //解析读取的结果 if(dwCount>0) { m_Buff[dwCount] = '/0'; if(TrackIndex<3) { memcpy(m_Buff,&m_Buff[2],dwCount-4); m_Buff[dwCount-4] = '/0'; } else{ memcpy(m_Buff,&m_Buff[3],dwCount-5); m_Buff[dwCount-5] = '/0'; } } else m_Buff[0] = '/0'; //将结果返回给用户 CComBSTR bstrTemp; bstrTemp.Append(m_Buff); *pbstrValue = bstrTemp.Copy(); bstrTemp.Empty(); return S_OK; } STDMETHODIMP CCard::SetParameters(long lngComPort,long lngBaudRate) { if(hCom != NULL) CloseHandle(hCom); m_lComPort = lngComPort; wsprintf(m_szComName,"COM%d",lngComPort); hCom=CreateFile(m_szComName,GENERIC_READ|GENERIC_WRITE,0,NULL,OPEN_EXISTING,0,NULL); if(hCom==(HANDLE)-1){ hCom = NULL; return E_FAIL; } //设置串口通讯参数 DCB dcb; GetCommState(hCom,&dcb); dcb.BaudRate = 9600; dcb.ByteSize = 8; dcb.StopBits = 0; dcb.EofChar = 26; dcb.fRtsControl = 0; SetCommState(hCom,&dcb); //设置通讯参数 //设置读写超时参数 COMMTIMEOUTS tagCommTimeOuts ; //定义超时结构，并填写该结构 tagCommTimeOuts.ReadIntervalTimeout = 10; tagCommTimeOuts.ReadTotalTimeoutMultiplier = 200; tagCommTimeOuts.ReadTotalTimeoutConstant = 500; //总的读超时时间为ReadIntervalTimeout*ReadTotalTimeoutMultiplier+ReadTotalTimeoutConstant tagCommTimeOuts.WriteTotalTimeoutConstant = 0; tagCommTimeOuts.WriteTotalTimeoutMultiplier = 0; SetCommTimeouts(hCom,&tagCommTimeOuts ) ;//设置读写操作所允许的超时 SetupComm(hCom,512,512); //设置串口输入和输出缓冲区均为128位 PurgeComm(hCom,PURGE_TXABORT|PURGE_RXABORT|PURGE_TXCLEAR|PURGE_RXCLEAR); //清空全部缓冲区,PURGE_TXCLEAR发送缓冲区,PURGE_RXCLEAR接收缓冲区 //发送刷卡器控制符 DWORD dwCount; char vFormat[] = {0x1B,'0',0x1B,'T','1'}; WriteFile(hCom,vFormat,5,&dwCount,NULL); //数据格式:最后一位1表示ISO,2表示IBM char vDensity[]={0x1B,'0',0x1B,'H'}; WriteFile(hCom,vDensity,4,&dwCount,NULL); //第二磁道高密度:最后一位H表示高,L表示低 char vPos[]={0x1B,'0',0x1B,'6'}; WriteFile(hCom,vPos,4,&dwCount,NULL);//起始位置:最后一位为6表示16,7表示20,8表示22,9表示25 return S_OK; } STDMETHODIMP CCard::Reset() { if(hCom==NULL) return E_FAIL; DWORD dwCount; char m_szControl[]={0x1B,'a','/0'}; WriteFile(hCom,m_szControl,3,&dwCount,NULL); Sleep(200); return S_OK; } STDMETHODIMP CCard::get_ComPort(long *pVal) { *pVal = m_lComPort; return S_OK; } STDMETHODIMP CCard::put_ComPort(long newVal) { if(newVal >8 || newVal <1) return E_FAIL; m_lComPort = newVal; wsprintf(m_szComName,"COM%d",newVal); return S_OK; }