+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : مشكلة بقاعدة البيانات (/showthread.php?tid=22644)
مشكلة بقاعدة البيانات - العيدروس - 20-11-17
اساتذتنا الكرام هل ممكن ترشدوني عن سبب هذي المشكلة ربما مررتم بها .بحثت لكن لم اجد ما يفسر لي هذا الامر
اقوم بالحفظ من الفورم بقاعدة بيانات اكسس 2010 .القي نظرة على قاعدة البيانات أجد الاسماء التي قمت بحفظها مكتوبة بدون اي خطأ
اغلق الفورم او افتح المشروع مرة اخرى اجد قاعدة البيانات فارغة و الله شيء اكثر من السحر
تحياتي
RE: مشكلة بقاعدة البيانات - sendbad100 - 20-11-17
السلام عليكم
1- ضع قاعدة البينات في مكان محدد.
2- في جملة الاتصال بقاعدة البينات ضع المسار كاملا .
RE: مشكلة بقاعدة البيانات - العيدروس - 20-11-17
مشكور اخي sendbad100 و بارك الله فيك على الارشاد
انا واضع قاعدة البيانات في مع البرنامج Bin/Debug
هذا كود الاتصال بالقاعدة بالموديل :
كود :
Public Sub dbase_conn()
If con.State = ConnectionState.Open Then con.Close()
Try
con = New OleDbConnection("provider=Microsoft.Ace.OLEDB.12.0;Data Source=MAXDATABASE.accdb")
con.Open()
Catch ex As Exception
MessageBox.Show(ex.Message, "لم يتم الربط مع قاعدة البيانات", MessageBoxButtons.OK, MessageBoxIcon.Error, MessageBoxDefaultButton.Button1, MessageBoxOptions.DefaultDesktopOnly)
con.Close()
End
End Try
End Subكود :
dbase_conn()
InfoCommand = New OleDbCommand("SELECT * FROM Information ORDER BY NName", con)
InfoAdapter = New OleDbDataAdapter()
InfoAdapter.SelectCommand = InfoCommand
InfoTable = New DataTable()
InfoAdapter.Fill(InfoTable)
DataGridView1.DataSource = InfoTable '--------------------------'
TextBox1.DataBindings.Add("Text", InfoTable, "ID")
TextBox2.DataBindings.Add("Text", InfoTable, "FirstName")
TextBox3.DataBindings.Add("Text", InfoTable, "LastName")PHP كود :
Imports System.Data
Imports System.Data.OleDb
Public Class Form1
Dim InfoConnection As OleDbConnection
Dim InfoCommand As OleDbCommand
Dim InfoAdapter As OleDbDataAdapter
Dim InfoTable As DataTable
Dim InfoManager As CurrencyManager
Dim InfoState As String
Dim InfoBookmark As Integer
بارك الله فيكم
RE: مشكلة بقاعدة البيانات - أحمد النجار - 20-11-17
شكرا للاخ sendbad100 على المشاركة وبعد اذنك حل اخر
لو انك مستورد قاعدة البيانات في Solution exeplorer
قم بتحديدها ثم من الخصائص اختر خيار Copy to output directory
اختر الخيار do not copy
RE: مشكلة بقاعدة البيانات - العيدروس - 20-11-17
عليك الف سلام و الف تحية و الف ود ومحبة واحترام يا احمد يا نجار
وجدت ما ذكرته .. ساجرب العملية ان شاء الله يا رب تضبط
بارك الله فيك
RE: مشكلة بقاعدة البيانات - sendbad100 - 20-11-17
(20-11-17, 11:07 PM)العيدروس كتب :كود :
Public Sub dbase_conn()
If con.State = ConnectionState.Open Then con.Close()
Try
con = New OleDbConnection("provider=Microsoft.Ace.OLEDB.12.0;Data Source=D:\DB\MAXDATABASE.accdb")
con.Open()
Catch ex As Exception
MessageBox.Show(ex.Message, "لم يتم الربط مع قاعدة البيانات", MessageBoxButtons.OK, MessageBoxIcon.Error, MessageBoxDefaultButton.Button1, MessageBoxOptions.DefaultDesktopOnly)
con.Close()
End
End Try
End Sub
جرب استخدم جملة الاتصال في الاعلى
بعد ان
تضع مجلد جديد باسم DB في القرص D
ثم تضع فيه قاعدة البيانات
ورد لي خبر
كود :
أحمد النجار
شكرا للاخ sendbad100 على المشاركة وبعد اذنك حل اخر
لو انك مستورد قاعدة البيانات في Solution exeplorer
قم بتحديدها ثم من الخصائص اختر خيار Copy to output directory
اختر الخيار do not copyشكرا للاخ / أحمد النجار
دائما مبدع ونحن نستفيد من خبرته الكبيرة ومن دروسة في اليوتيوب ومن مشاركاته الجميلة .
RE: مشكلة بقاعدة البيانات - العيدروس - 20-11-17
ربنا يجازيكم خير و يبارك فيكم و يرزقكم من حيث لا تحتسبون
اخي sendbad100 شاكر اهتمامك بالموضوع و نصايحك يلي بلا شك لها قيمة كبيرة
اخي احمد النجار ربنا يبارك فيك و في عمرك و يديك ما تطمح اليه .اصبت يا خبير ماشاء الله.فعلا حددت do not copy لاني كنت واضع قاعدة البيانات بال explorer من اجل ربطها بالreport viewer
انحلت المشكلة الحمد لله بارك الله فيكم و يرحم والديكم
RE: مشكلة بقاعدة البيانات - أبوبكر سويدان - 21-11-17
(20-11-17, 11:19 PM)أحمد النجار كتب : شكرا للاخ sendbad100 على المشاركة وبعد اذنك حل اخر
لو انك مستورد قاعدة البيانات في Solution exeplorer
قم بتحديدها ثم من الخصائص اختر خيار Copy to output directory
اختر الخيار do not copy
هذا هو الحل الأنسب في رأيي. والله أعلم.
RE: مشكلة بقاعدة البيانات - أحمد النجار - 21-11-17
بالتوفيق للجميع ان شاء الله