نحوه خواندن اطلاعات سلول های فایل دیتا بیس بدون نمایس اون در دیتا گرید ویو

[vb.net.33]

سلام

دوستان فرض کنید ما یه دیتاگرید ویو به نام DGW داریم برای آگاهی از مقدار سلول (0,0) یعنی ستون 0 و سطر 0 از کد زیر استفاده می کردیم:

DGW.Item(0,0).value

که لازمه این کار ارتباط دادن دیتابیس با دیتا گرید ویو بود.حالا آیا ما می تونیم با کئوری نویسی و یا راه دیگه ای به مقدار سلول ذکر شده بدون استفاده از دیتاگرید ویو دست پیدا کنیم؟

بطور مثال :با استفاده از همچین چیزهائی البته من نمی دونم حا فقط سوال می کنم.

"select * from table"

با تشکر

[mgh64120]

درود بر شما
براي اينكه بتوني مقدار يك فيلد از يك ركورد خاص يك جدول رو بدست بياري بايد :

Dim Result As Object
Dim Cmd As New SqlCommand("SELECT FieldName FROM TableName WHERE FieldName2 = شرط مورد نظر", Connection)
Connection.Open
Dim DR As SqlDataReader = cmd.ExecuteReader
If DR.Read =True Then Result = DR("FieldName").ToString
Connection.Close

موفق باشيد.

[vb.net.33]

درود بر شما
براي اينكه بتوني مقدار يك فيلد از يك ركورد خاص يك جدول رو بدست بياري بايد :

Dim Result As Object
Dim Cmd As New SqlCommand("SELECT FieldName FROM TableName WHERE FieldName2 = شرط مورد نظر", Connection)
Connection.Open
Dim DR As SqlDataReader = cmd.ExecuteReader
If DR.Read =True Then Result = DR("FieldName").ToString
Connection.Close

موفق باشيد.

من نمی خوام شرط خاصی رو قرار بدم.تازه اگه اون شرط می دونستم که نمی خواستم مقدار یه سلول رو بخونم.

من می خوام مقدار یه سلول رو هر چی که بود بخونم.

[tto_baran]

اینم یه راه ساده است به امتحانش میارزه

ol_cn = New OleDbConnection(er)
ol_cn.Open()
ol_cm = New OleDbCommand("select * from "JADVAL" where id = RADIF ", ol_cn)
ol_da = New OleDbDataAdapter(ol_cm)
ds = New DataSet
ol_da.Fill(ds, "JADVAL")
dr = ol_cm.ExecuteReader
If dr.HasRows Then
While dr.Read
'************************************************* *********
'**
TextBox1.Text = (dr("fild1"))
TextBox2.Text = (dr("fild2 "))
' for all filds

TextBox3.Text = (dr("fild n "))
End While
TextBox1.Focus()
End If


من از تکست باکس استفاده کردم شما می تونی براشون متغیر تعریف کنی

[vb.net.33]

اینم یه راه ساده است به امتحانش میارزه

ol_cn = New OleDbConnection(er)
ol_cn.Open()
ol_cm = New OleDbCommand("select * from "JADVAL" where id = RADIF ", ol_cn)
ol_da = New OleDbDataAdapter(ol_cm)
ds = New DataSet
ol_da.Fill(ds, "JADVAL")
dr = ol_cm.ExecuteReader
If dr.HasRows Then
While dr.Read
'************************************************* *********
'**
TextBox1.Text = (dr("fild1"))
TextBox2.Text = (dr("fild2 "))
' for all filds

TextBox3.Text = (dr("fild n "))
End While
TextBox1.Focus()
End If


من از تکست باکس استفاده کردم شما می تونی براشون متغیر تعریف کنی


نتونستم استفاده کنم.میشه نمونه برنامشو بدین؟

[tto_baran]

این هم یه نمونه برای شما :قلب::قلب: :قلب:





78313

[vb.net.33]

این هم یه نمونه برای شما :قلب::قلب: :قلب:





78313


دمتگرم داداش.

[tto_baran]

خوشحالم که به جواب رسیدی

موفق باشی