الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

خطأ في تنفيذ كود حفظ

بدأه محمد فؤاد تركي في 18 مارس 2008 · 5 رد · 856 مشاهدة · في ADO.NET
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

الاخوة الزملاء

السلام عليكم ورحمة الله وبركاتة

استخدمت هذا الكود لحفظ بيانات من علي النموذج الي قاعدة البيانات من خلال stored procedure مخزن بقاعدة البيانات ولكن ظهر لي خطأ اثناء تنفيذ الكود

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
		' Connectionstring  This is the Connection String That's have the providers , User Name , Password
		'Dim conn As New SqlConnection(_connectionstring) ' تعريف الإتصال بقاعدة البيانات
		Dim conn As New SqlConnection("Provider=SQLOLEDB;Data Source=SQL Server DB;Initial Catalog=Employees;User ID=You'reUserName;Password=You'rePassword")


		Dim cmd As New SqlCommand("Dept_savedata", conn) ' تعريف المنجز ولاحظ إسم الأجراء المخزن 
		cmd.CommandType = CommandType.StoredProcedure ' تعريف نوع المنجز بإنه إجراء مخزن
		'  Name : This is the value , you can get it from TextBox 
		'  You Can Write :::::
		Dim _Name As String = Convert.ToString(Me.Deptname.Text)
		' The Age as the above Method


		' @Name : That's the Parameter name in SQL SERVER Data Base >> In Stored Procedures


		cmd.Parameters.Add("@Deptid", SqlDbType.NVarChar, 50).Value = _Name ' إرسال الباراميتر الأول وهو الإسم
		cmd.Parameters.Add("@deptname", SqlDbType.NVarChar, 50).Value = _Deptname ' إرسال البارميتر الثاني وهو العمر
		Try
			conn.Open() ' فتح الإتصال بقاعدة البيانات
			cmd.ExecuteNonQuery() ' تنفيذ 
			conn.Close() ' غلق الإتصال بقاعدة البيانات
		Catch ex As Exception
			MessageBox.Show(ex.Message.ToString)
		End Try
	End Sub

وهذه صورة من الخطأ ولا اعرف مصدر الخطأ فبرجاء توضيح لنا ما سبب هذا الخطأ

778213-1003.jpg

مرفق مثال

عبارة القاعدة والبرنامج

ليتم فحص الخطأ

Emp.rar

تم تعديل هذه المشاركة بواسطة محمد فؤاد تركي في 19 مارس 2008 في 14:35

certifiedj.jpg

 

 

Image Hosted by ImageShack.us
#2

الكونكشن سترينغ الذي تستخدمه خطأ. يجب أن يكون هكذا:

"Server=servername; Database=databasename; User ID=username; Password=password"

servername هو اسم السيرفر

databasename اسم قاعدة البيانات

username اسم المستخدم

password كلمة السر

تم تعديل هذه المشاركة بواسطة System Down في 19 مارس 2008 في 11:42

#3

أخي الغالي

System Down

السلام عليكم ورحمة الله وبركاتة

بارك الله فيك علي تصحيح الخطأ الذي قد وقعت فيه

فعلا الكود سليم لكن اعتقد انني مازال لدي مشكلة لا اعلم سببها اية

بعد ما استعملت الكود الذي تفضلت وارفقتة فاصبح الكود النهائي شكلة كالتالي

Dim conn As New SqlConnection("Server=MFOUAD\SQLEXPRESS; Database=employees; User ID=MFOUAD\mohamed fouad; Password=password")

وطبعا راعيت وضع اسم السيرفر وهو

اسم السيرفر MFOUAD\SQLEXPRESS

اسم الداتا بيز employees

واعتقد ان المشكلة هنا

فلايوجد لدي password لدخول الويندوز ولا برنامج السيكوال

واليوزر نيم الوحيد الذي يوجد عندي يظهر في شاشة الدخول لبرنامج السيكوال وهو كالتالي

MFOUAD\mohamed fouad username

حاولت وضعة مكان username في الكود وايضا لم تتم العملية وتظهر هذه الرسالة

778625-974.jpg

فبرجاء مساعدتي في ايجاد حل لهذه الرسالة

تم تعديل هذه المشاركة بواسطة محمد فؤاد تركي في 19 مارس 2008 في 21:12

certifiedj.jpg

 

 

Image Hosted by ImageShack.us
#4

الخطأ فى ال Connection صلح ال Connection كالتالى

 Dim conn As New SqlConnection("Data Source=.\SQLExpress;Integrated Security=True;User Instance=True;AttachDBFilename=|DataDirectory|\Employees.mdf")

صلحت ال Connection ووضعت قاعدة البيانات تحت bin\Debug واشتغل تمام واليك البرنامج بعد التعديل

Emp.rar

كل من فى الوجود يطلب صيداً :::: غير ان الشباك مختلفات

#5

أخي الغالي

njd

الله يبارك فيك علي التعديل

شكراً لك

انا كنت عارف ان الخطأ كان جاي من سلسلة الاتصال

الف الف شكر ليك مرة تانية

certifiedj.jpg

 

 

Image Hosted by ImageShack.us
#6
محمد فؤاد تركي كتب:
أخي الغالي

njd

الله يبارك فيك علي التعديل

شكراً لك

انا كنت عارف ان الخطأ كان جاي من سلسلة الاتصال

الف الف شكر ليك مرة تانية

الحمد لله انك وفقت لما تريد ........

كل من فى الوجود يطلب صيداً :::: غير ان الشباك مختلفات

مواضيع مشابهة