當前位置:首頁 » 編程語言 » vcado連接sqlserver
擴展閱讀
webinf下怎麼引入js 2023-08-31 21:54:13
堡壘機怎麼打開web 2023-08-31 21:54:11

vcado連接sqlserver

發布時間: 2023-08-09 17:36:07

❶ 在vc6.0中實現使用ADO連接sql server資料庫的源代碼

#import "msado15.dll" no_namespace replace("EOF","adoEOF")

_ConnectionPtr m_Connection;
_RecordsetPtr m_Recordset;

兩個智能指針隨便用

❷ vc中怎麼連接SqlServer

以下給出一個Visual C++下使用ADO的Connection對象及其Record set對象的基本步驟:

(1) 使用import指令引入ADO2組件

例:#import "C:\ADO\msado15.dll" no_namespace rename("EOF", "EndOfFile")

(2) 定義CADORecordBinding 的派生類,用於程序與資料庫表欄位的交互,該類的定義可參見icrsint.h。

例:

class CIntlive : public CADORecordBinding
{
public:
DBTIMESTAMP m_datetime; //定義ADO記錄集欄位變數(與資料庫表欄位相對應)
long m_key;
long m_value;
long m_quality;
WORD m_stsdatetime; //定義ADO記錄集狀態變數
WORD m_stskey;
WORD m_stsvalue;
WORD m_stsquality;
BEGIN_ADO_BINDING(CIntlive) //將資料庫欄位與ADO記錄集欄位變數綁定
ADO_VARIABLE_LENGTH_ENTRY2(1,adDBTimeStamp,m_datetime,sizeof(m_datetime),m_stsdatetime,true)
ADO_NUMERIC_ENTRY(2,adInteger,m_key,10,0,m_stskey,true)
ADO_NUMERIC_ENTRY(3,adInteger,m_value,10,0,m_stsvalue,true)
ADO_NUMERIC_ENTRY(4,adInteger,m_quality,10,0,m_stsquality,true)
END_ADO_BINDING()
};

(3) 調用CoInitialize初始化COM ::CoInitialize(NULL);

(4) 聲明ADO的Connection對象指針和Recordset對象指針並初始化。(類型名在 msado15.dll中已定義)

例:

_ConnectionPtr pConnection1 = NULL;
_RecordsetPtr rstADO1 = NULL;

(5) 定義CADORecordBinding派生類的實例及其Bind介面指針。

例:

CIntlive m_intdata;
IADORecordBinding *rstADOBind1 = NULL;

(6) 產生Connection對象實例和Record set對象實例。

例:

pConnection1.CreateInstance(_uuidof(Connection));
rstADO1.CreateInstance(__uuidof(Recordset)) ;

(7) 連接到資料庫並打開Record set對象,其中open函數的參數的使用方法可參見微軟MSDN中ADO 相應對象參數的Basic描述。

例:

PConnection1->Open("driver={SQL server};server=servera;uid=sa;pwd=;database=pubs","","",NULL);
rstADO1->Open("data", _variant_t((IDispatch *)pConnection1,true),
adOpenKeyset,adLockBatchOptimistic, adCmdTable);

(8) 將CADORecordBinding派生類的實例聯編到Record set對象的Bind介面。

例:

RstADOBind1->BindToRecordset(&m_intdata);

(9) 對Record set對象實例進行操作。操作方法可參見微軟MSDN中ADO Record set對象相應方法的Basic描述。

例:

rstADO1->Move Next(); //移動游標到下一條記錄
rstADO1->Update(_variant_t("quality"),_variant_t("3"))); //修改記錄的quality欄位的值為3
rstADO1->Update Batch(adAffectAll)); //將在Record set對象上的所有更新一次送入資料庫

(10) 關閉Record set對象並釋放Bind介面。

例:

RstADO1->Close();
RstADOBind2->Release();

(11) 關閉連接 pConnection1->Close();

(12) 調用CoUnitialize釋放COM資源 ::CoUninitialize();

❸ VC中如何用ADO連接區域網SQL Server資料庫

一、ADO概述
ADO是Microsoft為最新和最強大的數據訪問範例 OLE DB 而設計的,是一個便於使用的應用程序層介面。ADO 使您能夠編寫應用程序以通過 OLE. DB 提供者訪問和操作資料庫伺服器中的數據。ADO 最主要的優點是易於使用、速度快、內存支出少和磁碟遺跡小。ADO 在關鍵的應用方案中使用最少的網路流量,並且在前端和數據源之間使用最少的層數,所有這些都是為了提供輕量、高性能的介面。之所以稱為 ADO,是用了一個比較熟悉的暗喻,OLE 自動化介面。

OLE DB是一組」組件對象模型」(COM) 介面,是新的資料庫低層介面,它封裝了ODBC的功能,並以統一的方式訪問存儲在不同信息源中的數據。OLE DB是Microsoft UDA(Universal Data Access)策略的技術基礎。OLE DB 為任何數據源提供了高性能的訪問,這些數據源包括關系和非關系資料庫、電子郵件和文件系統、文本和圖形、自定義業務對象等等。也就是說,OLE DB 並不局限於 ISAM、Jet 甚至關系數據源,它能夠處理任何類型的數據,而不考慮它們的格式和存儲方法。在實際應用中,這種多樣性意味著可以訪問駐留在 Excel 電子數據表、文本文件、電子郵件/目錄服務甚至郵件伺服器,諸如 Microsoft Exchange 中的數據。但是,OLE DB 應用程序編程介面的目的是為各種應用程序提供最佳的功能,它並不符合簡單化的要求。您需要的API 應該是一座連接應用程序和OLE DB 的橋梁,這就是 ActiveX Data Objects (ADO)。

二、在VC中使用ADO(開發步驟如下:)

1、引入ADO庫文件

使用ADO前必須在工程的stdafx.h頭文件里用直接引入符號#import引入ADO庫文件,以使編譯器能正確編譯。代碼如下所示:

用#import引入ADO庫文件
#import "c:\program files\common files\system\ado\msado15.dll"no_namespaces rename("EOF" adoEOF")
這行語句聲明在工程中使用ADO,但不使用ADO的名字空間,並且為了避免常數沖突,將常數EOF改名為adoEOF。現在不需添加另外的頭文件,就可以使用ADO介面了。

2、初始化OLE/COM庫環境
必須注意的是,ADO庫是一組COM動態庫,這意味應用程序在調用ADO前,必須初始化OLE/COM庫環境。在MFC應用程序里,一個比較好的方法是在應用程序主類的InitInstance成員函數里初始化OLE/COM庫環境。
BOOL CMyAdoTestApp::InitInstance()
{
if(!AfxOleInit())//這就是初始化COM庫
{
AfxMessageBox(「OLE初始化出錯!」);
return FALSE;
}

……

}

3、ADO介面簡介

ADO庫包含三個基本介面:_ConnectionPtr介面、_CommandPtr介面和_RecordsetPtr介面。
_ConnectionPtr介面返回一個記錄集或一個空指針。通常使用它來創建一個數據連接或執行一條不返回任何結果的SQL語句,如一個存儲過程。使用_ConnectionPtr介面返回一個記錄集不是一個好的使用方法。對於要返回記錄的操作通常用_RecordserPtr來實現。而用_ConnectionPtr操作時要想得到記錄條數得遍歷所有記錄,而用_RecordserPtr時不需要。

_CommandPtr介面返回一個記錄集。它提供了一種簡單的方法來執行返回記錄集的存儲過程和SQL語句。在使用_CommandPtr介面時,你可以利用全局_ConnectionPtr介面,也可以在_CommandPtr介面里直接使用連接串。如果你只執行一次或幾次數據訪問操作,後者是比較好的選擇。但如果你要頻繁訪問資料庫,並要返回很多記錄集,那麼,你應該使用全局_ConnectionPtr介面創建一個數據連接,然後使用_CommandPtr介面執行存儲過程和SQL語句。

_RecordsetPtr是一個記錄集對象。與以上兩種對象相比,它對記錄集提供了更多的控制功能,如記錄鎖定,游標控制等。同_CommandPtr介面一樣,它不一定要使用一個已經創建的數據連接,可以用一個連接串代替連接指針賦給_RecordsetPtr的connection成員變數,讓它自己創建數據連接。如果你要使用多個記錄集,最好的方法是同Command對象一樣使用已經創建了數據連接的全局_ConnectionPtr介面
,然後使用_RecordsetPtr執行存儲過程和SQL語句。

4、使用_ConnectionPtr介面
_ConnectionPtr主要是一個連接介面,取得與資料庫的連接。它的連接字元串可以是自己直接寫,也可以指向一個ODBCDSN。
_ConnectionPtr pConn;
if (FAILED(pConn.CreateInstance("ADODB.Connection")))
{
AfxMessageBox("Create Instance failed!");
return;
}

CString strSRC;
strSRC="Driver=SQL Server;Server=";
strSRC+="suppersoft";
strSRC+=";Database=";
strSRC+="mydb";
strSRC+=";UID=SA;PWD=";

CString strSQL = "Insert into student(no,name,sex,address) values(3,'aaa','male','beijing')";

_variant_t varSRC(strSRC);
_variant_t varSQL(strSQL);
_bstr_t bstrSRC(strSRC);

if (FAILED(pConn->Open(bstrSRC,"","",-1)))
{
AfxMessageBox("Can not open Database!");
pConn.Release();
return;
}

COleVariant vtOptional((long)DISP_E_PARAMNOTFOUND,VT_ERROR);

pConn->Execute(_bstr_t(strSQL),&vtOptional,-1);

pConn.Release();

AfxMessageBox("ok!");

5、使用_RecordsetPtr介面(以連接SQL Server為例)
_RecordsetPtr pPtr;
if (FAILED(pPtr.CreateInstance("ADODB.Recordset")))
{
AfxMessageBox("Create Instance failed!");
return FALSE;
}

CString strSRC;
strSRC="Driver=SQL Server;Server=";
strSRC+="210.46.141.145";
strSRC+=";Database=";
strSRC+="mydb";
strSRC+=";UID=sa;PWD=";
strSRC+="sa";

CString strSQL = "select id,name,gender,address from personal";

_variant_t varSRC(strSRC);
_variant_t varSQL(strSQL);

if(FAILED(pPtr->Open(varSQL,varSRC,adOpenStatic,adLockOptimistic,adCmdText)))
{
AfxMessageBox("Open table failed!");
pPtr.Release();
return FALSE;
}

while(!pPtr->GetadoEOF())
{
_variant_t varNo;
_variant_t varName;
_variant_t varSex;
_variant_t varAddress;

varNo = pPtr->GetCollect ("id");
varName = pPtr->GetCollect ("name");
varSex = pPtr->GetCollect ("gender");
varAddress = pPtr->GetCollect ("address");

CString strNo =(char *)_bstr_t(varNo);
CString strName =(char *)_bstr_t(varName);
CString strSex =(char *)_bstr_t(varSex);
CString strAddress =(char *)_bstr_t(varAddress);

strNo.TrimRight();
strName.TrimRight();
strSex.TrimRight();
strAddress.TrimRight();

int nCount = m_list.GetItemCount();
int nItem = m_list.InsertItem (nCount,_T(""));
m_list.SetItemText (nItem,0,strNo);
m_list.SetItemText (nItem,1,strName);
m_list.SetItemText (nItem,2,strSex);
m_list.SetItemText (nItem,3,strAddress);

pPtr->MoveNext();
}

pPtr->Close();
pPtr.Release();

6、使用_CommandPtr介面
_CommandPtr介面返回一個Recordset對象,並且提供了更多的記錄集控制功能,以下代碼示例了使用_CommandPtr介面的方法:

代碼:使用_CommandPtr介面獲取數據
_CommandPtr pCommand;
_RecordsetPtr pRs;
pCommand.CreateInstance(__uuidof(Command));
pCommand->ActiveConnection=pConn;
pCommand->CommandText="select * from student";
pCommand->CommandType=adCmdText;
pCommand->Parameters->Refresh();
pRs=pCommand->Execute(NULL,NULL,adCmdUnknown);
_variant_t varValue = pRs->GetCollect("name");
Cstring strValue=(char*)_bstr_t(varValue);

7、關於數據類型轉換由於COM對象是跨平台的,它使用了一種通用的方法來處理各種類型的數據,因此Cstring 類和COM對象是不兼容的,我們需要一組API來轉換COM對象和C++類型的數據。_vatiant_t和_bstr_t就是這樣兩種對象。它們提供了通用的方法轉換COM對象和C++類型的數據。

❹ 使用ADO連接sqlserver資料庫 在有的電腦可以 有的電腦連接不上是什麼原因

"\"在C語言的作用忘記了?如果資料庫存放位置是本機,建議使用127.0.0.1否則:如果是公網,則用域名,區域網則用IP最好是將連接字串寫在非EXE里,這樣方便發布和修改資料庫伺服器位置、帳號密碼還有,vc中連通前,你應該在mssql管理器中嘗試連接,如果在mssql管理器中都連接不能,則問題不出在VC中caseDATABASE_MSSQL:strcpy_s(data,"Driver={SQLServer};");strcat_s(data,"Server=");strcat_s(data,addr);if(addr[0]!='.')//如果伺服器地址使用".",則不能加埠{strcat_s(data,",");strcat_s(data,port);}strcat_s(data,";");strcat_s(data,"UID=");strcat_s(data,user);strcat_s(data,";");strcat_s(data,"PWD=");strcat_s(data,pwd);strcat_s(data,";");if(strlen(database)){strcat_s(data,"Database=");strcat_s(data,database);strcat_s(data,";");}上面是連接字元串生成代碼,下面是打開連接的函數intCAdoDataBase::Open(constchar*data){intret=0;memset(m_strLogin,0,1024);strcpy_s(m_strLogin,data);this->Lock();do{try{m_pConnection.CreateInstance(__uuidof(Connection));ret=m_pConnection->Open((_bstr_t)data,"","",adModeUnknown);m_bFlag=TRUE;ret=0;}catch(_com_errore){m_bFlag=FALSE;strcpy_s(m_strErrCode,e.Description());m_pConnection=NULL;ret=-1;}}while(FALSE);this->UnLock();returnret;}