اصلاح کد جستجوی افراد از بانک اطلاعاتی

[swallow.pa]

سلام به همه
این کد رو من برای جستجوی یک فرد توی بانک انجام می دم بالاخره جواب می گیرم




Sub Find_Code_Show_Name()
Dim Cmd1 As New SqlClient.SqlCommand(Nothing, Cn)
Dim Dtrdr1 As SqlClient.SqlDataReader

If Cn.State = ConnectionState.Closed Then Cn.Open()

Cmd1.CommandText = "SELECT * FROM Person WHERE PersonId=" & txtPersonId.Text
Dtrdr1 = Cmd1.ExecuteReader
With Dtrdr1
While .Read
If .GetValue(0) <> Nothing Then
lblFamily.Text = .GetValue(2) & Space(1) & .GetValue(3)

End If
End While
End With
Dtrdr1.Close()
Cn.Close()

End Sub

خب دوستان شما چه کدی رو برای پیدا کردن نام و نام خانوادگی یک فرد پیشنهاد می کنید و نظرتون در رابطه با کد من چیه
ممنون

[ROSTAM2]

با سلام
اینطور که معلومه روش هر برنامه نویس با دیگری تفاوت زیادی داره چون از الگوریتمی متفاوت استفاده می کنن
اگه می خوای بهینه کار کنی از خود Dataset برای نوشتن توابع جستجو استفاده کن ، در این صورت شما یک تابع دارید با یک ورودی
تنها کاری که باید بکنی استفاده از تابع و بعد استفاده از اطلاعات جدول با کمک Dataset

[swallow.pa]

با سلام
اینطور که معلومه روش هر برنامه نویس با دیگری تفاوت زیادی داره چون از الگوریتمی متفاوت استفاده می کنن
اگه می خوای بهینه کار کنی از خود Dataset برای نوشتن توابع جستجو استفاده کن ، در این صورت شما یک تابع دارید با یک ورودی
تنها کاری که باید بکنی استفاده از تابع و بعد استفاده از اطلاعات جدول با کمک Dataset
خب دوست من هدف من اینه که روش دوستان رو ببینم چطوریه و از روش اساتید که بهتره استفاده کنم شما هم اگه روشی دیگه دارید کدهاتون رو بگذارید تا مقایسه بشه
ممنون

[ROSTAM2]

دوباره سلام
برای ساخت تابع اگه بخوای یه نفر رو با نام جستجو کنی یا ID یا هر دوی آونها می تونی کدت رو اینجوری بنویسی
SELECT * FROM Person WHERE PersonId= @PersonID
این در صورتی که تنها از ID می خوای استفاده کنی
برای هردو
SELECT * FROM Person WHERE PersonId= @PersonID AND PersonName = @PersonName
که برای احضار تابع از DataTableAdapter استفاده می کنند
مثال:
PersonDataTableAdapter1.FillByIDandName(NameBox.Te xt,IDBox.Text)

اگه می خوایی روش ساخت تابع با Sql یاد بگیری که یه کم توضیحش طولانیه سعی میکنم اونو با توضیخات بیشتر از کل موضوع کار با اطلاعات منبع اطلاعات و تصویر ازسال کنم

[swallow.pa]

دوباره سلام
برای ساخت تابع اگه بخوای یه نفر رو با نام جستجو کنی یا ID یا هر دوی آونها می تونی کدت رو اینجوری بنویسی
SELECT * FROM Person WHERE PersonId= @PersonID
این در صورتی که تنها از ID می خوای استفاده کنی
برای هردو
SELECT * FROM Person WHERE PersonId= @PersonID AND PersonName = @PersonName
که برای احضار تابع از DataTableAdapter استفاده می کنند
مثال:
PersonDataTableAdapter1.FillByIDandName(NameBox.Te xt,IDBox.Text)

اگه می خوایی روش ساخت تابع با Sql یاد بگیری که یه کم توضیحش طولانیه سعی میکنم اونو با توضیخات بیشتر از کل موضوع کار با اطلاعات منبع اطلاعات و تصویر ازسال کنم
اگه لطف کنی ممنونم

[فرید نجفلو]

مختصر و مفید کد شما:

Private Sub Find_Code_Show_Name()
Dim TSQL As String = "SELECT * FROM Person WHERE PersonId = " & txtPersonId.Text
Dim Adp As New SqlClient.SqlDataAdapter(TSQL, Cn)
Dim Res As New DataTable
Adp.Fill(Res)
If Res.Rows.Count > 0 Then
lblFamily.Text = Res(0)("FirstName") & " " & Res(0)("LastName")
Else
lblFamily.Text = ""
End If
End Sub

[ROSTAM2]

فرض می کنیم یک پایگاه داده ساختیم جدولمون رو هم ایجاد کردیم با چنین آیتمهایی
نام منبع اطلاعات Customers
نام یک جدول CustomerInfo
ستونهای جدول ID, CustomerID, Name, Phone, Address

بعد از ساخت آیتم ها سراغ Toolbox می ریم اگه یک Tab جدید با نام پروژه داشتیم که اشیاء مرتبط با منبع اطلاعاتمون در اون ایجاد شده بود که ... و گرنه یک بار باید پروژه رو Build کنیم

اشیاء ذکر شده رو وارد فرم مد نظر می کنیم
CustomersDataSet

با وارد کردن اون به فرم با نام CustomersDataSet1 در ایجاد می شه
با انتخاب اون و کلیک روی فلش سمت راستش آیتم Edit DataSet Desiner رو کلیک می کنیم
وارد پنجره CustomersDataSet.xsd می شیم ، از ServerExplorer جدول CustomerInfo رو با Drag And Drop می کشیم داخل محیط Dataset
با کلیک بر روی CustomerInfoTableAdapter آیتم Add Query رو انتخاب می کنیم
بعد از ساخت توابع مورد نیاز پروژه رو Build می کنیم تا شیء CustomerInfoTableAdapter در ToolBox ساخته بشه و از اون استفاده کنیم
اگه سوالی داشتی بپرس

اگه وقت کردم آموزش کامل با تصویر رو می زارم تو یه وبلاگ بعد آدرس میدم