(*ClearAll["Global`*"]
ClearAll["qPanel*"]*)
Get[FileNameJoin[{NotebookDirectory[],"Symbex27MTH140TRIG.m"}]];
expr=Column[{readTitle[,"MTH140 Trigonometry, Sept 2015", "Dr. Alvarez"],qPanel1[1,True],qPanel2[2,True],qPanel3[3,True],qPanel4[4,True],qPanel5[5,True],qSendLocal["\\\\acfs-01.ruad.ryerson.ca\\public$\\Courses\\MTH140\\Results", "MTH140 Trig, Sept 2015"<> ", "<>"Dr. Alvarez"]}];
CDFDeploy[ToFileName[{$UserDocumentsDirectory},"MTH140_TRIG_TEST.cdf"],expr,
"Method"->"Standalone"];

Get[FileNameJoin[{NotebookDirectory[],"Symbex27MTH140LOG.m"}]];
expr=Column[{readTitle[,"MTH140 Logarithm, Sept 2015", "Dr. Alvarez"],qPanel1[1,True],qPanel2[2,True],qPanel3[3,True],qPanel4[4,True],qPanel5[5,True],qPanel7[6,True],qSendLocal["\\\\acfs-01.ruad.ryerson.ca\\public$\\Courses\\MTH140\\Results", "MTH140 Logarithm, Sept 2015"<> ", "<>"Dr. Alvarez"]}];
CDFDeploy[ToFileName[{$UserDocumentsDirectory},"MTH140_LOG_TEST.cdf"],expr,
"Method"->"Standalone"];

Get[FileNameJoin[{NotebookDirectory[],"Symbex27MTH140LOG.m"}]];
expr=Column[{readTitle[,"MTH140 Logarithm, Sept 2015", "Dr. Alvarez"],
qPanel1[1,False],qPanel2[2,False],qPanel3[3,False],qPanel4[4,False],qPanel5[5,False],qPanel7[6,False]}];
CDFDeploy[ToFileName[{$UserDocumentsDirectory},"MTH140_LOG_PRAC.cdf"],expr,
"Method"->"Standalone"];

Get[FileNameJoin[{NotebookDirectory[],"Symbex27MTH140POLY.m"}]];
expr=Column[{readTitle[,"MTH140 Polynomials, Sept 2015", "Dr. Alvarez"],qPanel1[1,True],qPanel2[2,True],qPanel3[3,True],qPanel4[4,True],qPanel5[5,True],qPanel6[6,True],qPanel7[7,True],qPanel8[8,True],qSendLocal["\\\\acfs-01.ruad.ryerson.ca\\public$\\Courses\\MTH140\\Results", "MTH140 Poly, Sept 2015"<> ", "<>"Dr. Alvarez"]}];
CDFDeploy[ToFileName[{$UserDocumentsDirectory},"MTH140_POLY_TEST.cdf"],expr,
"Method"->"Standalone"];

Get[FileNameJoin[{NotebookDirectory[],"Symbex27MTH140TRIG.m"}]];
expr=Column[{readTitle[,"MTH141 Trigonometry, Sept 2015", "Dr. Alvarez"],qPanel1[1,True],qPanel2[2,True],qPanel3[3,True],qPanel4[4,True],qPanel5[5,True],qSendLocal["\\\\acfs-01.ruad.ryerson.ca\\public$\\Courses\\MTH141\\Results", "MTH141 Trig, Sept 2015"<> ", "<>"Dr. Alvarez"]}];
CDFDeploy[ToFileName[{$UserDocumentsDirectory},"MTH141_TRIG_TEST.cdf"],expr,
"Method"->"Standalone"];

Get[FileNameJoin[{NotebookDirectory[],"Symbex27MTH140LOG.m"}]];
expr=Column[{readTitle[,"MTH141 Logarithm, Sept 2015", "Dr. Alvarez"],qPanel1[1,True],qPanel2[2,True],qPanel3[3,True],qPanel4[4,True],qPanel5[5,True],qPanel7[6,True],qSendLocal["\\\\acfs-01.ruad.ryerson.ca\\public$\\Courses\\MTH141\\Results", "MTH141 Logarithm, Sept 2015"<> ", "<>"Dr. Alvarez"]}];
CDFDeploy[ToFileName[{$UserDocumentsDirectory},"MTH141_LOG_TEST.cdf"],expr,
"Method"->"Standalone"];

Get[FileNameJoin[{NotebookDirectory[],"Symbex27MTH140LOG.m"}]];
expr=Column[{readTitle[,"MTH140 Logarithm, Sept 2015", "Dr. Alvarez"],
qPanel1[1,False],qPanel2[2,False],qPanel3[3,False],qPanel4[4,False],qPanel5[5,False],qPanel7[6,False]}];
CDFDeploy[ToFileName[{$UserDocumentsDirectory},"MTH141_LOG_PRAC.cdf"],expr,
"Method"->"Standalone"];

Get[FileNameJoin[{NotebookDirectory[],"Symbex27MTH140POLY.m"}]];
expr=Column[{readTitle[,"MTH141 Polynomials, Sept 2015", "Dr. Alvarez"],qPanel1[1,True],qPanel2[2,True],qPanel3[3,True],qPanel4[4,True],qPanel5[5,True],qPanel6[6,True],qPanel7[7,True],qPanel8[8,True],qSendLocal["\\\\acfs-01.ruad.ryerson.ca\\public$\\Courses\\MTH141\\Results", "MTH141 Poly, Sept 2015"<> ", "<>"Dr. Alvarez"]}];
CDFDeploy[ToFileName[{$UserDocumentsDirectory},"MTH141_POLY_TEST.cdf"],expr,
"Method"->"Standalone"];