[dubai.eig]

محتاج اضيف  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()

 

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


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

وشكرا