[ Neznalica_sa_ugla @ 01.02.2006. 12:30 ] @
Molim da neko pomogne Ovaj kod mi otvara bazu i vadi podatak u jednom projektu , sve ok . u drugom projektu sto problema , zasto ?? kod je :: Code: #include<stdio.h> #include"C:\Program Files\Microsoft Visual Studio\VC98\mfc\SRC\stdafx.h" #import "c:\program files\common files\system\ado\msado15.dll" rename("EOF", "EOFile") struct StartOLEProcess { StartOLEProcess() { ::CoInitialize(NULL); } ~StartOLEProcess() { ::CoUninitialize(); } } _start_StartOLEProcess; void main(void) { ADODB::_ConnectionPtr con = NULL; ADODB::_RecordsetPtr rec = NULL; ADODB::FieldPtr pPoruka,pBroj; _variant_t szPoruka,iBroj; char sPoruka[40]; char File[255], ConStr[500]; VARIANT *vRecordsAffected = NULL; strcpy(File,"MOJA_BAZA.mdb"); //naziv baze ConStr[0] = '\0'; strcat(ConStr, "Provider=Microsoft.Jet.OLEDB.4.0; Data Source= "); strcat(ConStr, File); con.CreateInstance(__uuidof(ADODB::Connection)); //MessageBox(NULL,ConStr,"con",MB_OK); con->Open(ConStr, "", "", 0); ConStr[0] = '\0'; strcpy(File,"fin"); //naziv tablice ConStr[0] = '\0'; strcat(ConStr, "SELECT * FROM "); strcat(ConStr, File); rec = con->Execute(ConStr, vRecordsAffected, 1); strcpy(File,"poruka"); //naziv kolone pBroj=rec->Fields->GetItem("id_radnje"); pPoruka = rec->Fields->GetItem("poruka"); while (!rec->EOFile) { if ((pPoruka->Type == 202) && (pBroj->Type == 2)) { iBroj.Clear(); iBroj=pBroj->Value; if(iBroj.iVal== 1) { szPoruka.Clear(); szPoruka = pPoruka->Value; WideCharToMultiByte(CP_ACP, 0, szPoruka.bstrVal, -1, sPoruka, sizeof(sPoruka), NULL, NULL); printf("\n%s", sPoruka); } } rec->MoveNext(); } rec->Close(); rec = NULL; con->Close(); con = NULL; return; } NO; ok mozda zan neko jednostavnije c++ , projekt win32 , platforma SDK ,baza Acces , a da uvjek nesto zaboravi ovo radi kada je projekt konsola a ne na win32 [Ovu poruku je menjao X Files dana 26.04.2008. u 10:48 GMT+1] |