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;
}
#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]