数据库服务器已连上,要执行操作时出现对话框”对象关闭时不允许操作“,是何原因

解决方案 »

  1.   

    连接如下:
    // ADOConn.cpp: implementation of the ADOConn class.
    //
    //////////////////////////////////////////////////////////////////////#include "stdafx.h"
    #include "stdafx.h"
    #include "ADOConn.h"
    #include "kaowu.h"#ifdef _DEBUG
    #undef THIS_FILE
    static char THIS_FILE[]=__FILE__;
    #define new DEBUG_NEW
    #endif#import "c:\Program Files\Common Files\System\ado\msado15.dll" no_namespace rename("EOF","adoEOF") rename("BOF","adoBOF")//////////////////////////////////////////////////////////////////////
    // Construction/Destruction
    //////////////////////////////////////////////////////////////////////ADOConn::ADOConn()
    {}ADOConn::~ADOConn()
    {}void ADOConn::ConnectDb()
    {
    ::CoInitialize(NULL);
    m_pConnection.CreateInstance(__uuidof(Connection));

    try
    {
    m_pConnection->Open("Provider=MSDAORA.1;Data Source=gz_zjc;Persist Security Info=False","osta","osta9213",adModeUnknown);
    if(m_pConnection == NULL)
    AfxMessageBox("不能连接数据库!");
    }
    catch (_com_error e) 
    {
    AfxMessageBox(e.Description());
    }
    }_RecordsetPtr & ADOConn::GetRecordSet(_bstr_t bstrSQL)
    {
    try
    {
    if(m_pConnection == NULL)
    ConnectDb();

    m_pRecordset.CreateInstance(__uuidof(Recordset));
    //取得表中的记录
    m_pRecordset->Open(bstrSQL,m_pConnection.GetInterfacePtr(),adOpenDynamic,adLockOptimistic,adCmdText);
    }
    catch (_com_error e)
    {
    AfxMessageBox(e.Description());
    }

    return m_pRecordset;
    }BOOL ADOConn::ExecuteSQL(_bstr_t bstrSQL)
    {
    try
    {
    if(m_pConnection == NULL)
    ConnectDb();

    m_pConnection->Execute(bstrSQL,NULL,adCmdText);
    return true;
    }
    catch (_com_error e) 
    {
    AfxMessageBox(e.Description());
    return false;
    }
    }void ADOConn::ExitConnect()
    {
    m_pConnection->Close();
    ::CoUninitialize();
      

  2.   

    // kaowuDlg.cpp : implementation file
    //
    #include "stdafx.h"
    #include "ADOConn.h"
    #include "column.h"
    #include "columns.h"
    #include "kaowu.h"
    #include "kaowuDlg.h"#ifdef _DEBUG
    #define new DEBUG_NEW
    #undef THIS_FILE
    static char THIS_FILE[] = __FILE__;
    #endif/////////////////////////////////////////////////////////////////////////////
    // CAboutDlg dialog used for App Aboutclass 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()/////////////////////////////////////////////////////////////////////////////
    // CKaowuDlg dialogCKaowuDlg::CKaowuDlg(CWnd* pParent /*=NULL*/)
    : CDialog(CKaowuDlg::IDD, pParent)
    {
    //{{AFX_DATA_INIT(CKaowuDlg)
    // NOTE: the ClassWizard will add member initialization here
    //}}AFX_DATA_INIT
    // Note that LoadIcon does not require a subsequent DestroyIcon in Win32
    m_hIcon = AfxGetApp()->LoadIcon(IDR_MAINFRAME);
    }void CKaowuDlg::DoDataExchange(CDataExchange* pDX)
    {
    CDialog::DoDataExchange(pDX);
    //{{AFX_DATA_MAP(CKaowuDlg)
    DDX_Control(pDX, IDC_ADODC1, m_adodc);
    DDX_Control(pDX, IDC_DATAGRID1, m_datagrid);
    //}}AFX_DATA_MAP
    }BEGIN_MESSAGE_MAP(CKaowuDlg, CDialog)
    //{{AFX_MSG_MAP(CKaowuDlg)
    ON_WM_SYSCOMMAND()
    ON_WM_PAINT()
    ON_WM_QUERYDRAGICON()
    ON_BN_CLICKED(IDC_tips, Ontips)
    //}}AFX_MSG_MAP
    END_MESSAGE_MAP()/////////////////////////////////////////////////////////////////////////////
    // CKaowuDlg message handlersBOOL CKaowuDlg::OnInitDialog()
    {
    CDialog::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

    // TODO: Add extra initialization here

    return TRUE;  // return TRUE  unless you set the focus to a control
    }void CKaowuDlg::OnSysCommand(UINT nID, LPARAM lParam)
    {
    if ((nID & 0xFFF0) == IDM_ABOUTBOX)
    {
    CAboutDlg dlgAbout;
    dlgAbout.DoModal();
    }
    else
    {
    CDialog::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 CKaowuDlg::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
    {
    CDialog::OnPaint();
    }
    }// The system calls this to obtain the cursor to display while the user drags
    //  the minimized window.
    HCURSOR CKaowuDlg::OnQueryDragIcon()
    {
    return (HCURSOR) m_hIcon;
    }
    void CKaowuDlg::Ontips() 
    {
    UpdateData(true);

            CString strSQL; strSQL = "(select SENDINID from SENDINREPORT_TAB where days_after(MARKDATE,sysdate)>14 and LEVELCODE=1 and MARKSIGN=0) union";

    strSQL+= "(select SENDINID from SENDINREPORT_TAB where days_after(MARKDATE,sysdate)>14 and LEVELCODE=2 and MARKSIGN=0) union ";

    strSQL+= "(select SENDINID from SENDINREPORT_TAB where days_after(MARKDATE,sysdate)>14 and LEVELCODE=3 and MARKSIGN=0) union ";

    strSQL+= "(select SENDINID from SENDINREPORT_TAB where days_after(MARKDATE,sysdate)>21 and LEVELCODE=4 and MARKSIGN=0) union ";

    strSQL+= "(select SENDINID from SENDINREPORT_TAB where days_after(MARKDATE,sysdate)>21 and LEVELCODE=5 and MARKSIGN=0)";  m_adodc.SetRecordSource(strSQL);
    m_adodc.Refresh();    

    _variant_t vIndex;
    vIndex = long(0);
    m_datagrid.GetColumns().GetItem(vIndex).SetWidth(120);


    }void CKaowuDlg::OnOK() 
    {
    // TODO: Add extra validation here

    CDialog::OnOK();
    }