I have created the Commands Insert, update and such when I created the DS and Datat adapter objects. An oddly enough one piece of code will work. I can add records to the one database. None of the other commands seem to work. the data is found and I can work with it. I am also preventing the user from altering the database when it is displayed. Only by inputting the data into prompts or forms. I doubt that is important. So I generate the commands just for simplicity and lack of familiarity in dealing with databases. I am told that they were created successfully and since some of it works I am trying to figure out what is going on. I doubt anything I am doing is complex enough for the Command builder to not work with it. The Database in question is only one field and not even link to anyhting else. I use others in the program but figure if I solve this one the others should be obvious as well. The form inquestion only hase on connection, Datasource, and adapter. Only needs one table from a database.

here is the relevent code generated by VB
'
'MyConnect
'
Me.MyConnect.ConnectionString = "Jet OLEDB:Global Partial Bulk Ops=2;Jet OLEDB:Registry Path=;Jet OLEDBatabase L" & _
"ocking Mode=1;Data Source=""C:\StartTimes Sheet\Sheetsdb.mdb"";Jet OLEDB:Engine Ty" & _
"pe=5;Provider=""Microsoft.Jet.OLEDB.4.0"";Jet OLEDB:System database=;Jet OLEDB:SFP" & _
"=False;persist security info=False;Extended Properties=;Mode=Share Deny None;Jet" & _
" OLEDB:Encrypt Database=False;Jet OLEDB:Create System Database=False;Jet OLEDB" & _
"on't Copy Locale on Compact=False;Jet OLEDB:Compact Without Replica Repair=False" & _
";User ID=Admin;Jet OLEDB:Global Bulk Transactions=1"
'
'myAdapt
'
Me.myAdapt.DeleteCommand = Me.OleDbDeleteCommand1
Me.myAdapt.InsertCommand = Me.OleDbInsertCommand1
Me.myAdapt.SelectCommand = Me.OleDbSelectCommand1
Me.myAdapt.TableMappings.AddRange(New System.Data.Common.DataTableMapping() {New System.Data.Common.DataTableMapping("Table", "Building List", New System.Data.Common.DataColumnMapping() {New System.Data.Common.DataColumnMapping("Buildings", "Buildings")})})
Me.myAdapt.UpdateCommand = Me.OleDbUpdateCommand1
'
'OleDbSelectCommand1
'
Me.OleDbSelectCommand1.CommandText = "SELECT Buildings FROM [Building List]"
Me.OleDbSelectCommand1.Connection = Me.MyConnect
'
'OleDbInsertCommand1
'
Me.OleDbInsertCommand1.CommandText = "INSERT INTO [Building List] (Buildings) VALUES (?)"
Me.OleDbInsertCommand1.Connection = Me.MyConnect
Me.OleDbInsertCommand1.Parameters.Add(New System.Data.OleDb.OleDbParameter("Buildings", System.Data.OleDb.OleDbType.VarWChar, 50, "Buildings"))
'
'OleDbUpdateCommand1
'
Me.OleDbUpdateCommand1.CommandText = "UPDATE [Building List] SET Buildings = ? WHERE (Buildings = ?)"
Me.OleDbUpdateCommand1.Connection = Me.MyConnect
Me.OleDbUpdateCommand1.Parameters.Add(New System.Data.OleDb.OleDbParameter("Buildings", System.Data.OleDb.OleDbType.VarWChar, 50, "Buildings"))
Me.OleDbUpdateCommand1.Parameters.Add(New System.Data.OleDb.OleDbParameter("Original_Buildings", System.Data.OleDb.OleDbType.VarWChar, 50, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "Buildings", System.Data.DataRowVersion.Original, Nothing))
'
'OleDbDeleteCommand1
'
Me.OleDbDeleteCommand1.CommandText = "DELETE FROM [Building List] WHERE (Buildings = ?)"
Me.OleDbDeleteCommand1.Connection = Me.MyConnect
Me.OleDbDeleteCommand1.Parameters.Add(New System.Data.OleDb.OleDbParameter("Original_Buildings", System.Data.OleDb.OleDbType.VarWChar, 50, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "Buildings", System.Data.DataRowVersion.Original, Nothing))
'

the oddest thing is the record I try to delete is removed from the data displayed and from the DS I would think. However it is not removed from the database when I exit the program. I have another section where it won't even add the record but thats after the this problem is fixed. If any other code or questions would be relevent please let me know.

Yeah Mar you do have a nice little gif there.