تقييم الموضوع :
  • 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)
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  مشكلة في عرض النص بالعربي في #Region فقط ali.alfoly 1 44 منذ 9 ساعة مضت
آخر رد: مساعدة
  ار جو المساعدة ما هي مشكلة كود التعديل والحذف boofa2015 2 36 أمس, 10:58 AM
آخر رد: boofa2015
  مشكلة ف الحفظ والتعديل بعد تحويل المشروع لملف تنفيذي apo yousef 0 21 20-02-17, 05:10 PM
آخر رد: apo yousef
  [VB.NET] مشكلة في كيفية اعادة الاتصال في TcpClient YazanOtoum 1 52 20-02-17, 01:03 PM
آخر رد: YazanOtoum
  [VB.NET] كيفية حل مشكلة Global.[String] فى ملف Settings.Designer.vb الماجيك مسعد 2 52 20-02-17, 03:08 AM
آخر رد: الماجيك مسعد
  [VB.NET] مشكلة في حدف صورة من مسار بمجلد بالكمبيوتر ناصر شير 6 96 18-02-17, 02:37 PM
آخر رد: ناصر شير
  [سؤال] حل مشكلة برنامج لتغير التاريخ عبدالرحمن المكاوي 6 126 17-02-17, 11:19 PM
آخر رد: EnormousSoft
  [VB.NET] مشكلة نقل الكود من Form2 الي Form1 3asfa~mdmra 2 73 17-02-17, 02:44 AM
آخر رد: الماجيك مسعد
  [كود] حل مشكلة في كود عبدالرحمن المكاوي 12 160 16-02-17, 12:30 AM
آخر رد: مساعدة
  مشكلة واحدة على انتهاء المشروع Mohamed20 0 35 13-02-17, 01:49 AM
آخر رد: Mohamed20

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


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