السلام عليكم الاخوة الاحباب
يارب تكونوا بالف خير ان شاء الله
عملت مشروع بسيط لعرض جدول في الفورم والداتا بيس عبارة عن ملفات .mdf
اخدتها من ال SQL Server
ولكن للاسف وجدتها لا تعمل
فبرجاء فحص الكود حيث اني لم اتمكن من رفع المشروع نفسه حيث انه كبير جدا
Imports System.Data.Sql
Imports System.Data.SqlClient
Public Class Form1
' اسم ال folder = sms
Dim connSQLServer As New SqlConnection("Data Source= .\SQLEXPRESS;AttachdDbFileName=" And Application.StartupPath & "\DataBase\SMS.mdf;Integrated Security = True ;User Instance=True")
Dim da As SqlDataAdapter
Dim dt As New DataTable
'da= new SqlDataAdapter ("Select * From Table1",connSQLServer)
Sub Load_Data()
dt.Clear()
' تغير اسم الجدول هنا اسمه Alu_2G
da = New SqlDataAdapter("Select * From ALU_2G", connSQLServer)
da.Fill(dt)
End Sub
Sub save_Data()
Dim save As New SqlCommandBuilder(da)
save.QuotePrefix = "["
save.QuoteSuffix = "]"
da.Update(dt)
dt.AcceptChanges()
End Sub
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Load_Data()
DataGridView1.DataSource = dt
End Sub
End Class
احذف المسافة بعد علامة يساوي
\.=Data Source
(12-07-17, 10:43 PM)tryold كتب : [ -> ]احذف المسافة بعد علامة يساوي
\.=Data Source
حذفتها اخي الحبيب بس للاسف لسه المشكلة
Imports System.Data.Sql
Imports System.Data.SqlClient
Public Class Form1
Dim connSQLServer As New SqlConnection("Data Source=.\SQLEXPRESS;AttachdDbFileName=" And Application.StartupPath & "\DataBase\SMS.mdf;Integrated Security =True ;User Instance=True")
Dim da As SqlDataAdapter
Dim dt As New DataTable
'da= new SqlDataAdapter ("Select * From Table1",connSQLServer)
Sub Load_Data()
dt.Clear()
' تغير اسم الجدول هنا اسمه ALU_2G
da = New SqlDataAdapter("Select * From ALU_2G", connSQLServer)
da.Fill(dt)
End Sub
Sub save_Data()
Dim save As New SqlCommandBuilder(da)
save.QuotePrefix = "["
save.QuoteSuffix = "]"
da.Update(dt)
dt.AcceptChanges()
End Sub
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Load_Data()
DataGridView1.DataSource = dt
End Sub
End Class
هذ كود الاتصال بقاعدة بيانات في مجلد البرنامج
Data source=.\SQLEXPRESS;AttachDbFilename=|DataDirectory|SMS.mdf;Integrated Security=True;User Instance=True
(13-07-17, 12:37 AM)mstfa1991 كتب : [ -> ]تأكد من SqlServer في وضع التشغيل Running في خدمات الويندوز Services
وتأكد من أن الملف SMS.mdf تم عمله على اصدار SqlServer مثل الموجود على الجهاز أو أقدم
اخوتي الاعزاء
انا رفعت المشروع علي هذا الرابط
https://sites.google.com/site/wafawafamw...y/intracom
فبرجاء اختبار المشروع
مع الشكر
هذا بعد التعديل
حذفت قاعدة البيانات من المجلد لكبر حجمها انت فقط اضفها في المجلد
(13-07-17, 03:09 AM)tryold كتب : [ -> ]هذا بعد التعديل
حذفت قاعدة البيانات من المجلد لكبر حجمها انت فقط اضفها في المجلد
نفذت المطلوب يا هندسة بس للاسف لم تعمل معي
كيف اخذت النسخة؟
هل عملت لها Detach قبل نسخ الملفات وهي mdf و ldf
(13-07-17, 06:18 PM)سعود كتب : [ -> ]كيف اخذت النسخة؟
هل عملت لها Detach قبل نسخ الملفات وهي mdf و ldf
اخي الحبيب su,]
انا اتبعت الرابط ده لاستخراج الملفات
https://www.youtube.com/watch?v=FAFFmL6HopQ
وكان الخرج معي كالموضح في الصورة المرفقة
علما اني استخدم SQL 2005
يا عزيزي انا جربت البرنامج بقاعدة بياناتك اللي ضمن البرنامج واتصل مع القاعدة بنجاح واستعرضت السجلات وكل شي تمام يمكن عندك مشكله بنسخة السيرفر
