Okay, I'm pulling my hair out. I'm getting NO error on the following code:

Dim cmd As New OleDb.OleDbCommand("CREATE TABLE [" + empTableName + "] ([ID] DOUBLE, " & _
                                                                                "[LnameFname] TEXT(255), " & _
                                                                                "[Location] TEXT(255), " & _
                                                                                "[SalaryOld] DOUBLE, " & _
                                                                                "[FtePercentage] DOUBLE, " & _
                                                                                "[EvalScore] DOUBLE, " & _
                                                                                "[EvalUnitsPerm] DOUBLE, " & _
                                                                                "[EvalUnitsStipend] DOUBLE, " & _
                                                                                "[EvalIncreasePerm] DOUBLE, " & _
                                                                                "[EvalIncreaseStipend] DOUBLE, " & _
                                                                                "[ExperienceDegreeUnits] DOUBLE, " & _
                                                                                "[ExperienceDegreeIncrease] DOUBLE, " & _
                                                                                "[AcademicNeedsUnitsPerm] DOUBLE, " & _
                                                                                "[AcademicNeedsUnitsStipend] DOUBLE, " & _
                                                                                "[AcademicNeedsIncreasePerm] DOUBLE, " & _
                                                                                "[AcademicNeedsIncreaseStipend] DOUBLE, " & _
                                                                                "[LeadershipUnits] DOUBLE, " & _
                                                                                "[LeadershipIncrease] DOUBLE, " & _
                                                                                "[Classification] TEXT(255), " & _
                                                                                "[Notes] TEXT(255), " & _
                                                                                "[SalaryIncrease] DOUBLE, " & _
                                                                                "[Stipend] DOUBLE, " & _
                                                                                "[IndividualTotalUnitsPerm] DOUBLE, " & _
                                                                                "[IndividualTotalUnitsStipend] DOUBLE, " & _
                                                                                "[SalaryNew] DOUBLE, " & _
                                                                                "[MeetsAcademicNeeds] BIT)", frmMain.con)


                frmMain.con.Open()
                cmd.ExecuteNonQuery()
                frmMain.con.Close()

However, right after that code I use this code and get a syntax error. Can anyone tell me why? Thanks!

Dim cmd2 As New OleDb.OleDbCommand("CREATE TABLE [" + bulkCashAmountsTableName + "] ([ID] DOUBLE, " & _
                                                                                "[TeacherBulkAmountPerm] DOUBLE, " & _
                                                                                "[TeacherTotalUnitsPerm] DOUBLE, " & _
                                                                                "[TeacherUnitValuePerm] DOUBLE, " & _
                                                                                "[TeacherBulkAmountStipend] DOUBLE, " & _
                                                                                "[TeacherTotalUnitsStipend] DOUBLE, " & _
                                                                                "[TeacherUnitValueStipend] DOUBLE, " & _
                                                                                "[AdminBulkAmountPerm] DOUBLE, " & _
                                                                                "[AdminTotalUnitsPerm] DOUBLE, " & _
                                                                                "[AdminUnitValuePerm] DOUBLE, " & _
                                                                                "[AdminBulkAmountStipend] DOUBLE, " & _
                                                                                "[AdminTotalUnitsStipend] DOUBLE, " & _
                                                                                "[AdminUnitValueStipend] DOUBLE, " & _
                                                                                "[ClassifiedBulkAmountPerm] DOUBLE, " & _
                                                                                "[ClassifiedTotalUnitsPerm] DOUBLE, " & _
                                                                                "[ClassifiedUnitValuePerm] DOUBLE), " & _
                                                                                "[ClassifiedBulkAmountStipend] DOUBLE, " & _
                                                                                "[ClassifiedTotalUnitsStipend] DOUBLE, " & _
                                                                                "[ClassifiedUnitValueStipend] DOUBLE)", frmMain.con)

                frmMain.con.Open()
                cmd2.ExecuteNonQuery()
                frmMain.con.Close()

Recommended Answers

All 2 Replies

Extra right round bracket here:

"[ClassifiedUnitValuePerm] DOUBLE), " & _

I am suffering from code blindness. Thank you doctor gusano79!

Be a part of the DaniWeb community

We're a friendly, industry-focused community of developers, IT pros, digital marketers, and technology enthusiasts meeting, networking, learning, and sharing knowledge.