طريقة الاتصال بقاعدة البيانات برمجيا في فجوال سي زايد زايد
صفحة 1 من اصل 1
طريقة الاتصال بقاعدة البيانات برمجيا في فجوال سي زايد زايد
بسم الله الرحمن الرحيم
الصلاة والسلام على رسول الله وعلى آله صحبه أجمعين
طريقة الاتصال بقاعدة البيانات برمجيا في فجوال سي زايد زايد
هذا المثال نتعرف من خلاله كيف نضيف سجل ونعدله نحذفه و تنقل من سجل الى سجل اخر
ننشئ ملف قاعدة البيانات نقوم بالاتصال به.
ملف قاعدة البيانات DB01.mdf والجدول TAB01 وحقوله
ثم
تحديد مربعات النص لاعطائهم نفس الامر
textchanged
أي عندما تتم الكتابة داخل مربعات النص طبق هذا الامر
و
طريقة الاعلان عن sqlclient
اعلان عن بعض متغييرات مثلا كاعلان عن متغير من نوع SqlConnection
للاتصال بقاعدة البيانات و السيرفير
الكود سورس
#pragma once
namespace AddTo1 {
using namespace System;
using namespace System::ComponentModel;
using namespace System::Collections;
using namespace System::Windows::Forms;
using namespace System::Data;
using namespace System::Drawing;
///
using namespace System::Data::SqlClient;
....
public ref class Form1 : public System::Windows::Forms::Form
{
///////////////////////////////////////////////////
public: System::Data::SqlClient::SqlConnection^ conect1;
public: System::Data::SqlClient::SqlCommand^ comand1;
public: System::Data::SqlClient::SqlDataReader^ dread1;
public: System::Data::SqlClient::SqlDataAdapter^ sda1;
public: System::Windows::Forms::CurrencyManager^ cmg1;
public: System::Data::DataTable^ tbl1;
//////////////////////////////////////////////////////
.....
public:
Form1(void)
{
InitializeComponent();
///
//TODO: Add the constructor code here
//////////////////////////////////////////////////////
conect1= gcnew SqlConnection(L"Data Source=.\\SQLEXPRESS;"+
" AttachDbFilename='C:\\vc5\\DB01.mdf';"+
"Integrated Security=True;"+
"Connect Timeout=30;"+
"User Instance=True");
tbl1 = gcnew DataTable();
sda1 = gcnew SqlDataAdapter("SELECT * FROM tab01",conect1);
sda1->Fill(tbl1);
textBox1->DataBindings->Add("Text",tbl1,"id_em");
textBox2->DataBindings->Add("Text",tbl1,"nom");
textBox3->DataBindings->Add("Text",tbl1,"prenom");
textBox4->DataBindings->Add("Text",tbl1,"datee");
this->cmg1 = dynamic_cast<CurrencyManager^>(this->BindingContext[ tbl1 ]);
cmg1->Position = 0;
dataGridView1->DataSource = tbl1;
button1->Enabled = false;
}
protected:
~Form1()
{
if (components)
{
delete components;
}
}
private:
System::ComponentModel::Container ^components;
#pragma region Windows Form Designer generated code
....
void InitializeComponent(void)
{
.....
}
#pragma endregion
private: System::Void button1_Click(System::Object^ sender, System::EventArgs^ e)
{
///الاضافة
comand1 = gcnew SqlCommand("INSERT INTO TAB01(id_em,nom,prenom,datee)"+
"VALUES("+textBox1->Text+",'"+textBox2->Text+"','"+
textBox3->Text+"',#"+textBox4->Text+"#)",conect1); //
conect1->Open();
comand1->ExecuteNonQuery();
MessageBox::Show("تمت عملية الاضافة بنجاح");
conect1->Close();
cmg1->Refresh();
}
private: System::Void label2_Click(System::Object^ sender, System::EventArgs^ e)
{
}
private: System::Void button2_Click(System::Object^ sender, System::EventArgs^ e)
{ /// البحث
comand1 = gcnew SqlCommand("SELECT * FROM tab01 WHERE nom='"+
textBox5->Text+"'",conect1);
conect1->Open();
dread1 = comand1->ExecuteReader();
dread1->Read();
textBox1->Text = dread1["id_em"]->ToString();
textBox2->Text = dread1["nom"]->ToString();
textBox3->Text = dread1["prenom"]->ToString();
textBox4->Text = dread1["datee"]->ToString();
dread1->Close();
conect1->Close();
button3->Enabled = true;
button4->Enabled = true;
button1->Enabled = false;
}
private: System::Void button5_Click(System::Object^ sender, System::EventArgs^ e)
{
/// الأول
if ( cmg1->Count != 0 ) {
cmg1->Position = 0;
}
}
private: System::Void button6_Click(System::Object^ sender, System::EventArgs^ e)
{ /// التالي
if ( cmg1->Count != 0 ) {
cmg1->Position +=1;
}
}
private: System::Void button7_Click(System::Object^ sender, System::EventArgs^ e)
{ /// السابق
if ( cmg1->Count != 0 ) {
cmg1->Position -=1;
}
}
private: System::Void button8_Click(System::Object^ sender, System::EventArgs^ e)
{ /// الأخير
if ( cmg1->Count != 0 ) {
cmg1->Position = cmg1->Count - 1;
}
}
private: System::Void button3_Click(System::Object^ sender, System::EventArgs^ e)
{ /// تعديل
comand1 = gcnew SqlCommand("UPDATE tab01 SET id_em="+textBox1->Text+
", nom='"+textBox2->Text+"',prenom='"+
textBox3->Text+"'WHERE nom='"+textBox5->Text+"'",conect1); // ,#"+ textBox4->Text +"# ,datee
conect1->Open();
comand1->ExecuteNonQuery();
MessageBox::Show("تم تعديل الاسم بنجاح");
conect1->Close();
cmg1->Refresh();
button3->Enabled = false;
button4->Enabled = false;
}
private: System::Void button4_Click(System::Object^ sender, System::EventArgs^ e)
{ /// الحذف
comand1 = gcnew SqlCommand("DELETE FROM tab01 WHERE nom='"+
textBox5->Text+"'",conect1);
conect1->Open();
comand1->ExecuteNonQuery();
MessageBox::Show("تم حذف الاسم بنجاح");
conect1->Close();
cmg1->Refresh();
button3->Enabled = false;
button4->Enabled = false;
}
private: System::Void button9_Click(System::Object^ sender, System::EventArgs^ e)
{ /// مسح و جديد
if ( cmg1->Count != 0 ) {
cmg1->AddNew();
textBox1->Focus();
}
}
private: System::Void textBox1_TextChanged(System::Object^ sender, System::EventArgs^ e)
{
if ( (textBox1->Text != "")&&(textBox2->Text != "")&&(textBox3->Text != "") ) {
button1->Enabled = true;
} else {
button1->Enabled = false;
}
}
};
}
رابط تحميل الشرح
www mediafire com / file / abk3q5q0vuj5cjj / AddTo1 .rar
و
www mediafire com/ file/ abk3q5q0vuj5cjj/ AddTo1.rar /file
و
http://www.mediafire.com/file/abk3q5q0vuj5cjj/AddTo1.rar
و
http://www.mediafire.com/file/abk3q5q0vuj5cjj/AddTo1.rar/file
ali- مبرمج مجتهد
- عدد المساهمات : 913
تاريخ التسجيل : 29/07/2013
مواضيع مماثلة
» طريقة ربط المجموعة FireDAC بقاعدة البيانات Accesse كذلك انشاء قاعدة بيانات Accesse والجداول
» كيفية انشاء قاعدة بيانات أكسس Access في فجول بيسك 6 وطباعة في Report
» SqlConnection يتم من خلالها الاتصال بالسيرفر وقاعدة البيانات
» طريقة جمع عددين بدلفي برمجيا
» طريقة انشاء قاعدة بيانات SQL برمجيا
» كيفية انشاء قاعدة بيانات أكسس Access في فجول بيسك 6 وطباعة في Report
» SqlConnection يتم من خلالها الاتصال بالسيرفر وقاعدة البيانات
» طريقة جمع عددين بدلفي برمجيا
» طريقة انشاء قاعدة بيانات SQL برمجيا
صفحة 1 من اصل 1
صلاحيات هذا المنتدى:
لاتستطيع الرد على المواضيع في هذا المنتدى