hytj.cpp

图书管理系统

// Hytj.cpp : implementation file
//

#include "stdafx.h"
#include "jeah_data.h"
#include "Hytj.h"

#include "sqltypes.h"
#include "sql.h"
#include "sqlext.h"

extern HENV henv;
extern HDBC hdbc;

#ifdef _DEBUG
#define new DEBUG_NEW
#undef THIS_FILE
static char THIS_FILE[] = __FILE__;
#endif

/////////////////////////////////////////////////////////////////////////////
// Hytj dialog


Hytj::Hytj(CWnd* pParent /*=NULL*/)
	: CDialog(Hytj::IDD, pParent)
{
	//{{AFX_DATA_INIT(Hytj)
	m_znum = _T("");
	//}}AFX_DATA_INIT
}


void Hytj::DoDataExchange(CDataExchange* pDX)
{
	CDialog::DoDataExchange(pDX);
	//{{AFX_DATA_MAP(Hytj)
	DDX_Control(pDX, IDOK, m_ok);
	DDX_Control(pDX, IDC_LIST2, m_dzlist);
	DDX_Text(pDX, IDC_EDIT1, m_znum);
	//}}AFX_DATA_MAP
}


BEGIN_MESSAGE_MAP(Hytj, CDialog)
	//{{AFX_MSG_MAP(Hytj)
	//}}AFX_MSG_MAP
END_MESSAGE_MAP()

/////////////////////////////////////////////////////////////////////////////
// Hytj message handlers

BOOL Hytj::OnInitDialog() 
{
	CDialog::OnInitDialog();
	
	// TODO: Add extra initialization here
	RETCODE rc;
	int i,j;
	int count;
	HSTMT FAR *phstmt;
	char *a;
	CString sql;
	char * rgbValue;
	SDWORD FAR *pcbValue;
	pcbValue=(SDWORD FAR*)malloc(sizeof(SDWORD FAR));
	rgbValue=(char*)malloc(100);
	phstmt=(HSTMT FAR *)malloc(sizeof(HSTMT FAR));
	a=(char*)malloc(400);
	m_dzlist.InsertColumn(1,(char*)"卡号",LVCFMT_LEFT,110);
	m_dzlist.InsertColumn(2,(char*)"姓名",LVCFMT_LEFT,111);
	m_dzlist.InsertColumn(3,(char*)"性别",LVCFMT_LEFT,110);
	m_dzlist.InsertColumn(4,(char*)"年龄",LVCFMT_LEFT,110);
	m_dzlist.InsertColumn(5,(char*)"登记时间",LVCFMT_LEFT,112);
	m_dzlist.InsertColumn(6,(char*)"有效时间",LVCFMT_LEFT,112);
	sql="select count(*) from 读者表";
	strcpy(a,sql.GetBuffer(sql.GetLength()));
	SQLAllocStmt(hdbc,phstmt);
	SQLExecDirect(*phstmt,(UCHAR FAR*)a,SQL_NTS);
	SQLFetch(*phstmt);
	SQLGetData(*phstmt,1,SQL_C_CHAR,rgbValue,10,pcbValue);
	m_znum=rgbValue;
	UpdateData(false);
	count=atoi(rgbValue);
	sql="select 卡号,姓名,性别,年龄,登记时间,有效时间 from 读者表";
	strcpy(a,sql.GetBuffer(sql.GetLength()));

	SQLAllocStmt(hdbc,phstmt);
	SQLExecDirect(*phstmt,(UCHAR FAR*)a,SQL_NTS);	
	for(i=0;i<count;i++)
	{
		SQLFetch(*phstmt);
		if(rc==SQL_NO_DATA_FOUND)
			break;
		if(rc==SQL_SUCCESS||SQL_SUCCESS_WITH_INFO)
		{
			m_dzlist.InsertItem(i,"");
			for(j=1;j<=6;j++)
			{
				rc=SQLGetData(*phstmt,j,SQL_C_CHAR,rgbValue,100,pcbValue);

				m_dzlist.SetItemText(i,j-1,rgbValue);
			}
		}
	}
	
	free(rgbValue);
	free(pcbValue);
	free(a);
	free(phstmt);	
	return TRUE;  // return TRUE unless you set the focus to a control
	              // EXCEPTION: OCX Property Pages should return FALSE
}