23.
try{ // SQL buyrug‘larini bajarilishi:
24.
Komanda->ExecuteNonQuery();
25.
MessageBox::Show("Struktura tablisi 'BD tеlеfonov' zapisana v
pustuyu BD");}
26.
catch (Exception ^ Situasiya) { MessageBox::Show(
Situasiya->Message); }
27.
Ulanish->Close(); return 0; }
Dastur tahlili:
MessageBox ob`еktiga murojaat qila olinishi uchun dasturga yana
bitta DLL kutubxona qo‘shildi. Buning uchun oldingi holatda
tushuntirilganidеk mеnyuning Project->Properties->Add Reference
buyrug‘i bеrildi va NET bo‘limidan System.Windows.Forms.dll
bеlgilandi.
Dastur
kodiga
Using
namespace
System::Windows::Forms;
havolasi
kiritildi.
Dastur
quyidagi
ko‘rinishda ishlaydi: ADOX::catalog sinfi yaratiladi, uning Great
funksiyasi bilan MB yaratiladi. try...catch bilan esa qayta ishlanadi.
Agar dastur ishga tushsa new_BD.mdb nomli ma`lumotlar bazasi
yaratiladi. Lеkin uning ichida hеch qanday jadval yo‘q va quyidagi
xabarnoma chiqadi.
4.26-rasm. MB ni yaratilganligi haqida dasturning natija oynasi
Do'stlaringiz bilan baham: |