+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : رسالة لم تتم تهيئة خاصية ExecuteNonQuery (/showthread.php?tid=19202)
رسالة لم تتم تهيئة خاصية ExecuteNonQuery - عباسة - 12-02-17
السلام عليكم
يا شباب كيف اهئ خاصية ExecuteNonQuery
كود :
Protected Sub SinUpU()
Dim cmd As New SqlCommand
Try
Dim conn As New SqlConnection()
conn.ConnectionString = "Data Source=a-pc\sqlexpress;Initial Catalog=DataKaleej;Integrated Security=True"
conn.Open()
cmd.CommandText = "update DataStudents$ set Password='" & TPass1.Text & "' where ID='" & " where ID='" + Tuser.Text + "'"
cmd.ExecuteNonQuery()
conn.Close()
Lb3.Text = "تم تغيير كلمة المرور بنجاح"
Lb3.ForeColor = Drawing.Color.Green
Catch ex As Exception
MsgBox(ex.Message.ToString)
End Try
End SubRE: رسالة لم تتم تهيئة خاصية ExecuteNonQuery - مساعدة - 12-02-17
السلام عليكم
لم تربط امر cmd بالاتصال conn ضع الكود التالي قبل conn.Open
جرب التالي
كود :
cmd.Connection=connRE: رسالة لم تتم تهيئة خاصية ExecuteNonQuery - Adrees - 12-02-17
وعليكم السلام
تفضل
PHP كود :
Protected Sub SinUpU()
Dim cmd As New SqlCommand
Try
Dim conn As New SqlConnection()
conn.ConnectionString = "Data Source=a-pc\sqlexpress;Initial Catalog=DataKaleej;Integrated Security=True"
cmd.Connection = conn
cmd.CommandType = CommandType.Text
cmd.CommandText = "update DataStudents$ set Password='" & TPass1.Text & "' where ID='" + Tuser.Text + "'"
conn.Open()
cmd.ExecuteNonQuery()
conn.Close()
Lb3.Text = "تم تغيير كلمة المرور بنجاح"
Lb3.ForeColor = Drawing.Color.Green
Catch ex As Exception
MsgBox(ex.Message.ToString)
End Try
End Sub
RE: رسالة لم تتم تهيئة خاصية ExecuteNonQuery - عباسة - 13-02-17
جزاكم الله عني كل خير وبارك الله فيكم وفي علمكم