تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[VB.NET] سؤال بخصوص ALTER TABLE
#1
محتاج اضيف  add field   ALTER TABLE جديد في التيبل 

وراح اضيف عدد 2 او 3

جربت هذا الكود


كود :
Dim sqlConnection As New SQLite.SQLiteConnection()
       Dim sqlCommand As New SQLiteCommand("", sqlConnection)
       sqlConnection.ConnectionString = "Data Source= " & My.Application.Info.DirectoryPath & "\ww.s3db"
       sqlConnection.Open()
       sqlCommand.CommandText = "ALTER TABLE www ADD wde VARCHAR(30) NULL "
       sqlCommand.ExecuteNonQuery()
       sqlConnection.Close()

       Dim sqlConnectionq As New SQLite.SQLiteConnection()
       Dim sqlCommandq As New SQLiteCommand("", sqlConnectionq)
       sqlConnectionq.ConnectionString = "Data Source= " & My.Application.Info.DirectoryPath & "\ww.s3db"
       sqlConnectionq.Open()
       sqlCommandq.CommandText = "ALTER TABLE www ADD sld VARCHAR(30)NULL "
       sqlCommandq.ExecuteNonQuery()
       sqlConnectionq.Close()


       Dim sqlConnectionq1 As New SQLite.SQLiteConnection()
       Dim sqlCommandq1 As New SQLiteCommand("", sqlConnectionq1)
       sqlConnectionq1.ConnectionString = "Data Source= " & My.Application.Info.DirectoryPath & "\ww.s3db"
       sqlConnectionq1.Open()
       sqlCommandq1.CommandText = "ALTER TABLE www ADD club_sent VARCHAR(10) DEFAULT 'N' NULL"
       sqlCommandq1.ExecuteNonQuery()
       sqlConnectionq1.Close()
 

بس موب ضابط معاي ويضيف واحد فقط اما الاخرين ما يضيفهم


ممكن الكود الصحيح بارك الله فيكم

وشكرا
الرد
تم الشكر بواسطة:
#2
السلام عليكم أخي العزيز ورحمة الله وبركاته
الكود كامل بهذه الطريقة :
PHP كود :
Dim sqlConnection As New SQLite.SQLiteConnection()
       
Dim sqlCommand As New SQLiteCommand(""sqlConnection)
       
sqlConnection.ConnectionString "Data Source= " My.Application.Info.DirectoryPath "\ww.s3db"
       
sqlConnection.Open()
       
sqlCommand.CommandText "ALTER TABLE www ADD wde VARCHAR(30) NULL,sld VARCHAR(30)NULL,club_sent VARCHAR(10) DEFAULT 'N' NULL "
       
sqlCommand.ExecuteNonQuery()
       
sqlConnection.Close() 
إسرائيل إلى زوال ...  وسوف تثبت الأيام ذلك ... قريباً إن شاء الله.
الرد
تم الشكر بواسطة: dubai.eig
#3
(25-02-17, 05:47 PM)khodor1985 كتب : السلام عليكم أخي العزيز ورحمة الله وبركاته
الكود كامل بهذه الطريقة :
PHP كود :
Dim sqlConnection As New SQLite.SQLiteConnection()
 
      Dim sqlCommand As New SQLiteCommand(""sqlConnection)
 
      sqlConnection.ConnectionString "Data Source= " My.Application.Info.DirectoryPath "\ww.s3db"
 
      sqlConnection.Open()
 
      sqlCommand.CommandText "ALTER TABLE www ADD wde VARCHAR(30) NULL,sld VARCHAR(30)NULL,club_sent VARCHAR(10) DEFAULT 'N' NULL "
 
      sqlCommand.ExecuteNonQuery()
 
      sqlConnection.Close() 



شكرا لك

جربت الكود وعطاني مسج

كود :
Additional information: SQL logic error or missing database

near ",": syntax error


بس عندما جربت اضيف واحد فقط نجح وضاف واحد فقط
كود :
"ALTER TABLE www ADD wde VARCHAR(30) NULL"

اما اذا حطيت اثنين او ثلاث يعطيني مسج الغلط
كود :
"ALTER TABLE www ADD wde VARCHAR(30) NULL,sld VARCHAR(30)NULL,club_sent VARCHAR(10) DEFAULT 'N' NULL "


بارك الله فيك وشكرا من جديد
الرد
تم الشكر بواسطة:
#4
السلام عليكم أخي العزيز ورحمة الله وبركاته
أعتقد أنك قد خلطت الأمور أنظر إلى جملة الإتصال واحدة تابعة لقاعدة بيانات من نوع SQL Server والثانية من نوع SQlLite، يا أخي وحد جملة الإتصال مع قاعدة البيانات

جملة الـ Alter صحيحة مئة بالمئة هكذا تكتب ويمكنك البحث عن ذلك والتأكد.

ما هي قاعدة البيانات التي تستخدمها؟
إسرائيل إلى زوال ...  وسوف تثبت الأيام ذلك ... قريباً إن شاء الله.
الرد
تم الشكر بواسطة: dubai.eig
#5
(25-02-17, 06:40 PM)khodor1985 كتب : السلام عليكم أخي العزيز ورحمة الله وبركاته
أعتقد أنك قد خلطت الأمور أنظر إلى جملة الإتصال واحدة تابعة لقاعدة بيانات من نوع SQL Server والثانية من نوع SQlLite، يا أخي وحد جملة الإتصال مع قاعدة البيانات

جملة الـ Alter صحيحة مئة بالمئة هكذا تكتب ويمكنك البحث عن ذلك والتأكد.

ما هي قاعدة البيانات التي تستخدمها؟


بارك الله فيك شكرا لك

عدلة في الكود بس لازالت المشكله
Smile
كود :
       Dim SQLiteconnect As New SQLite.SQLiteConnection()
       Dim SQLitecommand As SQLiteCommand
       SQLiteconnect.ConnectionString = "Data Source= " & My.Application.Info.DirectoryPath & "\ww.s3db"
       SQLiteconnect.Open()
       SQLitecommand = SQLiteconnect.CreateCommand

       SQLitecommand.CommandText = "ALTER TABLE www ADD wde VARCHAR(30) NULL,sld VARCHAR(30)NULL,club_sent VARCHAR(10) DEFAULT 'N' NULL"
       SQLitecommand.ExecuteNonQuery()
       SQLitecommand.Dispose()
       SQLiteconnect.Close()


انا بعد متاكد ان اللي كتبته انت صح 

بس اكيد في غلط معين مني انا

اسمحلي تعبتك وشكرا على الرد اكيد في غلط مني احاول احصل الغلط واحله

شكرا
الرد
تم الشكر بواسطة:
#6
السلام عليكم

تفضل التعديل التالي
كود :
Dim sqlConnection As New SQLiteConnection("Data Source= " & My.Application.Info.DirectoryPath & "\ww.s3db")
Dim sqlCommand As New SQLiteCommand(String.Empty, sqlConnection)

sqlCommand.CommandText =
   "ALTER TABLE www ADD wde VARCHAR(30) NULL; " & _
   "ALTER TABLE www ADD sld VARCHAR(30)NULL; " & _
   "ALTER TABLE www ADD club_sent VARCHAR(10) DEFAULT 'N' NULL; "

sqlConnection.Open()
sqlCommand.ExecuteNonQuery()
sqlConnection.Close()
الرد
تم الشكر بواسطة: ابو ابراهيم


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  سؤال في تغيير قيمة الخلية sofiane-phy 3 34 منذ 2 ساعة مضت
آخر رد: sofiane-phy
  [VB.NET] ;سؤال كيفية تعديل المدخلات في (الداتا قريد فيو ) قبل الحفظ في قاعدة البيانات EYADISMAIL 4 126 أمس, 01:26 AM
آخر رد: EYADISMAIL
  سؤال بخصوص تحديث بيانات DataGridView abdullhadi999 14 257 09-01-19, 10:56 PM
آخر رد: abdullhadi999
  سؤال عن سبب ظهور خطا غير متوقع alipro 3 87 08-01-19, 04:28 AM
آخر رد: محمد كريّم
  سؤال عن ربط الاكسل مع vb philo 3 105 07-01-19, 02:57 PM
آخر رد: elgokr
Big Grin سؤال حول فحص اذا كان برنامج قيد التشغيل او لا ahmadpal 4 90 07-01-19, 02:50 PM
آخر رد: elgokr
  سؤال فى الداتا جريد فيو احمد خطاب 5 148 03-01-19, 08:59 PM
آخر رد: احمد خطاب
  بخصوص مشكلة فى الفيجوال ستوديو( هام ) salah mansour 11 226 02-01-19, 09:47 PM
آخر رد: salah mansour
  سؤال حول امر الطباعة الفورية Osama Bayoumy 5 455 01-01-19, 01:02 AM
آخر رد: اسامه الهرماوي
  [VB.NET] سؤال في console farfour 1 57 29-12-18, 05:02 AM
آخر رد: trakktour

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


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