أرجوا المساعدة في البحث

إقرأ الدروس الموجودة في منتدى ADO .net

أشكرك أخي على مرورك قرأت الدروس وقمت بمحاولت تطبيق بعض الأكواد لكن لم أستطع أنا أعمل على V.B 2005 وعندما بأت محاولاتي بالفشل طلبت المساعدة لأني بأشد الحاجة إليه وبأسرع وقت ممكن علما باني أول مره أتعامل مع بيئة الدوت نت...

أرفق مثالا عن الكود الذي يسبب لك المشكلة حتى نستطيع مساعدتك

جزاك الله عني كل خير وفرج لك كل عسير

Imports System.Data.SqlClient.SqlDataAdapter
Imports System.Text.RegularExpressions
Imports SDS = System.Data.SqlClient
'Imports CrystalDecisions.Shared
'Imports CrystalDecisions.CrystalReports.Engine
Imports System.Data.OleDb
Imports System.Data.OleDb.OleDbDataAdapter
Public Class frmSearch
	Dim Sqlconn As System.Data.SqlClient.SqlConnection = New System.Data.SqlClient.SqlConnection
	Dim cm As New System.Data.SqlClient.SqlCommand
	Dim com As New System.Data.SqlClient.SqlCommand
	Dim ad As New System.Data.SqlClient.SqlDataAdapter
	Dim ds As New DataSet
	Dim Emad As New System.Data.SqlClient.SqlDataAdapter
	Dim Emds As New DataSet
	Dim Emadg As New System.Data.SqlClient.SqlDataAdapter
	Dim Emdsg As New DataSet
	Dim oDadapter As New System.Data.SqlClient.SqlDataAdapter
	Dim ODds As New DataSet
	Dim pad As New System.Data.SqlClient.SqlDataAdapter
	Dim pds As New DataSet
	Dim dg As New DataGridView
	Dim CN As New System.Data.SqlClient.SqlConnection("server=Localhost; uid=sa; pwd=sa; database=Archiving")

	Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

		If r1.Checked Then
			Dim Da As New SDS.SqlDataAdapter("Select * from PERSON where P_S_ID = " & Text1.Text & " OR P_F_NAME = " & Text1.Text & " OR P_M_NAME = " & Text1.Text & " OR P_L_NAME = " & Text1.Text & "", CN)
			Dim Ds As New DataSet()

			Ds.Clear()

			Try
				Da.Fill(Ds, "PERSON")
				dg.DataSource = Ds
				dg.DataMember = "PERSON"
			Catch Ex As Exception
				MsgBox(Ex.Message)
			End Try
		ElseIf r2.Checked Then
			Dim Da As New SDS.SqlDataAdapter("Select * from ARCHIVE_TYPES where ER_NO = " & Text1.Text & " OR D_FILE_NAME = " & Text1.Text & " OR D_DATE = " & Text1.Text & " OR D_DATE_LAST_DIS = " & Text1.Text & " OR D_DATE_LAST_UP = " & Text1.Text & " OR ER_ANNOTATION = " & Text1.Text & "", CN)
			Dim Ds As New DataSet()

			Ds.Clear()

			Try
				Da.Fill(Ds, "ARCHIVE_TYPES")
				dg.DataSource = Ds
				dg.DataMember = "ARCHIVE_TYPES"
			Catch Ex As Exception
				MsgBox(Ex.Message)
			End Try
		Else
			MsgBox("إختر أحد الخيارين أولاَ", MsgBoxStyle.Critical, "خطأ")
		End If
	End Sub


	Private Sub frmSearch_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
		Sqlconn.ConnectionString = "server=localhost; uid=sa; pwd=sa; database=Archiving"
		'TODO: This line of code loads data into the 'DataSet1.PERSON' table. You can move, or remove it, as needed.
		Me.PERSONTableAdapter.Fill(Me.DataSet1.PERSON)

	End Sub

	Private Sub DataGridView1_CellContentClick(ByVal sender As System.Object, ByVal e As System.Windows.Forms.DataGridViewCellEventArgs) Handles DataGridView1.CellContentClick

	End Sub

	Private Sub Label1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label1.Click

	End Sub
End Class

وهذه صوره INTERFACE

اخى فى الله السلام عليكم ورحمة الله وبركاته

اعتقد انى فهمة انت عاوز ايه بالضبط من عملية البحث

خذ المثال ده قمت بوضعه لك يقوم بكل عمليات البحث شوف كده وقولى رأيك ايه

CRAZY.NET.zip

هو يا اخى والله المثال اكسس معلش انا مش بشتغل سكول دلوقتى بس هتلاقى فيه طلبك

أشكرك أخي الفاضل علىمرورك وان شاء الله سأخبرك عن ما ان وجدت غايتي في مثالك المرفق أم لا وجزاك الله عني كل خير

والله يا أخي جربت الكود ولم أستطع تطبيقه على SQL SERVER سأشرح لكم ما أريدة بشيء من التفصيل

أنا لدي جدول اسمه(PERSON) وهذا الجدول فيه P_ID, P_F_NAME,P_L_NAME,P_M_NAME P_TYPE, P_GENDER, P_H_TEL,P_MOB,P_EMAIL, P_J_CODE, P_SALARY

وفي واجهة البرنامج يوجد TEXTBOX1 و BUTTON1 فقط إذا قام المستخدم بإدخال مثلاَ كلمة محمد في TEXTBOX1 ستظهر جميع بيانات من هم بإسم محمد في GRIDVIEW1 وإذا قام المستخدم بإدخال 2000 داخل TEXTBOX1 ستظهر جميع بيانات الموظفين التي رواتبهم 2000 في GRIDVIEW1 وهكذا المهم أن حقل الإدخال واحد و النتائج تظهر داخل GRIDVIEW وهذا الGRIDVIEW يكون مخفي في حالة عدم وجود نتائج

أتمنى منكم المساعدة ولكم مني خالص الدعاء.....