تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
مشكلة في كود التسجيل بموقعي ..
#1
السلام عليكم ورحمة الله

حياكم الله إخوتي

سامحوني على أي إزعاج

ولكن أريد مساعدتكم فضلاً حول كود التسجيل بالدوت نت بلغة الفيجوال بيسك

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

فلا أدري ما هي المشكلة ؟

ولدي استفسار حول كيفية ربط جدول اللوجن بالريجيستر في الداتا بيز ؟

في المرفق الصفحة الخاصة بالتسجيل علماً بأن الداتا بيز كبيرة جدا ولم استطع نسخها ولكن ما في الجدول موضح
في ملف الكود ..

جزاكم الله كل خير


كود :
If Page.IsPostBack = False Then

           Using sqlCon As New SqlConnection(ConfigurationManager.ConnectionStrings("Constr").ConnectionString)
               sqlCon.Open()
               Dim query As String
               query = "insert into AdminSignUp(Username,Password,Email) VALUES(@Username,@Password,@Email)"

               Dim sqlcmd As New SqlCommand(query, sqlCon)
               sqlcmd.Parameters.AddWithValue("@username", txtUsername)
               sqlcmd.Parameters.AddWithValue("@password", txtPassword)
               sqlcmd.Parameters.AddWithValue("@email", txtEmail)
               sqlcmd.ExecuteNonQuery()


               Session.Item("Username") = txtUsername.Text
           End Using

           MsgBox("Account Created with Success")
           Response.Redirect("default.aspx")


       End If

كود آخر



كود :
   Protected Sub RegisterUser(sender As Object, e As EventArgs) Handles Button1.Click

Try
           cmd.Connection = con
           'assigning connection to command
           cmd.CommandType = CommandType.Text
           'representing type of command
         
           cmd.CommandText = "INSERT INTO AdminSignUp VALUES (@Username,@Email,@Password)"

           'adding parameters with value
           cmd.Parameters.AddWithValue("@Username", txtUsername.Text.ToString())
           cmd.Parameters.AddWithValue("@Email", txtEmail.Text.ToString())
           cmd.Parameters.AddWithValue("@Password", txtPassword.Text.ToString())
           con.Open()
           'opening connection
           cmd.Connection = con
           cmd.ExecuteNonQuery()
           'executing query
           con.Close()
           'closing connection

           LabelMSG.Text = "Registered Successfully.."
       Catch ex As Exception
           LabelMSG.Text = ex.Message.ToString()
       Finally
           If con.State = ConnectionState.Open Then con.Close()
       End Try
End sub
T


الملفات المرفقة
.rar   code.rar (الحجم : 2.82 ك ب / التحميلات : 10)
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  حل مشكلة الكود الاتي - سهل- CLARO 3 84 02-12-16, 04:06 PM
آخر رد: ali.alfoly
  كيف يتم حل مشكلة ظهور رسالة عند الضغط علي هيد داتا جريد فيو السيد الجوهري 4 61 30-11-16, 10:08 PM
آخر رد: السيد الجوهري
  [VB.NET] مشكلة عند عمل تحديث للبيانات Asmaa adel 3 79 27-11-16, 03:56 PM
آخر رد: Adrees
Rainbow [VB.NET] مشكلة طابعة الباركود محمد اسماعيل 3 269 27-11-16, 10:30 AM
آخر رد: adel27
  [SQL] مشكلة عند الاتصال بالسيكوال سيرفر تظهر الرسالة التالية Asmaa adel 8 188 21-11-16, 11:58 PM
آخر رد: Asmaa adel
  [سؤال] مشكلة في إعادة تنفيذ البرنامج wael khlak 1 53 21-11-16, 11:48 PM
آخر رد: السرور
  [VB.NET] مشكلة في كود البحث khalid475 14 237 11-11-16, 07:52 PM
آخر رد: khalid475
Question [سؤال] مشكلة محيرتني هل من مساعدة shwehdi4pc 14 2,120 10-11-16, 03:55 PM
آخر رد: أبوبكر سويدان
  [VB.NET] مشكلة في Timer 3asfa~mdmra 1 81 07-11-16, 02:09 PM
آخر رد: hassan
  [سؤال] مشكلة في حفظ البيانات باستخدام datagridview abdalla89 6 362 05-11-16, 02:47 AM
آخر رد: نايف 2006

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم