تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
اريد حلا التخزين في قاعدة البيانات
#1
Dim saveok As Boolean saveok = winclass.SQLEXICUTE(" Insert Into Users (username,userpass) Valuse ('" & TextBox1.Text & "'," & TextBox2.Text & " )") If saveok = True Then MsgBox("تمت عملية الاضافة", MsgBoxStyle.Exclamation) TextBox1.Text = "" TextBox2.Text = "" filldatagrid() End If
عندي مشكلة في saveok دائما = false
ما هو سبب المشكلة وما هو الحل؟؟
الرد }}}
تم الشكر بواسطة:
#2

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






جرب هذا لتعديل

كود :
Dim saveok As Integer
saveok = 0
saveok = winclass.SQLEXICUTE(" Insert Into Users (username,userpass) Valuse ('" & TextBox1.Text & "','" & TextBox2.Text & "' )")

If saveok = 1 Then MsgBox("تمت عملية الاضافة", MsgBoxStyle.Exclamation)
    TextBox1.Text = ""
    TextBox2.Text = ""
    filldatagrid()
End If





السلام عليكم ورحمة الله وبركاته
الرد }}}
تم الشكر بواسطة:
#3
متشكر جدا يا استاذي ابو رائد على اهتمامك
الرد }}}
تم الشكر بواسطة:
#4
جربت الكود الجديد واعطني نفس النتيجة saveok = 0
ولم يتم الحفظ
هل المشكل في قاعدة البيانات ام ما هي المشكلة ؟
الرد }}}
تم الشكر بواسطة:
#5
السلام عليكم اخى قومت باستخد اهذى المكبتة و هى هتقوم بعمل الاضافة لوحده بسطر كود واحد فقط و قولى تحل المشكلة ولا لسه
http://vb4arb.com/vb/showthread.php?66-%...F%E6%C7%E1
يَامَعْشَرَ الْجِنِّ وَالإِنسِ إِنْ اسْتَطَعْتُمْ أَنْ تَنفُذُوا مِنْ أَقْطَارِ السَّمَاوَاتِ وَالأَرْضِ فَانفُذُوا لا تَنفُذُونَ إِلاّ بِسُلْطَانٍ(33) سورة الرحمن
الرد }}}
تم الشكر بواسطة:
#6
اخي على شكرا على اهتمامك
اريد ان تعطني السنارة و لا تعطني السمكه
اريد ان تفهمني ماهو الخطأ
وانا جربت المكتبة ولكنها لا تسجل اللغة العربية
الرد }}}
تم الشكر بواسطة:
#7
المشكلة عندك اخى هى ان الحقل فى قاعدة البيانات لا يقبل عربى هى دى المشكلة عندك
يَامَعْشَرَ الْجِنِّ وَالإِنسِ إِنْ اسْتَطَعْتُمْ أَنْ تَنفُذُوا مِنْ أَقْطَارِ السَّمَاوَاتِ وَالأَرْضِ فَانفُذُوا لا تَنفُذُونَ إِلاّ بِسُلْطَانٍ(33) سورة الرحمن
الرد }}}
تم الشكر بواسطة:
#8
اكيد انت مستخدم قاعدة بيانات سيكوال
افتح الجدوال فى وضع التصميم و اضغط على الحقل و من الخصائيص خليه يدعم الغة العربية بس كده
يَامَعْشَرَ الْجِنِّ وَالإِنسِ إِنْ اسْتَطَعْتُمْ أَنْ تَنفُذُوا مِنْ أَقْطَارِ السَّمَاوَاتِ وَالأَرْضِ فَانفُذُوا لا تَنفُذُونَ إِلاّ بِسُلْطَانٍ(33) سورة الرحمن
الرد }}}
تم الشكر بواسطة:
#9

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




لقد أعتمتد على أن الحقل userpass هو نصي، ولكن حين دققت في ما كتبته أنت يبدو لي رقمي
جرب هذا التعديل بعد العتماد أن حقل userpass رقمي (إذا كنت وضعت On Error قم بتعطيله لمعرفة إذا كان هناك خطأ في جملة الاستعلام)

كود :
Dim saveok As Integer
saveok = 0
saveok = winclass.SQLEXICUTE(" Insert Into Users (username,userpass) Valuse ('" & TextBox1.Text & "'," & TextBox2.Text & " )")

If saveok = 1 Then MsgBox("تمت عملية الاضافة", MsgBoxStyle.Exclamation)
    TextBox1.Text = ""
    TextBox2.Text = ""
    filldatagrid()
End If





السلام عليكم ورحمة الله وبركاته
الرد }}}
تم الشكر بواسطة:
#10
ارجو من حضرتك اعادة كتاب الكود الجديد حضرتك كتبت نفس الكود السابق
الرد }}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  تصدير البيانات إلى ملف RTF مصمم هاوي 4 823 15-08-25, 04:13 PM
آخر رد: أبو خالد الشكري
  [VB.NET] ما هو أفضل موقع استضافة لقواعد البيانات MSSQL ؟ mmaalmesry 0 796 16-07-25, 10:45 PM
آخر رد: mmaalmesry
  مساعدة في كيفية ترحيل البيانات من داتا قريدفيو إلى داتا قريدفيو في فيجوال بيسك ahmedfa71 13 2,221 09-07-25, 11:24 PM
آخر رد: أبو خالد الشكري
  مشكلة في حفظ البيانات مصمم هاوي 2 1,019 30-06-25, 08:51 AM
آخر رد: مصمم هاوي
  بطء في جلب البيانات مصمم هاوي 9 1,001 08-05-25, 07:51 AM
آخر رد: مصمم هاوي
  [Acces2007] مشكلة ملف قاعدة بيانات access للقراءة فقط mmaalmesry 11 1,453 29-04-25, 08:55 PM
آخر رد: mmaalmesry
  تعديل كود تحديث البيانات مصمم هاوي 1 784 26-04-25, 06:07 PM
آخر رد: مصمم هاوي
Photo لايمكن تعرف على تنسيق قاعدة البيانات الدريساوي 2 697 26-04-25, 12:24 AM
آخر رد: الدريساوي
  مساعدة في طريقة تحميل الفيديوهات المخزنة في قاعدة البيانات foad8920 0 660 24-04-25, 12:58 PM
آخر رد: foad8920
  إغلاق الفورم مع حذف جميع البيانات الموجودة به صالح عبدالله 10 1,038 19-04-25, 08:54 PM
آخر رد: Kamil

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


يقوم بقرائة الموضوع: