2009-06-07, 02:37
Patch for the Change Movie (SetInfo)
Keep up the good work
Code:
Index: dlgEditMovie.vb
===================================================================
--- dlgEditMovie.vb (revision 253)
+++ dlgEditMovie.vb (working copy)
@@ -497,7 +497,7 @@
If Master.eSettings.UseNameFromNfo Then
Using SQLcommand As SQLite.SQLiteCommand = Master.SQLcn.CreateCommand
Dim parTitle As SQLite.SQLiteParameter = SQLcommand.Parameters.Add("parTitle", DbType.String, 255, "title")
- Dim parID As SQLite.SQLiteParameter = SQLcommand.Parameters.Add("parID", DbType.Boolean, 1, "id")
+ Dim parID As SQLite.SQLiteParameter = SQLcommand.Parameters.Add("parID", DbType.Int32, 1, "id")
SQLcommand.CommandText = "UPDATE movies SET title = (?) WHERE id = (?);"
parTitle.Value = .txtTitle.Text.Trim
parID.Value = Me._id
@@ -601,7 +601,7 @@
Using SQLcommand As SQLite.SQLiteCommand = Master.SQLcn.CreateCommand
Dim parMark As SQLite.SQLiteParameter = SQLcommand.Parameters.Add("parMark", DbType.Boolean, 1, "mark")
- Dim parID As SQLite.SQLiteParameter = SQLcommand.Parameters.Add("parID", DbType.Boolean, 1, "id")
+ Dim parID As SQLite.SQLiteParameter = SQLcommand.Parameters.Add("parID", DbType.Int32, 1, "id")
SQLcommand.CommandText = "UPDATE movies SET mark = (?) WHERE id = (?);"
parMark.Value = Me.chkMark.Checked
parID.Value = Me._id
Keep up the good work