sybtooldlg.cpp

一个执行SYBASE SQL语言的工具示例源代码 功能特色 1 语法颜色显示 2 执行DDL语句 3 在执行SQL Select 语句时使用异步多线程处理方式

// SYBToolDlg.cpp : implementation file
//

#include "stdafx.h"
#include "SYBTool.h"
#include "SYBToolDlg.h"
#include "SYCEngine.h"

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

/////////////////////////////////////////////////////////////////////////////
// CAboutDlg dialog used for App About

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

// Dialog Data
	//{{AFX_DATA(CAboutDlg)
	enum { IDD = IDD_ABOUTBOX };
	//}}AFX_DATA

	// ClassWizard generated virtual function overrides
	//{{AFX_VIRTUAL(CAboutDlg)
	protected:
	virtual void DoDataExchange(CDataExchange* pDX);    // DDX/DDV support
	//}}AFX_VIRTUAL

// Implementation
protected:
	//{{AFX_MSG(CAboutDlg)
	//}}AFX_MSG
	DECLARE_MESSAGE_MAP()
};

CAboutDlg::CAboutDlg() : CDialog(CAboutDlg::IDD)
{
	//{{AFX_DATA_INIT(CAboutDlg)
	//}}AFX_DATA_INIT
}

void CAboutDlg::DoDataExchange(CDataExchange* pDX)
{
	CDialog::DoDataExchange(pDX);
	//{{AFX_DATA_MAP(CAboutDlg)
	//}}AFX_DATA_MAP
}

BEGIN_MESSAGE_MAP(CAboutDlg, CDialog)
	//{{AFX_MSG_MAP(CAboutDlg)
		// No message handlers
	//}}AFX_MSG_MAP
END_MESSAGE_MAP()

/////////////////////////////////////////////////////////////////////////////
// CSYBToolDlg dialog

CSYBToolDlg::CSYBToolDlg(CWnd* pParent /*=NULL*/)
	: CResizableDialog(CSYBToolDlg::IDD, pParent),
	nSybaseEngine(0)
{
	//{{AFX_DATA_INIT(CSYBToolDlg)
	//}}AFX_DATA_INIT
	// Note that LoadIcon does not require a subsequent DestroyIcon in Win32
	m_hIcon = AfxGetApp()->LoadIcon(IDR_MAINFRAME);
}

void CSYBToolDlg::DoDataExchange(CDataExchange* pDX)
{
	CResizableDialog::DoDataExchange(pDX);
	//{{AFX_DATA_MAP(CSYBToolDlg)
	DDX_Control(pDX, IDC_CHK_ANYSE, m_chkAnys);
	DDX_Control(pDX, IDCSTATUS, m_status);
	DDX_Control(pDX, IDCUSER, m_use);
	DDX_Control(pDX, IDCSERVER, m_srv);
	DDX_Control(pDX, IDCPASSWORD, m_pwd);
	//}}AFX_DATA_MAP
}

BEGIN_MESSAGE_MAP(CSYBToolDlg, CResizableDialog)
	//{{AFX_MSG_MAP(CSYBToolDlg)
	ON_WM_SYSCOMMAND()
	ON_WM_PAINT()
	ON_WM_QUERYDRAGICON()
	ON_BN_CLICKED(IDCLOGIN, OnLogin)
	ON_BN_CLICKED(IDCLOGOUT, OnLogout)
	ON_MESSAGE(WM_MSG_STATUS, OnStatus)
	ON_BN_CLICKED(IDCEXECSQL, OnCexecsql)
	ON_BN_CLICKED(IDC_FILEOPEN_SQL, OnFileopenSql)
	ON_BN_CLICKED(IDC_SQLCOLOR, OnSqlcolor)
	ON_WM_CREATE()
	ON_WM_SIZE()
	ON_WM_CANCELMODE()
	ON_WM_CAPTURECHANGED()
	ON_WM_CHAR()
	ON_BN_CLICKED(IDC_FILESAVESQL, OnFileSaveSql)
	ON_WM_MOUSEMOVE()
	ON_MESSAGE(WM_MSG_RESULT, OnSYBRResult)
	//}}AFX_MSG_MAP
END_MESSAGE_MAP()

/////////////////////////////////////////////////////////////////////////////
// CSYBToolDlg message handlers
// TWSCRIPTEDIT	->
static LPCTSTR szKeywords = " SELECT FROM ALL WHERE DISTINCT INSERT WITH DROP ADD CONSTRAINT "
" VALUES INTO  GROUP BY HAVING ORDER BY COMPUTE FOR BROWSE"
" CREATE TABLE INDEX ON DEFAULT CONSTRAINT PRIMARY KEY UNIQUE CLUSTERED NONCLUSTERED FOREIGN KEY REFERENCES CHECK FOR REPLICATION"
" TRANSACTION BEGIN ROLLBACK COMMIT " 
" DISK INIT NAME PHYSNAME VDEVNO SIZE RESIZE VSTART "
" DATABASE CREATE DROP ALTER DUMP USE ON DEFAULT LOG ON FOR LOAD"
" GOTO LOAD UNLOAD FLOPPY PIPE TAPE"
" char nchar varchar nvarchar sysname tinyint smallint int integer numeric numeric numeric dec decimal real float double precision smallmoney money smalldatetime datetime timestamp bit binary varbinary text image "
" = != <> > !> <! < >= <= NOT IN BERWEEN EXISTS LIKE IS ANY ALL AND OR "
" IF GO BEGIN END " ;

static LPCTSTR szConstants =
" avg count max min sum "
" abs acos asin atan atn2 ceiling cos cot degrees exp floor log log10 pi power radians rand round sign sin sqrt tan "
" ascii char charindex char_length difference lower ltrim patindex replicate reverse right rtrim soundex space str stuff substring textptr textvalid upper "
" dateadd datediff datename datepart getdate "
" convert hextoint inttohex "
" col_length col_name curunreservedpgs data_pgs datalength db_id db_name host_id host_name index_col isnull lct_admin object_id object_name proc_role reserved_pgs rowcnt show_role suser_id suser_name used_pgs tsequal user user_id user_name valid_name "
" identity null ";
// <- TWSCRIPTEDIT



BOOL CSYBToolDlg::OnInitDialog()
{
	CResizableDialog::OnInitDialog();

	// Add "About..." menu item to system menu.

	// IDM_ABOUTBOX must be in the system command range.
	ASSERT((IDM_ABOUTBOX & 0xFFF0) == IDM_ABOUTBOX);
	ASSERT(IDM_ABOUTBOX < 0xF000);


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

	// Set the icon for this dialog.  The framework does this automatically
	//  when the application's main window is not a dialog
	SetIcon(m_hIcon, TRUE);			// Set big icon
	SetIcon(m_hIcon, FALSE);		// Set small icon
	
	nSybaseEngine =raSybaseCreate();
	if (nSybaseEngine>0){
		long hwnd=(long)(AfxGetApp()->m_pMainWnd->m_hWnd);
		long hwndStatus=(long)( GetDlgItem(IDCSTATUS)->m_hWnd) ;
		raSybaseAsynSelect(nSybaseEngine, hwnd, WM_MSG_STATUS,WM_MSG_RESULT,hwndStatus);
	}

	GetDlgItem(IDCSERVER)->SetWindowText(	AfxGetApp()->GetProfileString("SYBTOOL","srv") );
	GetDlgItem(IDCUSER)->SetWindowText( 	AfxGetApp()->GetProfileString("SYBTOOL","use") );
	GetDlgItem(IDCPASSWORD)->SetWindowText(	AfxGetApp()->GetProfileString("SYBTOOL","pwd") );

	AddAnchor(IDCEXECSQL, TOP_RIGHT);
	//AddAnchor(IDC_EDIT1, TOP_LEFT, BOTTOM_RIGHT);
	

	AddAnchor(IDC_STATIC2, BOTTOM_LEFT);
	AddAnchor(IDC_STATIC3, BOTTOM_LEFT);
	AddAnchor(IDC_STATIC4, BOTTOM_LEFT);
	AddAnchor(IDCSERVER	, BOTTOM_LEFT);
	AddAnchor(IDC_CHK_ANYSE	, BOTTOM_LEFT);
	AddAnchor(IDCUSER	, BOTTOM_LEFT);
	AddAnchor(IDCPASSWORD	, BOTTOM_LEFT);
	AddAnchor(IDCLOGIN	, BOTTOM_LEFT);
	AddAnchor(IDCLOGOUT	, BOTTOM_LEFT);
	AddAnchor(IDC_LISTSERVER, TOP_LEFT, BOTTOM_LEFT);
	
	AddAnchor(IDCSQL, TOP_LEFT, TOP_RIGHT);
	AddAnchor(IDCSTATUS, TOP_LEFT, BOTTOM_RIGHT);


	// other initializations

	// grip is visible by default
	//CheckRadioButton(IDC_RADIO1, IDC_RADIO2, IDC_RADIO2);
	//GetDlgItem(IDC_RADIO2)->SetFocus();
	// min/max size settings

	// get desktop size
	CRect rc;
	GetDesktopWindow()->GetClientRect(&rc);

	// set max tracking size to half a screen
	SetMaxTrackSize(CSize(rc.Width(), rc.Height()));

	// the application's name in the Windows directory)
	EnableSaveRestore(_T("CSYBToolDlg"), _T("Window"));

	m_status.LimitText(2147483647);
	// TODO: Add extra initialization here
	
// TWSCRIPTEDIT	->
	ModifyStyle(0, WS_CLIPCHILDREN);

	m_wndScriptEdit.SubclassDlgItem(IDCSQL, this);
	m_wndScriptEdit.Initialize();

	m_wndScriptEdit.SetCaseSensitive(FALSE);
	m_wndScriptEdit.SetStringQuotes(_T("\"\'"));
	m_wndScriptEdit.SetSLComment(_T("/*"), _T("*/"));
	m_wndScriptEdit.SetStringColor(RGB(255,128,0), FALSE);

	m_wndScriptEdit.AddKeywords(szKeywords);
	m_wndScriptEdit.AddConstants(szConstants);
// <- TWSCRIPTEDIT	
	
	hEventExeSQL =::CreateEvent(NULL,TRUE,FALSE,NULL);
	return TRUE;  // return TRUE  unless you set the focus to a control
}

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

// If you add a minimize button to your dialog, you will need the code below
//  to draw the icon.  For MFC applications using the document/view model,
//  this is automatically done for you by the framework.

void CSYBToolDlg::OnPaint() 
{
	if (IsIconic())
	{
		CPaintDC dc(this); // device context for painting

		SendMessage(WM_ICONERASEBKGND, (WPARAM) dc.GetSafeHdc(), 0);

		// Center icon in client rectangle
		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;

		// Draw the icon
		dc.DrawIcon(x, y, m_hIcon);
	}
	else
	{
		CResizableDialog::OnPaint();
	}
}

// The system calls this to obtain the cursor to display while the user drags
//  the minimized window.
HCURSOR CSYBToolDlg::OnQueryDragIcon()
{
	return (HCURSOR) m_hIcon;
}



void CSYBToolDlg::OnLogin() 
{
	char srv[32] ,use[32],pwd[32];
	
	m_srv.GetWindowText(srv,32);
	m_use.GetWindowText(use,32);
	m_pwd.GetWindowText(pwd,32);
	if (m_chkAnys.GetCheck() )
		raSybaseOpenAnsy(1, srv, use, pwd);
	else
		raSybaseOpen(1, srv, use, pwd);
}

void CSYBToolDlg::OnLogout() 
{
	raSybaseClose(nSybaseEngine);
}

void CSYBToolDlg::OnStatus(LPSTR w, long p)
{
	m_status.ReplaceSel(w);
	//AfxMessageBox("OnStatus");
}

BOOL CSYBToolDlg::DestroyWindow() 
{
	// TODO: Add your specialized code here and/or call the base class
	if (nSybaseEngine>0)
	{
		raSybaseDelete(nSybaseEngine);
	}
	return CResizableDialog::DestroyWindow();
}

int ThreadExecSql ( LPVOID parm );

void CSYBToolDlg::OnCexecsql() 
{
	AfxBeginThread(( AFX_THREADPROC )ThreadExecSql, this );

}


const   int SYB_COMMAND					=1000;
const   int SYB_CONNECTING				=(SYB_COMMAND+1);
const   int SYB_CONNECT_SUCCESSED		=(SYB_COMMAND+2);
const   int SYB_CONNECT_FAIL			=(SYB_COMMAND+3);
const   int SYB_DISCONNECTING			=(SYB_COMMAND+5);
const   int SYB_DISCONNECT_SUCCESSED	=(SYB_COMMAND+6);
const   int SYB_DISCONNECT_FAIL			=(SYB_COMMAND+7);
const   int SYB_EXECUTETING				=(SYB_COMMAND+8);
const   int SYB_EXECUTE_SUCCESSED		=(SYB_COMMAND+9);
const   int SYB_EXECUTE_FAIL			=(SYB_COMMAND+10);


void CSYBToolDlg::OnSYBRResult(WPARAM w , LPARAM cmd)
{
	switch ( cmd )
	{ case SYB_CONNECT_SUCCESSED:
		GetDlgItem(IDCEXECSQL)->EnableWindow( true );
		GetDlgItem(IDCLOGOUT)->EnableWindow( true);
		
		GetDlgItem(IDC_CHK_ANYSE)->EnableWindow( false);
		GetDlgItem(IDCSERVER)->EnableWindow( false);
		GetDlgItem(IDCUSER)->EnableWindow( false);
		GetDlgItem(IDCPASSWORD)->EnableWindow( false);
		GetDlgItem(IDCLOGIN)->EnableWindow( false);

		SaveServerMsg();
		break;
	case SYB_CONNECT_FAIL:
	case SYB_DISCONNECT_SUCCESSED:
		GetDlgItem(IDCEXECSQL)->EnableWindow( false );
		GetDlgItem(IDCLOGOUT)->EnableWindow( false );

		GetDlgItem(IDC_CHK_ANYSE)->EnableWindow( true);
		GetDlgItem(IDCSERVER)->EnableWindow( true);
		GetDlgItem(IDCUSER)->EnableWindow( true);
		GetDlgItem(IDCPASSWORD)->EnableWindow( true);
		GetDlgItem(IDCLOGIN)->EnableWindow( true);

		break;
	case SYB_EXECUTE_SUCCESSED:
	case SYB_EXECUTE_FAIL:
 		SetEvent( hEventExeSQL);
		break;

	}

}

void CSYBToolDlg::SaveServerMsg()
{