منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
ظهرت مشكلة عند تشغيل البرنامج اظن حلها عمل attach للقاعدة لكن لا اعرف كيف - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (https://vb4arb.com/vb)
+-- قسم : قسم قواعد البيانات (https://vb4arb.com/vb/forumdisplay.php?fid=40)
+--- قسم : قسم أسئلة قواعد البيانات تحت بيئة الـ.NET (https://vb4arb.com/vb/forumdisplay.php?fid=41)
+--- الموضوع : ظهرت مشكلة عند تشغيل البرنامج اظن حلها عمل attach للقاعدة لكن لا اعرف كيف (/showthread.php?tid=9370)

الصفحات: 1 2

ظهرت مشكلة عند تشغيل البرنامج اظن حلها عمل attach للقاعدة لكن لا اعرف كيف - الباشا شكر - 21-06-13

ظهرت مشكلة عند تشغيل البرنامج اظن حلها عمل attach للقاعدة لكن لا اعرف كيف
والصورة التالية تظهر الخطأ
[صورة مرفقة: p2QHX.png]

ظهرت مشكلة عند تشغيل البرنامج اظن حلها عمل attach للقاعدة لكن لا اعرف كيف - Sajad - 21-06-13

السلام عليكم

اخي العزيز ضع نص الاتصال لكل نحل المشكلة؟

غير نص الاتصال الى :

كود :
Data Source=.\SQLEXPRESS;AttachDbFileName=|DataDirectory|\mydata.ndf;Integrated Security=True;

او

كود :
Data Source=.\SQLEXPRESS;AttachDbFileName=FullPath\mydata.ndf;Integrated Security=True;

ظهرت مشكلة عند تشغيل البرنامج اظن حلها عمل attach للقاعدة لكن لا اعرف كيف - الباشا شكر - 21-06-13

sajad كتب :السلام عليكم

اخي العزيز ضع نص الاتصال لكل نحل المشكلة؟

غير نص الاتصال الى :

كود :
Data Source=.\SQLEXPRESS;AttachDbFileName=|DataDirectory|\mydata.ndf;Integrated Security=True;

او

كود :
Data Source=.\SQLEXPRESS;AttachDbFileName=FullPath\mydata.ndf;Integrated Security=True;

ظهر خطأ اخى الكريم عند استخدام اى منهم ارجو الحل

ظهرت مشكلة عند تشغيل البرنامج اظن حلها عمل attach للقاعدة لكن لا اعرف كيف - Sajad - 21-06-13

السلام عليكم اخي العزيز

انا طلبت منك ان تضع نص الاتصال الذي تستعمله

او ارفق المشروع للتعديل عليه

ظهرت مشكلة عند تشغيل البرنامج اظن حلها عمل attach للقاعدة لكن لا اعرف كيف - الباشا شكر - 21-06-13

مافيش مشكلة السورس كود بتاعى كالاتى
إقتباس :Imports System.Data
Imports System.Data.SqlClient
Public Class f2
Dim con As String =Data Source=.\SQLEXPRESS;AttachDbFileName=|DataDirectory|\mydata.ndf;Integrated Security=True;

Dim SQLStr As String = "SELECT * FROM Tabel1"
Dim Conn As New SqlConnection(con)
Dim DataSet1 As New DataSet


Private Sub f2_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Try
Conn.Open()
Dim DataAdapter1 As New SqlDataAdapter(SQLStr, Conn)
DataAdapter1.Fill(DataSet1, "Tabel")
Conn.Close()
Label1.DataBindings.Add("Text", DataSet1, "tabel1.ID")
TextBox1.DataBindings.Add("Text", DataSet1, "tabel1.Name")
TextBox2.DataBindings.Add("Text", DataSet1, "tabel1.money")
DateTimePicker1.DataBindings.Add("text", DataSet1, "tabel1.date")
Catch ex As Exception
MsgBox(ex.Message)


End Try
End Sub


ظهرت مشكلة عند تشغيل البرنامج اظن حلها عمل attach للقاعدة لكن لا اعرف كيف - الباشا شكر - 21-06-13

وملف الداتا بيز بتاعى موجود فى depug باسم mydat.mdf
ولكن كود الاتصال الموجود هو اللى انت قايللى عليه

ظهرت مشكلة عند تشغيل البرنامج اظن حلها عمل attach للقاعدة لكن لا اعرف كيف - الباشا شكر - 21-06-13

انا هرفعلك المشروع اهو انتظر ثوانى

ظهرت مشكلة عند تشغيل البرنامج اظن حلها عمل attach للقاعدة لكن لا اعرف كيف - الباشا شكر - 21-06-13

يمكنك تحميل الملف من هناhttp://www.gulfup.com/?po4695

ظهرت مشكلة عند تشغيل البرنامج اظن حلها عمل attach للقاعدة لكن لا اعرف كيف - Sajad - 21-06-13

السلام عليكم

يا اخي العزيز كيف تضع نص الاتصال بدون علامتي تنصيص!!!!

عدل الكود الى التالي:

كود :
Imports System.Data
Imports System.Data.SqlClient
Public Class f2
Dim con As String ="Data Source=.\SQLEXPRESS;AttachDbFileName=|DataDirectory|\mydata.ndf;Integrated Security=True;"

Dim SQLStr As String = "SELECT * FROM Tabel1"
Dim Conn As New SqlConnection(con)
Dim DataSet1 As New DataSet


Private Sub f2_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Try
Conn.Open()
Dim DataAdapter1 As New SqlDataAdapter(SQLStr, Conn)
DataAdapter1.Fill(DataSet1, "Tabel")
Conn.Close()
Label1.DataBindings.Add("Text", DataSet1, "tabel1.ID")
TextBox1.DataBindings.Add("Text", DataSet1, "tabel1.Name")
TextBox2.DataBindings.Add("Text", DataSet1, "tabel1.money")
DateTimePicker1.DataBindings.Add("text", DataSet1, "tabel1.date")
Catch ex As Exception
MsgBox(ex.Message)


End Try
End Sub


ظهرت مشكلة عند تشغيل البرنامج اظن حلها عمل attach للقاعدة لكن لا اعرف كيف - الباشا شكر - 21-06-13

sajad كتب :السلام عليكم

يا اخي العزيز كيف تضع نص الاتصال بدون علامتي تنصيص!!!!

عدل الكود الى التالي:

كود :
Imports System.Data
Imports System.Data.SqlClient
Public Class f2
Dim con As String =Data Source=".\SQLEXPRESS;AttachDbFileName=|DataDirector y|\mydata.ndf;Integrated Security=True;"

Dim SQLStr As String = "SELECT * FROM Tabel1"
Dim Conn As New SqlConnection(con)
Dim DataSet1 As New DataSet


Private Sub f2_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Try
Conn.Open()
Dim DataAdapter1 As New SqlDataAdapter(SQLStr, Conn)
DataAdapter1.Fill(DataSet1, "Tabel")
Conn.Close()
Label1.DataBindings.Add("Text", DataSet1, "tabel1.ID")
TextBox1.DataBindings.Add("Text", DataSet1, "tabel1.Name")
TextBox2.DataBindings.Add("Text", DataSet1, "tabel1.money")
DateTimePicker1.DataBindings.Add("text", DataSet1, "tabel1.date")
Catch ex As Exception
MsgBox(ex.Message)


End Try
End Sub

فعلت ماقلت لكن الصورة الاتيه توضح النتيجه
[صورة مرفقة: sdYG7.png]