كيفية عمل تحقق من أن اسم سمتخدم متاح ولم يتم حجزه

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

خذ إسم المستخدم الذي سيتم ادخاله ثم قم بعمل for loop على أسماء المستخدمين واذا لم يتم مطابقة الإسم مع أي من الموجود داخل قاعدة البيانات فاظهر له باقي الحقول لاستكمال التسجيل.

حل آخر:

يمكنك استخدام جملة SQL كالتالي مع التعديل عليها بما يناسبك

Select UserName from users where UserName = 'Your Variable'

ثم قم بالكشف عن نتيجة الاستعلام فإذا كانت تحتوي قيمة فهذا يعني أن إسم المستخدم موجود من قبل و في هذه الحالة اظهر له الرسالة التي تفيد بوجود إسم المستخدم من قبل.

أرجوا أن تكون الفكرة واضحة

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

تفضل يا اخي الكريم

الكود كامل

فقط نفذ على اسماء الداتا بيز عندك

تقبل تحياتي

if Textb3.Text <> "" Then

 Dim sql1 As String = "select uaser_Name from uaser where uaser_Name =@1"

Dim conn1 As New SqlConnection(connectionstring)

Dim cmd1 As New SqlCommand(sql1, conn1)

cmd1.Parameters.Add("@1", t3.Text)

conn1.Open()

Dim resalt As String

 resalt = cmd1.ExecuteScalar

If Textb3.Text = resalt Then

 Session("2") = t3.Text

Label1.Text = " موجود من قبل "

 Else


Dim sql As String = "insert into tblUsers(user_name,user_pass) values(@1,@2)"

Dim conn As New SqlConnection(connectionstring)
						Dim cmd As New SqlCommand(sql, conn)
						cmd.Parameters.Add("@1", T1.Text)
						cmd.Parameters.Add("@2", T2.Text)
						Session("log") = "1"
						Session("uasername") = T1.Text
						conn.Open()
						cmd.ExecuteNonQuery()
						conn.Close()
						Response.Redirect("Page.aspx")
						T1.Text = ""
					   T2.Text = ""
		End If