منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

نسخة كاملة : استفسار
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
لدي كود تالي لعرض بيانات لماذا في فيجوال بيسك يعرض بيانات في سي شارب يقول لم يتم عثور علي سجل
هدا كود بال vb.net
PHP كود :
Sub show_record_data(x)
 
       Dim sql "select *from users where user_name=N'" & (x) & "'"
 
       Dim adp As New SqlDataAdapter(sqlModule1.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(sqlClass1.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.ToStringdr["user_code"]);
 
               user_name.TextConvert.ToString(dr["user_name"]);
 
               user_password.TextConvert.ToString(dr["user_password"]);
 
               checkBox1.CheckedConvert.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.ToStringdataGridView1.CurrentRow.Cells[1].Value)); 

(12-01-23, 06:27 PM)ali_ahmed12 كتب : [ -> ]لدي كود تالي لعرض بيانات لماذا في فيجوال بيسك يعرض بيانات في سي شارب يقول لم يتم عثور علي سجل
هدا كود بال vb.net
PHP كود :
Sub show_record_data(x)
 
       Dim sql "select *from users where user_name=N'" & (x) & "'"
 
       Dim adp As New SqlDataAdapter(sqlModule1.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(sqlClass1.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.ToStringdr["user_code"]);
 
               user_name.TextConvert.ToString(dr["user_name"]);
 
               user_password.TextConvert.ToString(dr["user_password"]);
 
               checkBox1.CheckedConvert.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.ToStringdataGridView1.CurrentRow.Cells[1].Value)); 
وضعت اجراء في try  
يظهر خطا