Создание файла Excel используя ODBC"

24.03.2009, 20:20. **Показов** 4927. **Ответов** 3

Студворк — интернет-сервис помощи студентам

Не могу запустить этот пример... http://www.cyberguru.ru/cpp-sources/db/sozdanie-fajla-excel-ispolzuya-odbc.html

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
#include <AFXDB.H> 
 
// 
void main( int argc, char * argv[] ) 
//void MyDemo::Put2Excel()
{
  CDatabase database;
  CString sDriver = "MICROSOFT EXCEL DRIVER (*.XLS)";
  CString sExcelFile = "c:\\demo.xls";               
  CString sSql;
    
  TRY
  {
    
    sSql.Format("DRIVER={%s};DSN='';FIRSTROWHASNAMES=1;READONLY=FALSE;CREATE_DB=\"%s\";DBQ=%s",
                sDriver, sExcelFile, sExcelFile);
 
      if( database.OpenEx(sSql,CDatabase::noOdbcDialog) )
    {
      sSql = "CREATE TABLE demo (Name TEXT,Age NUMBER)";
      database.ExecuteSQL(sSql);
 
      sSql = "INSERT INTO demo (Name,Age) VALUES ('Bruno Brutalinsky',45)";
      database.ExecuteSQL(sSql);
 
      sSql = "INSERT INTO demo (Name,Age) VALUES ('Fritz Pappenheimer',30)";
      database.ExecuteSQL(sSql);
 
      sSql = "INSERT INTO demo (Name,Age) VALUES ('Hella Wahnsinn',28)";
      database.ExecuteSQL(sSql);
    }      
 
    database.Close();
  }
  CATCH_ALL(e)
  {
    TRACE1("Driver not installed: %s",sDriver);
  }
  END_CATCH_ALL;
}

Добавлено через 3 минуты 23 секунды
Debuger выдает ошибку 0xC0000005: Access Violation

oxotnik · 24.03.2009, 20:49

ну как минимум надо CDatabase открыть

24.03.2009, 22:34

она открыта

C++
1
 if( database.OpenEx(sSql,CDatabase::noOdbcDialog) )

@YurA_280784 · 25.03.2009, 09:16

cplusiv,
держи функцию экспорта в EXCEL данных из Access из моей проги, убери всё что касается m_pView(это CRecordView для mdb - ного файла), а таблица создаётся как раз как ты хочешь, погляди...

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
void CWriteMDBDlg::OnExport() 
{
    // TODO: Add your command handler code here
    CRect m_pRect;
    CFileDialog fDlg(false);
    if(m_pView)
    {
        CDialog::GetWindowRect(&m_pRect);
        int cx = m_pRect.right - m_pRect.left;
        int cy = m_pRect.bottom - m_pRect.top - 54;
 
        strcpy(fDlg.m_ofn.lpstrFile,m_pView->m_pSet->GetTableName());
 
        fDlg.m_ofn.lpstrTitle  = "Select database";
        fDlg.m_ofn.lpstrFilter = "(*.xls)\0*.xls\0";
        fDlg.m_ofn.lpstrDefExt = "xls";
        if(fDlg.DoModal() == IDOK)
        {
//          char chPath[MAX_PATH];
//          GetShortPathName(fDlg.m_ofn.lpstrFile,chPath,MAX_PATH);
            CString sDSN         = "DSN=New Excel Data Source;";
            CString sDescr       = "Description=New Excel Data Source;";
            CString sDrvID       = "DriverId=278;";
            CString sDefDir      = "DefaultDir=" + (CString)fDlg.m_ofn.lpstrFile + ";";
//          CString sDefDir      = "DefaultDir=" + (CString)chPath + ";";
            CString sMaxRows     = "MaxScanRows=256;";
            CString sAtrb = sDSN + sDescr + sDrvID + sDefDir + sMaxRows;
            m_stat1_1 = "ODBC config Error" ;
            if (
                SQLConfigDataSource
                (
                    NULL,
                    ODBC_ADD_DSN,   
                    "Microsoft Excel Driver (*.xls)",
                    sAtrb
                    )
               )
            {
                m_stat1_1 = m_pView->m_pSet->GetTableName();
                CString str = "CREATE TABLE " + m_stat1_1;
                str += "([Код] LONG, [Поле1] TEXT, ";
                str += "[Столбец1] DOUBLE, ";
                str += "[Столбец2] DOUBLE, ";
                str += "[Столбец3] DOUBLE, ";
                str += "[Столбец4] DOUBLE, ";
                str += "[Столбец5] DOUBLE, ";
                str += "[Столбец6] DOUBLE, [Столбец7] DOUBLE)";
                CDatabase *pdb = new CDatabase();
                try
                {
                    pdb->OpenEx(sDSN,CDatabase::noOdbcDialog );
                    pdb->ExecuteSQL(str);
                }
                catch(CDBException *pCDBThrow)
                {
                    AfxMessageBox(pCDBThrow->m_strError);
                    pCDBThrow->Delete();
                }
                str.Format("INSERT INTO %s (%s,%s,%s,%s,%s,%s,%s,%s,%s)",
                    m_stat1_1,
                    "[Код]",
                    "[Поле1]",
                    "[Столбец1]",
                    "[Столбец2]",
                    "[Столбец3]",
                    "[Столбец4]",
                    "[Столбец5]",
                    "[Столбец6]",
                    "[Столбец7]");
                m_stat1_1 = str;
                
                m_pView->m_pSet->MoveFirst();
                while(!m_pView->m_pSet->IsEOF())
                {
str.Format("%s VALUES(\'%d\',\'%s\',\'%.f\',\'%.f\',\'%.f\',\'%.f\',\'%.f\',\'%.f\',\'%.f\');",
                    m_stat1_1,
                    m_pView->m_pSet->m_column1,
                    m_pView->m_pSet->m_____1,
                    m_pView->m_pSet->m________1,
                    m_pView->m_pSet->m________2,
                    m_pView->m_pSet->m________3,
                    m_pView->m_pSet->m________4,
                    m_pView->m_pSet->m________5,
                    m_pView->m_pSet->m________6,
                    m_pView->m_pSet->m________7);
                    m_pView->m_pSet->MoveNext();
                    try
                    {
                        pdb->ExecuteSQL(str);
                    }
                    catch(CDBException *pCDBThrow)
                    {
                        AfxMessageBox(pCDBThrow->m_strError);
                        pCDBThrow->Delete();
                    }
                }
                m_stat1_1 = (CString)"SQLConfigSource(\r\n" + 
                            "\tNULL,        \r\n"   + 
                            "\tODBC_ADD_DSN,\r\n"   +
                            "\t\"Microsoft Excel Driver (*.xls)\",\r\n" + 
                            "\t" + sAtrb + "\r\n) : OK\r\n";
                m_stat1_1 += "pdb->OpenEx(sDSN,CDatabase::noOdbcDialog) :\r\n";
                m_stat1_1 +=  pdb->GetConnect();
                pdb->Close();
                m_list1.ShowWindow(SW_HIDE);
                m_stat1.MoveWindow(0,0,cx,cy,true);
            }
        }
    }
    UpdateData(false);
}

Новые блоги и статьи Все статьи Все блоги /
SDL3 для Web (WebAssembly): Обработчик клика мыши в браузере ПК и касания экрана в браузере на мобильном устройстве 8Observer8 02.02.2026 Содержание блога Для начала пошагово создадим рабочий пример для подготовки к экспериментам в браузере ПК и в браузере мобильного устройства. Потом напишем обработчик клика мыши и обработчик. . .	Философия технологии iceja 01.02.2026 На мой взгляд у человека в технических проектах остается роль генерального директора. Все остальное нейронки делают уже лучше человека. Они не могут нести предпринимательские риски, не могут. . .	SDL3 для Web (WebAssembly): Вывод текста со шрифтом TTF с помощью SDL3_ttf 8Observer8 01.02.2026 Содержание блога В этой пошаговой инструкции создадим с нуля веб-приложение, которое выводит текст в окне браузера. Запустим на Android на локальном сервере. Загрузим Release на бесплатный. . .	SDL3 для Web (WebAssembly): Сборка C/C++ проекта из консоли 8Observer8 30.01.2026 Содержание блога Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а. . .
SDL3 для Web (WebAssembly): Установка Emscripten SDK (emsdk) и CMake для сборки C и C++ приложений в Wasm 8Observer8 30.01.2026 Содержание блога Для того чтобы скачать Emscripten SDK (emsdk) необходимо сначало скачать и уставить Git: Install for Windows. Следуйте стандартной процедуре установки Git через установщик. . . .	SDL3 для Android: Подключение Box2D v3, физика и отрисовка коллайдеров 8Observer8 29.01.2026 Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами. Версия v3 была полностью переписана на Си, в. . .	Инструменты COM: Сохранение данный из VARIANT в файл и загрузка из файла в VARIANT bedvit 28.01.2026 Сохранение базовых типов COM и массивов (одномерных или двухмерных) любой вложенности (деревья) в файл, с возможностью выбора алгоритмов сжатия и шифрования. Часть библиотеки BedvitCOM Использованы. . .	SDL3 для Android: Загрузка PNG с альфа-каналом с помощью SDL_LoadPNG (без SDL3_image) 8Observer8 28.01.2026 Содержание блога SDL3 имеет собственные средства для загрузки и отображения PNG-файлов с альфа-каналом и базовой работы с ними. В этой инструкции используется функция SDL_LoadPNG(), которая. . .

oxotnik 1665 / 1134 / 80 Регистрация: 21.08.2008 Сообщений: 4,734 Записей в блоге: 1
	24.03.2009, 20:49
	ну как минимум надо CDatabase открыть 0

Опции темы