Skip to content
  • Categories
  • Recent
  • Tags
  • Popular
  • World
  • Users
  • Groups
Skins
  • Light
  • Cerulean
  • Cosmo
  • Flatly
  • Journal
  • Litera
  • Lumen
  • Lux
  • Materia
  • Minty
  • Morph
  • Pulse
  • Sandstone
  • Simplex
  • Sketchy
  • Spacelab
  • United
  • Yeti
  • Zephyr
  • Dark
  • Cyborg
  • Darkly
  • Quartz
  • Slate
  • Solar
  • Superhero
  • Vapor

  • Default (No Skin)
  • No Skin
Collapse
Code Project
B

bugbuster

@bugbuster
About
Posts
1
Topics
1
Shares
0
Groups
0
Followers
0
Following
0

Posts

Recent Best Controversial

  • Automation Error
    B bugbuster

    Hi everyone, I'm having trouble with an Access query. My program does one connection to the db and several queries, but only the first one is going through, the second one throws Error '-2147417851 (8001015)' which is an automation error. I'v searched for the cause and it says it's because the server is throwing an exception. I read in Microsoft's support site and found out that I need to do late binding, but I believe that's what I'm doing. The code is this: int CDBAccess::cargaConfig(char *pszComponente, CConfig *poConfig) { _RecordsetPtr rs; HRESULT hr; _variant_t conn; char szQuery[256]; char szTemp[30]; FieldPtr campo; try { hr = rs.CreateInstance("ADODB.Recordset"); if(FAILED(hr)) { m_nError = 506;//error al crear rs return m_nError; } conn = (IDispatch*) m_Conec; } catch(_com_error & err) { MessageBox(NULL,(LPCTSTR) err.Description(), "CargaConfig", MB_OK); return -1; } //se hace el query sprintf(szQuery, "select * from configuracion where componente = '%s'", pszComponente); _bstr_t qry(szQuery); FILE *fd; fd = fopen("C:\\usr\\sia\\query.txt","w"); fprintf(fd,"%s",(char *)qry); fclose(fd); //MessageBox(NULL,(char *)qry, "cargaConfig",0); try { hr = rs->Open(qry, conn, adOpenStatic, adLockOptimistic, adCmdText); if(FAILED(hr)) { m_nError = 507;//error al abrir rs return m_nError; } } catch(_com_error & err) { MessageBox(NULL,(LPCTSTR) err.Description(), "CargaConfig", MB_OK); return -1; } try { //se leen los datos campo = rs->Fields->Item["timeout"]; _bstr_t to = campo->Value; sprintf(szTemp, "%s", (char *)to); poConfig->iTimeout = atoi(szTemp); campo = rs->Fields->Item["canal_comunicacion"]; _bstr_t can = campo->Value; sprintf(poConfig->szCanalComm, "%s", (char *)can); campo = rs->Fields->Item["id_canal"]; _bstr_t idcan = campo->Value; sprintf(poConfig->szIdCanal, "%s", (char *)idcan); campo = rs->Fields->Item["objeto"]; _bstr_t obj = campo->Value; sprintf(poConfig->szObjeto, "%s", (char *)obj); campo = rs->Fields->Item["prioridad"]; _bstr_t pri = campo->Value; sprintf(poConfig->szPriori, "%s", (char *)pri); hr = rs->Close(); if(FAILED(hr)) { m_nError = 508;//error al cerrar rs return m_nError; } //rs = NULL; } catch(_com_error & err) { MessageBox(NULL,(LPCTSTR)err.Description(),"CargaConfig",0); return -1; }

    Database database wpf wcf sysadmin testing
  • Login

  • Don't have an account? Register

  • Login or register to search.
  • First post
    Last post
0
  • Categories
  • Recent
  • Tags
  • Popular
  • World
  • Users
  • Groups