adotestview.cpp

VC++6.0实现连接数据库,用了两种方法,供大家参考

// ADOTESTView.cpp : implementation of the CADOTESTView class
//

#include "stdafx.h"
#include "ADOTEST.h"
#include "Mydlg.h"
#include "ADOTESTDoc.h"
#include "ADOTESTView.h"

#ifdef _DEBUG
#define new DEBUG_NEW
#define IDB_MYBUTTON 1234
#define IDB_MYBUTTON1 1236
#define IDD_MYDLG 1239
#undef THIS_FILE
static char THIS_FILE[] = __FILE__;
#endif


// CADOTESTView

IMPLEMENT_DYNCREATE(CADOTESTView, CView)

BEGIN_MESSAGE_MAP(CADOTESTView, CView)
	//{{AFX_MSG_MAP(CADOTESTView)
	ON_WM_LBUTTONDBLCLK()
	ON_WM_LBUTTONDOWN()
	ON_WM_RBUTTONDOWN()
	ON_WM_CREATE()
	//}}AFX_MSG_MAP
	// Standard printing commands
	ON_COMMAND(ID_FILE_PRINT, CView::OnFilePrint)
	ON_COMMAND(ID_FILE_PRINT_DIRECT, CView::OnFilePrint)
	ON_COMMAND(ID_FILE_PRINT_PREVIEW, CView::OnFilePrintPreview)
	ON_COMMAND(IDB_MYBUTTON, CADOTESTView::OnFilePrintPreview)
	ON_COMMAND(IDB_MYBUTTON1, CADOTESTView::bnt2down)
END_MESSAGE_MAP()

/////////////////////////////////////////////////////////////////////////////
// CADOTESTView construction/destruction


CADOTESTView::CADOTESTView()
{
	// TODO: add construction code here

}

CADOTESTView::~CADOTESTView()
{
}

BOOL CADOTESTView::PreCreateWindow(CREATESTRUCT& cs)
{
	// TODO: Modify the Window class or styles here by modifying
	//  the CREATESTRUCT cs

	return CView::PreCreateWindow(cs);
}

/////////////////////////////////////////////////////////////////////////////
// CADOTESTView drawing

void CADOTESTView::OnDraw(CDC* pDC)
{
	CADOTESTDoc* pDoc = GetDocument();
	ASSERT_VALID(pDoc);
	// TODO: add draw code for native data here
}

/////////////////////////////////////////////////////////////////////////////
// CADOTESTView printing

BOOL CADOTESTView::OnPreparePrinting(CPrintInfo* pInfo)
{
	// default preparation
	return DoPreparePrinting(pInfo);
}

void CADOTESTView::OnBeginPrinting(CDC* /*pDC*/, CPrintInfo* /*pInfo*/)
{
	// TODO: add extra initialization before printing
}

void CADOTESTView::OnEndPrinting(CDC* /*pDC*/, CPrintInfo* /*pInfo*/)
{
	// TODO: add cleanup after printing
}

/////////////////////////////////////////////////////////////////////////////
// CADOTESTView diagnostics

#ifdef _DEBUG
void CADOTESTView::AssertValid() const
{
	CView::AssertValid();
}

void CADOTESTView::Dump(CDumpContext& dc) const
{
	CView::Dump(dc);
}

CADOTESTDoc* CADOTESTView::GetDocument() // non-debug version is inline
{
	ASSERT(m_pDocument->IsKindOf(RUNTIME_CLASS(CADOTESTDoc)));
	return (CADOTESTDoc*)m_pDocument;
}
#endif //_DEBUG

/////////////////////////////////////////////////////////////////////////////
// CADOTESTView message handlers

void CADOTESTView::OnLButtonDblClk(UINT nFlags, CPoint point) 
{
	// TODO: Add your message handler code here and/or call default
	
	CView::OnLButtonDblClk(nFlags, point);

}

void CADOTESTView::OnLButtonDown(UINT nFlags, CPoint point) 
{
	// TODO: Add your message handler code here and/or call default
	
	CView::OnLButtonDown(nFlags, point);
	_ConnectionPtr pConn;
	pConn.CreateInstance(__uuidof(Connection));
	if(pConn==NULL)
	{
		return;
	}
	// char *connStr="Provider=OraOLEDB.Oracle.1;Data Source=LYF;User ID=scott;Password=tiger";
	  char *connStr ="Provider=MSDAORA;Data Source=ORACLE;User ID=scott;Password=tiger";
	HRESULT rs;
	//pConn->ConnectionString 
	try
	{
		rs =pConn->Open(connStr,"","",0);
	}
	catch(...)
	{
		AfxMessageBox("连接字符串出错或参数出问题!");
		return;
	}
	
	if(rs==S_OK)
	{
		AfxMessageBox("连接成功!");
			
		_RecordsetPtr pSet = pConn->OpenSchema(adSchemaColumns);
		
		TRACE("%20s%20s\n","name","type");
		while(!pSet->adoEOF)
		{
			_bstr_t bs = pSet->Fields->GetItem("TABLE_NAME")->Value;
			char *name =(LPSTR)bs;
			
			_bstr_t bst = pSet->Fields->GetItem("COLUMN_NAME")->Value;
			char *type =(LPSTR)bst;
			
			TRACE("%20s%20s\n",name,type);
			
			pSet->MoveNext();
		}
		pConn->Close();
	}
	else
	{
		AfxMessageBox("连接失败!");
	}
}

void CADOTESTView::OnRButtonDown(UINT nFlags, CPoint point) 
{

	CView::OnRButtonDown(nFlags, point);

	_ConnectionPtr pConn;
	pConn.CreateInstance(__uuidof(Connection));
	if(pConn==NULL)
	{
		return;
	}
	char *connStr="Provider=OraOLEDB.Oracle.1;Data Source=LYF;User ID=scott;Password=tiger";
	HRESULT rs;
	//pConn->ConnectionString 
	try
	{
		rs =pConn->Open(connStr,"","",0);
	}
	catch(...)
	{
		AfxMessageBox("连接字符串出错或参数出问题!");
		return;
	}
	
	if(rs==S_OK)
	{
		AfxMessageBox("连接成功!");
		
		//Parameters
		//插入。。。。等
		_CommandPtr pCmd;
		pCmd.CreateInstance(__uuidof(Command));
		pCmd->ActiveConnection = pConn;
		pCmd->CommandText = "insert into  T_Orders values(123,to_date('20-02-1991','dd-mm-yyyy'),to_date('25-02-1991','dd-mm-yyyy'),'wwwww')";
	    _RecordsetPtr ppSet = pCmd->Execute(NULL,NULL,adCmdText);

		AfxMessageBox("插入成功!");
		//查询
		_RecordsetPtr pSet;
 		pSet.CreateInstance(__uuidof(Recordset));

		//CursorTypeEnum
		LockTypeEnum;
		pSet->Open("select * from T_Orders",
			(IDispatch*)pConn,
			adOpenDynamic,
			adLockOptimistic,
			adCmdText);

		while(!pSet->adoEOF)
		{
			_bstr_t bs = pSet->Fields->GetItem("OrderID")->Value;
			int index = atoi((LPSTR)bs);
			TRACE("%d\n",index);
			_bstr_t bs1 = pSet->Fields->GetItem("OrderStart")->Value;
			char *s=(LPSTR)bs1;
			TRACE("%s\n",s);
			pSet->MoveNext();
		}
		pSet->Close();
		pConn->Close();
	}
	else
	{
		AfxMessageBox("连接失败!");
	}

}


int CADOTESTView::OnCreate(LPCREATESTRUCT lpCreateStruct) 
{
	if (CView::OnCreate(lpCreateStruct) == -1)
		return -1;

	// TODO: Add your specialized creation code here
	m_btn.Create("测试连接数据",WS_CHILD|WS_VISIBLE|BS_PUSHBUTTON,CRect(0,0,130,50),this,IDB_MYBUTTON);
	m_bnt2.Create("显示数据",WS_CHILD|WS_VISIBLE|BS_PUSHBUTTON,CRect(0,50,130,100),this,IDB_MYBUTTON1);
	return 0;
}
void CADOTESTView::OnFilePrintPreview()
{
	_ConnectionPtr pConn;
	pConn.CreateInstance(__uuidof(Connection));
	if(pConn==NULL)
	{
		return;
	}
	char *connStr="Provider=OraOLEDB.Oracle.1;Data Source=LYF;User ID=scott;Password=tiger";
//	 char *connStr ="Provider=MSDAORA;Data Source=ORACLE;User ID=scott;Password=tiger";
	HRESULT rs;
	//pConn->ConnectionString 
	try
	{
		rs =pConn->Open(connStr,"","",0);
	}
	catch(...)
	{
		AfxMessageBox("连接字符串出错或参数出问题!");
		return;
	}
	
	if(rs==S_OK)
	{
		AfxMessageBox("连接成功!");
	
		_RecordsetPtr pSet = pConn->OpenSchema(adSchemaColumns);	
		TRACE("%20s%20s\n","name","type");
		while(!pSet->adoEOF)
		{
			_bstr_t bs = pSet->Fields->GetItem("TABLE_NAME")->Value;
			char *name =(LPSTR)bs;
			
			_bstr_t bst = pSet->Fields->GetItem("COLUMN_NAME")->Value;
			char *type =(LPSTR)bst;
			
			TRACE("%20s%20s\n",name,type);
			
			pSet->MoveNext();
		}
		pConn->Close();
	}
	else
	{
		AfxMessageBox("连接失败!");
	}
}

_RecordsetPtr p_Record;
_ConnectionPtr p_Con;

void CADOTESTView::bnt2down()
{
	
 // CMyDlg dlg;
p_Con.CreateInstance(__uuidof(Connection));
if(p_Con==NULL)
{
	return;
}
char *connStr="Provider=OraOLEDB.Oracle.1;Data Source=LYF;User ID=scott;Password=tiger";
//char *connStr="Provider=MSDAORA;Data Source=ORACLE;User ID=scott;Password=tiger";
HRESULT rs;	
try
{
	rs =p_Con->Open(connStr,"","",0);
}
catch(...)
{
	AfxMessageBox("连接字符串出错或参数出问题!");
	return;
}

if(rs==S_OK)
{
	    AfxMessageBox("连接成功!");
		p_Record.CreateInstance("ADODB.Recordset");			
	
}

CMyDlg *dlg;
dlg=new CMyDlg();
dlg->Create(IDD_DIALOG1);

//	int nResponse = dlg.DoModal();
	if (dlg->ShowWindow(SW_SHOW)== IDOK)
	{
		dlg->ShowWindow(SW_SHOW);
	}
	else if (dlg->ShowWindow(SW_SHOW)== IDCANCEL)
	{
		//EndDialog(IDCANCEL);
		delete this;
	}

}