+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : استدعاء داتا من الداتا بيز عن طريق المعالج (/showthread.php?tid=17696)
الصفحات:
1
2
استدعاء داتا من الداتا بيز عن طريق المعالج - araxis - 17-10-16
عندى داتا بيز فيها جدول بيتكتب فيها رقام الساب والخانة اللى جنبها اسم الموظف تمام انا عاوز بقى لما اجى اعمل تكست بوكس1 واكتب فية رقم الساب يجبلى فى تكست بوكس 2 عند الضغط على زرار يجبلى فى تكست بوكس 2 اسم الموظف يعنى يستدعى اسم الموظف من الداتا بيز بناءا على رقن الساب
RE: استدعاء داتا من الداتا بيز عن طريق المعالج - سعود - 17-10-16
اذا كان قصدك تستعلم عن الرقم وتجلب الاسم فالمنتدى مليء بهذا النوع من الطلب.
RE: استدعاء داتا من الداتا بيز عن طريق المعالج - araxis - 18-10-16
وين اخى؟؟؟ عن طريق المغالج
RE: استدعاء داتا من الداتا بيز عن طريق المعالج - mhmd_911 - 18-10-16
هذي دالة وضعتها قبل قليل رد لأحد الاعضاء عدلتها لك
PHP كود :
Public Function GetEmployeeName(SapNo As Integer) As String
Dim cmd As New OleDbCommand(String.Format("SELECT [Employee-Name] FROM [Users] WHERE [Sap-No]={0}", SapNo), cnn)
cnn.Open()
Dim ret As String = cmd.ExecuteScalar
cnn.Close()
Return ret
End Function
فقط استدعيها وارسل لها رقم الساب ترجع لك باسم الموظف
هل تستخدم طريقة المعالج؟
RE: استدعاء داتا من الداتا بيز عن طريق المعالج - سعود - 18-10-16
الان عملت ربط عن طريق المعالج وهذا هو الكود
PHP كود :
Public Class Form1
Dim dt As DataTable
Private Sub TbBindingNavigatorSaveItem_Click(sender As Object, e As EventArgs) Handles TbBindingNavigatorSaveItem.Click
Me.Validate()
Me.TbBindingSource.EndEdit()
Me.TableAdapterManager.UpdateAll(Me.DbDataSet)
End Sub
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
'TODO: This line of code loads data into the 'DbDataSet.tb' table. You can move, or remove it, as needed.
Me.TbTableAdapter.Fill(Me.DbDataSet.tb)
dt = New DataTable
dt = DbDataSet.Tables(0)
End Sub
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Dim dr() As DataRow
dr = dt.Select("tid=" & Val(TextBox1.Text) & "")
If dr.Length > 0 Then
TextBox2.Text = dr(0)(1).ToString
End If
End Sub
End Class
RE: استدعاء داتا من الداتا بيز عن طريق المعالج - araxis - 05-11-16
لو التكست بوكس مش مكتوب فية ارقام بيجبلى ايرور فى السطر دة
dr = dt.Select("tid=" & Val(TextBox1.Text) & "")
عشان انا ساعات بكتب ارقام وحروف مع بعض
RE: استدعاء داتا من الداتا بيز عن طريق المعالج - araxis - 06-11-16
ياريت الافادة
؟
RE: استدعاء داتا من الداتا بيز عن طريق المعالج - araxis - 12-11-16
?????????????????????????
RE: استدعاء داتا من الداتا بيز عن طريق المعالج - العواد الصغير - 12-11-16
اذا كان نوع الحقل الذي تبحث به رقمي فيجب ان يحتوي ارقاما
RE: استدعاء داتا من الداتا بيز عن طريق المعالج - araxis - 13-11-16
هو ال 2 مع بعض ارقام وحروف