strSQL = "DROP TABLE tmpEmpTrained, tmpStaffCount, tmpCostLength, CorporateSummary" DataEnv.dbTSS.Execute strSQL strSQL = "CREATE VIEW tmpEmpTrained AS SELECT DISTINCT EmployeeID FROM Requests" DataEnv.dbTSS.Execute strSQL strSQL = strSQL + "CREATE VIEW tmpStaffCount AS SELECT StaffCount FROM Budget" DataEnv.dbTSS.Execute strSQL strSQL = "CREATE VIEW tmpCostLength AS SELECT Sum(ActualCost) AS SumCost, Sum(Length) AS SumLength FROM Requests INNER JOIN Courses ON Requests.CourseID = Courses.ID" DataEnv.dbTSS.Execute strSQL strSQL = "CREATE TABLE CorporateSummary (item0 varchar(50), item1 varchar(30), item2 varchar(30), item3 varchar(30), item4 varchar(30), item5 varchar(30), item6 varchar(30))" DataEnv.dbTSS.Execute strSQLbut would prefer to be able to do something like:
strSQL = "DROP TABLE tmpEmpTrained, tmpStaffCount, tmpCostLength, CorporateSummary;" strSQL = strSQL + "CREATE VIEW tmpEmpTrained AS SELECT DISTINCT EmployeeID FROM Requests;" strSQL = strSQL + "CREATE VIEW tmpStaffCount AS SELECT StaffCount FROM Budget;" strSQL = strSQL + "CREATE VIEW tmpCostLength AS SELECT Sum(ActualCost) AS SumCost, Sum(Length) AS SumLength FROM Requests INNER JOIN Courses ON Requests.CourseID = Courses.ID;" strSQL = strSQL + "CREATE TABLE CorporateSummary (item0 varchar(50), item1 varchar(30), item2 varchar(30), item3 varchar(30), item4 varchar(30), item5 varchar(30), item6 varchar(30));" DataEnv.dbTSS.Execute strSQLIt doesn't appear to work though?