高手快进：Runtime Error!

[phoenixsoft]

我想做一个基于单文档的数据库(SQL Server)程序，通过选择菜单弹出一个对话框，输入相应的数据后单击OK按钮保存。但是在我单击OK按钮后，弹出两个错误对话框，内容分别如下：
1、Runtime Error!
program: F:\DB1.exe
abnormal program termination
2、
"0x6681250e" 指令引用的"0x0586f00f"内存。该内存不能为"written"。
要终止程序，请单击"确定"。
然后程序自动退出。

该如何解决？
还有。我对如何调试程序一窍不通，有没有人传授一下经验，或推荐一些教程之类的，不胜感激。

[netrouter]

如果你是用VC6.0，我想你需要首先应该对VC的Debug功能进行一些了解。
比如，一些VC的入门读物或者看看MSDN了解VC如何进行Debug。

[smch]

用
try
{
}
catch
{
}
捕捉错误。否则你这样的程序投入正常使用就麻烦了。

[sunheroshang]

build->start dubug->go
调出你的对话框，操作，找到发生错误的位置
或者在OnOk处设定断点后调试

[fireant25]

可能是数据库连接或者数据库操作导致的错误。

你可以用F9在OnOK函数里设置断点，然后
按F5开始调试，程序运行到断点处以后，你
可以按F10进行单步跟踪。

[bluestar]

单击OK按钮的消息处理函数中设断点，一步一步看看哪里出错。

[ForFar]

这样的错误一般都是非法访问内存引起的，一步步单步调试跟踪下去，看看指针或数组有无反问违例。

[phoenixsoft]

程序已经贴出来了，怎么没人看啊？

[phoenixsoft]

我调试了一下，发现在运行到这个if语句时：
if (theApp.ADOExecute(theApp.m_pADORecord,strQuery))

弹出以下的错误提示：
Unhandled exception in DB1.exe(KERNEL32.DLL):0xE06D7363:Microsoft C++ exception
点击OK后跳到一个汇编语言的调试窗口。

我在这个程序的App类中这样定义了theApp ：
extern CDB1App theApp;

ADOExecute(theApp.m_pADORecord,strQuery)是CDB1App类的成员函数，功能是进行数据库操作。

大家帮我看看有什么问题？

[fanzai]

CDB1App 是如何定义的？
如果可以把程序贴出来看看。

[phoenixsoft]

DB1.h
////////////////////////////////////

#if !defined(AFX_DB1_H__ADCF8416_55EA_4533_A352_5688D57F0D60__INCLUDED_)
#define AFX_DB1_H__ADCF8416_55EA_4533_A352_5688D57F0D60__INCLUDED_

#if _MSC_VER > 1000
#pragma once
#endif // _MSC_VER > 1000

#ifndef __AFXWIN_H__
#error include 'stdafx.h' before including this file for PCH
#endif

#include "resource.h" // main symbols

/////////////////////////////////////////////////////////////////////////////
// CDB1App:
// See DB1.cpp for the implementation of this class
//

class CDB1App : public CWinApp
{
public:
bool ADOExecute(_RecordsetPtr &ADO,_variant_t &strSQL);
_RecordsetPtr m_pADORecord;
CString m_strCurrentUser;
CDB1App();

// Overrides
// ClassWizard generated virtual function overrides
//{{AFX_VIRTUAL(CDB1App)
public:
virtual BOOL InitInstance();
virtual int ExitInstance();
//}}AFX_VIRTUAL

// Implementation
//{{AFX_MSG(CDB1App)
afx_msg void OnAppAbout();
// NOTE - the ClassWizard will add and remove member functions here.
// DO NOT EDIT what you see in these blocks of generated code !
//}}AFX_MSG
DECLARE_MESSAGE_MAP()
private:
_ConnectionPtr ADOConn;
};

extern CDB1App theApp;

/////////////////////////////////////////////////////////////////////////////

//{{AFX_INSERT_LOCATION}}
// Microsoft Visual C++ will insert additional declarations immediately before the previous line.

#endif // !defined(AFX_DB1_H__ADCF8416_55EA_4533_A352_5688D57F0D60__INCLUDED_)



DB1.cpp
///////////////////////////////////////
#include "stdafx.h"
#include "DB1.h"

#include "MainFrm.h"
#include "DB1Doc.h"
#include "DB1View.h"

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

/////////////////////////////////////////////////////////////////////////////
// CDB1App

BEGIN_MESSAGE_MAP(CDB1App, CWinApp)
//{{AFX_MSG_MAP(CDB1App)
ON_COMMAND(ID_APP_ABOUT, OnAppAbout)
// NOTE - the ClassWizard will add and remove mapping macros here.
// DO NOT EDIT what you see in these blocks of generated code!
//}}AFX_MSG_MAP
// Standard file based document commands
ON_COMMAND(ID_FILE_NEW, CWinApp::OnFileNew)
ON_COMMAND(ID_FILE_OPEN, CWinApp::OnFileOpen)
END_MESSAGE_MAP()

/////////////////////////////////////////////////////////////////////////////
// CDB1App construction

CDB1App::CDB1App()
{
// TODO: add construction code here,
// Place all significant initialization in InitInstance
}

/////////////////////////////////////////////////////////////////////////////
// The one and only CDB1App object

CDB1App theApp;

/////////////////////////////////////////////////////////////////////////////
// CDB1App initialization

BOOL CDB1App::InitInstance()
{
// Initialize OLE libraries
if (!AfxOleInit())
{
AfxMessageBox(IDP_OLE_INIT_FAILED);
return FALSE;
}

AfxEnableControlContainer();

// Standard initialization
// If you are not using these features and wish to reduce the size
// of your final executable, you should remove from the following
// the specific initialization routines you do not need.

#ifdef _AFXDLL
Enable3dControls(); // Call this when using MFC in a shared DLL
#else
Enable3dControlsStatic(); // Call this when linking to MFC statically
#endif

// Create ADO Connection
if( FAILED(::CoInitialize(NULL)) )
{
AfxMessageBox("ADO Init failed");
return false;
}
try
{
ADOConn.CreateInstance(__uuidof(Connection));
ADOConn->Open("DSN=Hotel_MIS;User ID=Administrator;pwd=fhz;Provider=MSDASQL","","", adConnectUnspecified);

}
// Catch Exceptions
catch(_com_error &e)
{
CString err;
err.Format("%s", (char*)(e.Description()) );
AfxMessageBox(err);
}
catch(...)
{
AfxMessageBox("Unknown Error...");
}

// Change the registry key under which our settings are stored.
// TODO: You should modify this string to be something appropriate
// such as the name of your company or organization.
SetRegistryKey(_T("Local AppWizard-Generated Applications"));

LoadStdProfileSettings(); // Load standard INI file options (including MRU)

// Register the application's document templates. Document templates
// serve as the connection between documents, frame windows and views.

CSingleDocTemplate* pDocTemplate;
pDocTemplate = new CSingleDocTemplate(
IDR_MAINFRAME,
RUNTIME_CLASS(CDB1Doc),
RUNTIME_CLASS(CMainFrame), // main SDI frame window
RUNTIME_CLASS(CDB1View));
pDocTemplate->SetContainerInfo(IDR_CNTR_INPLACE);
AddDocTemplate(pDocTemplate);

// Parse command line for standard shell commands, DDE, file open
CCommandLineInfo cmdInfo;
ParseCommandLine(cmdInfo);

// Dispatch commands specified on the command line
if (!ProcessShellCommand(cmdInfo))
return FALSE;

// The one and only window has been initialized, so show and update it.
m_pMainWnd->ShowWindow(SW_SHOW);
m_pMainWnd->SetWindowText(_T("数据库实验程序"));
m_pMainWnd->UpdateWindow();

return TRUE;
}


/////////////////////////////////////////////////////////////////////////////
// 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)
// No message handlers
//}}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()

// App command to run the dialog
void CDB1App::OnAppAbout()
{
CAboutDlg aboutDlg;
aboutDlg.DoModal();
}

/////////////////////////////////////////////////////////////////////////////
// CDB1App message handlers


bool CDB1App::ADOExecute(_RecordsetPtr &ADO, _variant_t &strSQL)
{
if ( ADO->State == adStateOpen) ADO->Close();
try
{
ADO->Open(strSQL, ADOConn.GetInterfacePtr(), adOpenStatic, adLockOptimistic, adCmdUnknown);
return true;
}
catch(_com_error &e)
{
CString err;
err.Format("ADO Error: %s",(char*)e.Description());
AfxMessageBox(err);
return false;
}
}

int CDB1App::ExitInstance()
{
// TODO: Add your specialized code here and/or call the base class
if (adStateOpen == ADOConn->State) ADOConn->Close(); //释放ADO Connection
ADOConn->Release();
if (adStateOpen == m_pADORecord->State) m_pADORecord->Close(); //释放ADO RecordSet
m_pADORecord->Release();
return CWinApp::ExitInstance();
}

[phoenixsoft]

up!!!