C++用ADO连接SQL数据库出错

xiao2076

//类文件
# K, `4 h. w9 s$ }5 g' ]#pragma once
#include "iostream"     
( I# t. Q7 [8 S$ L# Q, B0 t9 X#include "string"     
#include "vector"     

1 t: D, J) _- X//添加对ADO的支持   
#import "C:\Program Files\Common Files\System\ado\msado15.dll" no_namespace rename("EOF","adoEOF")
' Q3 _, ~3 y) h  k! U#include <NXOpen\Session.hxx>

#include "uf.h"
' ~+ s4 X! x9 X1 |' `3 v#include "uf_ui.h"
#include <NXOpen/UI.hxx>
#include <NXOpen/NXMessageBox.hxx>
#include <sstream>
) i, k# i% W2 h5 m. s+ g; j: ?. s#include <NXOpen/ListingWindow.hxx>
7 ?) n6 ]$ L, I) i. fusing namespace NXOpen;
using namespace std;
class LinkSQL
{
6 m, I% e/ d, k1 Ypublic:
        LinkSQL(void);
' f, T  f) ]% X& m        ~LinkSQL(void);
0 d8 m' Z1 t9 p8 M        void OpenSQL();
        void ShowInformation();
, Z& a* w# W0 j        void CloseSQL();
private:
        Session *theSession;
' E7 r& F) Y5 d. j- P        UI *theUI;
. S, y9 z( B% [! ?        _ConnectionPtr pMyConnect;
/ B' J, g! ~- e% F9 _2 e1 n: y0 e3 F        _RecordsetPtr pRst;
* s/ E/ t2 Y9 f  t- W        stringstream ss;
};

( d3 e8 {+ R2 Q. g% DLinkSQL:inkSQL(void)
1 U9 x! ?4 \. W& |{
* z+ ~) ]. u( u" A        CoInitialize(NULL); //初始化COM环境              
        _ConnectionPtr pMyConnect(__uuidof(Connection));//定义连接对象并实例化对象   
  ?- B$ x$ ^) a3 y        _RecordsetPtr pRst(__uuidof(Recordset));//定义记录集对象并实例化对象  
        theSession=Session::GetSession();
$ I! O+ g' e$ _$ M5 g        theUI=UI::GetUI();
; x7 A# c( V( M' N4 u* \% @4 S}
' z7 v' k7 J: P/ S3 ^# m

$ i7 a5 v; J4 W  e* m4 ^LinkSQL::~LinkSQL(void)
7 ?/ U( n' A% C- K( Z{
}
, _  G, U3 r  y- S! n/ C( v) m( @void LinkSQL::OpenSQL()
{
        try            
% ^) r, S7 A+ Q% d0 r: ~. y9 u. S        {               
! ?# b- K+ L* z/ d1 @* s. i       
                /*打开数据库“SQLServer” */               
, u- `9 Q0 ]7 Q0 G                pMyConnect->Open("rovider=SQLOLEDB; Server=192.128.28.32;Database=test; uid=sa; pwd=123;","","",adModeUnknown);  
' `4 y9 q8 ~2 [3 j0 M                    
        }   
        caTCh (_com_error &e)            
& b& B: ?6 Z6 I# N6 J1 @        {               
                 
; }8 Z) l% Y* M2 |: I, d+ m( ^                ss<<e.ErrorMessage();     
. P/ E# X. [, U2 f- B% u                theUI->NXMessageBox()->Show("系统信息",NXMessageBox:ialogTypeError,ss.str());
. l7 c, I% @. B  {* ]                ss.str("");
                           
        }            
# C+ @& _8 h5 J3 Q+ W                         
& u' M: w9 I* I3 j# G" @1 E* ^}
+ Y9 E2 }$ Y' V* X0 \  ~void LinkSQL::CloseSQL()
( [( i( @" z, ~7 h! H$ Q{
' e1 B+ C8 R& Y7 t+ I. y        try            
) B4 T/ q7 _* Z$ P8 S        {                 

2 n- f( Q. x' ?/ [" @& }                pRst->Close();     //关闭记录集                  
% D7 I6 g, w* O6 M) L4 r* i' L                pMyConnect->Close();//关闭数据库                  
9 @" h4 a2 b% X+ J2 N* s1 u                pRst.Release();//释放记录集对象指针                  
                pMyConnect.Release();//释放连接对象指针   
        }  
! ^! e) S9 W! ]2 V. ~        catch(_com_error &e)            
        {                 
1 G( j0 P4 q. e/ y                ss<<e.ErrorMessage();     
1 g, C) J. s* J" d/ \5 _+ p                theUI->NXMessageBox()->Show("系统信息",NXMessageBox:ialogTypeError,ss.str());
                ss.str("");         
        }                  
9 w1 X! j1 ?2 n1 \7 t+ z! s       
) A2 }( R3 c/ G4 U8 v) z5 S5 J        CoUninitialize(); //释放COM环境   
, v2 n; V7 ?7 r/ s: Z# M4 v$ `}
9 s& p/ k4 o9 P- [$ `) I; ?7 _void LinkSQL::ShowInformation()
{
1 F, a) h" z$ ]6 _$ Z
( j- p/ c. ~9 I  ]: ]1 {        ListingWindow *thwLW=theSession->ListingWindow();
        thwLW->Open();

        try
        {
, n( n' l5 O+ a" _- e. Y# \                pRst = pMyConnect->Execute("select * from 表格1",NULL,adCmdText);//执行SQL： select * from gendat   
        }
" ~: `7 D" d7 m8 t( b        catch(_com_error &e)
$ t7 z; `. P6 v; T- X        {
       
& I; M1 z; r8 V. L' }7 i                ss<<e.ErrorMessage();
7 R3 O- u/ I3 e. y  z6 R                thwLW->WriteLine(ss.str());
                ss.str("");
! `- R; o, j9 x5 Z; H! b                return;
        }
, \2 U+ \% ?/ ^: ~1 D}
//执行文件
4 o* L0 D  a9 z, R4 _6 g  M  ~# T        LinkSQL *theLinkSQL=new LinkSQL;
9 ~8 d1 D6 F0 y) _        theLinkSQL->OpenSQL();
4 c- n- M4 }- n* M& b, B- J% I        theLinkSQL->ShowInformation();
$ g: V" U. u) I* J. n; s) e        theLinkSQL->CloseSQL();
0 _  L0 d, H: l        delete theLinkSQL;
+ Q  [  y" o6 _* ^+ y, @
. Q/ S! P$ n# ]2 M" t. Y5 E- Z+ q  V/ q哪个地方出错了，在控制台程序的时候没问题，在UG中就会出错