12-01-23, 06:27 PM
(آخر تعديل لهذه المشاركة : 12-01-23, 06:44 PM {2} بواسطة ali_ahmed12.)
لدي كود تالي لعرض بيانات لماذا في فيجوال بيسك يعرض بيانات في سي شارب يقول لم يتم عثور علي سجل
هدا كود بال vb.net
هنا عند استدعاء
نفس كود بالسي شارب
هنا عندا استدعاء
يظهر خطا
هدا كود بال vb.net
PHP كود :
Sub show_record_data(x)
Dim sql = "select *from users where user_name=N'" & (x) & "'"
Dim adp As New SqlDataAdapter(sql, Module1.con)
Dim ds As New DataSet
adp.Fill(ds)
Dim dt = ds.Tables(0)
If dt.Rows.Count = 0 Then
MessageBox.Show("لم يتم عثور علي سجل ")
Else
Dim dr = dt.Rows(0)
On Error Resume Next
user_id.Text = dr!user_code
user_name.Text = dr!user_name
user_password.Text = dr!user_password
CheckBox1.Checked = dr!btn_sales
CheckBox2.Checked = dr!btn_customer
CheckBox3.Checked = dr!btn_product
CheckBox4.Checked = dr!btn_users
CheckBox5.Checked = dr!btn_con
dt.Rows.Add(dr)
Dim cmd As New SqlCommandBuilder(adp)
adp.Update(dt)
End If
PHP كود :
Form_ADD_USERS.show_record_data(DataGridView1.CurrentRow.Cells(1).Value)
PHP كود :
public void show_record(string x)
{
string sql = "select *from users where user_name=N'" + (x) + "'";
SqlDataAdapter adp = new SqlDataAdapter(sql, Class1.con);
DataTable dt = new DataTable();
adp.Fill(dt);
if(dt.Rows.Count==0)
{
MessageBox.Show("لم يتم عثور علي سجل ");
}
else
{
DataRow dr = dt.Rows[0];
user_code.Text =Convert.ToString( dr["user_code"]);
user_name.Text= Convert.ToString(dr["user_name"]);
user_password.Text= Convert.ToString(dr["user_password"]);
checkBox1.Checked= Convert.ToBoolean(dr["btn_sales"]);
checkBox2.Checked = Convert.ToBoolean(dr["btn_customer"]);
checkBox3.Checked = Convert.ToBoolean(dr["btn_product"]);
checkBox4.Checked = Convert.ToBoolean(dr["btn_users"]);
checkBox5.Checked = Convert.ToBoolean(dr["btn_con"]);
dt.Rows.Add(dr);
SqlCommandBuilder cmd = new SqlCommandBuilder(adp);
adp.Update(dt);
}
}
PHP كود :
ADD_USERS frm = new ADD_USERS();
frm.show_record(Convert.ToString( dataGridView1.CurrentRow.Cells[1].Value));
(12-01-23, 06:27 PM)ali_ahmed12 كتب : لدي كود تالي لعرض بيانات لماذا في فيجوال بيسك يعرض بيانات في سي شارب يقول لم يتم عثور علي سجلوضعت اجراء في try
هدا كود بال vb.net
هنا عند استدعاءPHP كود :
Sub show_record_data(x)
Dim sql = "select *from users where user_name=N'" & (x) & "'"
Dim adp As New SqlDataAdapter(sql, Module1.con)
Dim ds As New DataSet
adp.Fill(ds)
Dim dt = ds.Tables(0)
If dt.Rows.Count = 0 Then
MessageBox.Show("لم يتم عثور علي سجل ")
Else
Dim dr = dt.Rows(0)
On Error Resume Next
user_id.Text = dr!user_code
user_name.Text = dr!user_name
user_password.Text = dr!user_password
CheckBox1.Checked = dr!btn_sales
CheckBox2.Checked = dr!btn_customer
CheckBox3.Checked = dr!btn_product
CheckBox4.Checked = dr!btn_users
CheckBox5.Checked = dr!btn_con
dt.Rows.Add(dr)
Dim cmd As New SqlCommandBuilder(adp)
adp.Update(dt)
End If
نفس كود بالسي شاربPHP كود :
Form_ADD_USERS.show_record_data(DataGridView1.CurrentRow.Cells(1).Value)
هنا عندا استدعاءPHP كود :
public void show_record(string x)
{
string sql = "select *from users where user_name=N'" + (x) + "'";
SqlDataAdapter adp = new SqlDataAdapter(sql, Class1.con);
DataTable dt = new DataTable();
adp.Fill(dt);
if(dt.Rows.Count==0)
{
MessageBox.Show("لم يتم عثور علي سجل ");
}
else
{
DataRow dr = dt.Rows[0];
user_code.Text =Convert.ToString( dr["user_code"]);
user_name.Text= Convert.ToString(dr["user_name"]);
user_password.Text= Convert.ToString(dr["user_password"]);
checkBox1.Checked= Convert.ToBoolean(dr["btn_sales"]);
checkBox2.Checked = Convert.ToBoolean(dr["btn_customer"]);
checkBox3.Checked = Convert.ToBoolean(dr["btn_product"]);
checkBox4.Checked = Convert.ToBoolean(dr["btn_users"]);
checkBox5.Checked = Convert.ToBoolean(dr["btn_con"]);
dt.Rows.Add(dr);
SqlCommandBuilder cmd = new SqlCommandBuilder(adp);
adp.Update(dt);
}
}
PHP كود :
ADD_USERS frm = new ADD_USERS();
frm.show_record(Convert.ToString( dataGridView1.CurrentRow.Cells[1].Value));
يظهر خطا