Programlama | Programlama Dilleri | C Programlama Dili |C++

Hata
  • XML Parsing Error at 1:82. Error 9: Invalid character


C++ Builder ile MySQL Veritaban? Üzerinde Sorgulama ve Güncelleme ??lemi

AÇIKLAMA

C++ Builder 6 ile uyumludur. Bu programda MySQL üzerinde bulunan ornek isimli veritaban? içindeki ogrenci isimli tabloda bulunan veriler üzerinde sorgulama ve güncelleme i?lemi gerçekle?tirilmi?tir. Sorgulama i?lemi ö?renci numaras?na göre yap?lmakta olup, güncelleme s?ras?nda her güncelleme ayr? ayr? yap?lmaktad?r, sebebi ise C++ Builder'in toplu güncelle?tirme i?lemini yerine getirememesidir.

Program?n Tamam?n? A?a??daki Linkten ?ndirebilirsiniz

Linki Görebilmeniz ?çin Üye Olman?z Gerekmektedir...

Üye Kay?t 

Program Kodu:

Unit1.cpp

  1.  
  2.  
  3. //---------------------------------------------------------------------------
  4.  
  5. #include <vcl.h>
  6. #pragma hdrstop
  7.  
  8. #include "Unit1.h"
  9. //---------------------------------------------------------------------------
  10. #pragma package(smart_init)
  11. #pragma link "DBAccess"
  12. #pragma link "MemDS"
  13. #pragma link "MyAccess"
  14. #pragma resource "*.dfm"
  15. TForm1 *Form1;
  16. //---------------------------------------------------------------------------
  17. __fastcall TForm1::TForm1(TComponent* Owner)
  18.         : TForm(Owner)
  19. {
  20. }
  21. //---------------------------------------------------------------------------
  22.  
  23. void __fastcall TForm1::Button1Click(TObject *Sender)
  24. {
  25. String sql="Select * from ogrenci where no='";
  26. sql+=Edit1->Text;
  27. sql+="'";
  28. MyTable1->SQL->Clear();
  29. MyTable1->SQL->Add(sql);
  30. MyTable1->Execute();
  31. int kayitsayisi=MyTable1->RecordCount;
  32. if(kayitsayisi>0)
  33. {
  34. Label2->Visible=true;
  35. Label3->Visible=true;
  36. Label4->Visible=true;
  37. Edit2->Visible=true;
  38. Edit3->Visible=true;
  39. Edit4->Visible=true;
  40. Button2->Visible=true;
  41. Edit2->Text=MyTable1->FieldValues["adi"];
  42. Edit3->Text=MyTable1->FieldValues["soyadi"];
  43. Edit4->Text=MyTable1->FieldValues["bolum"];
  44. }
  45. else
  46. {
  47. Label2->Visible=false;
  48. Label3->Visible=false;
  49. Label4->Visible=false;
  50. Edit2->Visible=false;
  51. Edit3->Visible=false;
  52. Edit4->Visible=false;
  53. Button2->Visible=false;
  54. }
  55. }
  56. //---------------------------------------------------------------------------
  57.  
  58. void __fastcall TForm1::FormShow(TObject *Sender)
  59. {
  60. Label2->Visible=false;
  61. Label3->Visible=false;
  62. Label4->Visible=false;
  63. Edit2->Visible=false;
  64. Edit3->Visible=false;
  65. Edit4->Visible=false;
  66. Button2->Visible=false;       
  67. }
  68. //---------------------------------------------------------------------------
  69. void __fastcall TForm1::Button2Click(TObject *Sender)
  70. {
  71. String sql="Update ogrenci SET  adi='";
  72. sql+=Edit2->Text;
  73. sql+="' where no='";
  74. sql+=Edit1->Text;
  75. sql+="'";
  76. MyTable1->SQL->Clear();
  77. MyTable1->SQL->Add(sql);
  78. MyTable1->Execute();
  79. sql="Update ogrenci SET  soyadi='";
  80. sql+=Edit3->Text;
  81. sql+="' where no='";
  82. sql+=Edit1->Text;
  83. sql+="'";
  84. MyTable1->SQL->Clear();
  85. MyTable1->SQL->Add(sql);
  86. MyTable1->Execute();
  87. sql="Update ogrenci SET  bolum='";
  88. sql+=Edit4->Text;
  89. sql+="' where no='";
  90. sql+=Edit1->Text;
  91. sql+="'";
  92. MyTable1->SQL->Clear();
  93. MyTable1->SQL->Add(sql);
  94. MyTable1->Execute();
  95. Label2->Visible=false;
  96. Label3->Visible=false;
  97. Label4->Visible=false;
  98. Edit2->Visible=false;
  99. Edit3->Visible=false;
  100. Edit4->Visible=false;
  101. Button2->Visible=false;
  102. }
  103. //---------------------------------------------------------------------------
  104.  
  105.  

Yorumlar (0)
Sadece kayıtlı kullanıcılar yorum yazabilir!
Son Güncelleme ( Pazar, 02 Eylül 2012 23:14 )  
404 Not Found

Server Error

404

Page Not Found

This page either doesn't exist, or it moved somewhere else.


That's what you can do