/// <summary>
/// create Ordered list
/// </summary>
private void CreateOrderedList()
{
Application app = new Application();
app.Visible = true;
Document doc = app.Documents.Add();
Range range = doc.Range(0, 0);
range.ListFormat.ApplyNumberDefault();
range.Text = "Birinci";
range.InsertParagraphAfter();
ListTemplate listTemplate = range.ListFormat.ListTemplate;
Range subRange = doc.Range(range.StoryLength - 1);
subRange.ListFormat.ApplyBulletDefault();
subRange.ListFormat.ListIndent();
subRange.Text = "Alt Birinci";
subRange.InsertParagraphAfter();
ListTemplate sublistTemplate = subRange.ListFormat.ListTemplate;
Range subRange2 = doc.Range(subRange.StoryLength - 1);
subRange2.ListFormat.ApplyListTemplate(sublistTemplate);
subRange2.ListFormat.ListIndent();
subRange2.Text = "Alt İkinci";
subRange2.InsertParagraphAfter();
Range range2 = doc.Range(range.StoryLength - 1);
range2.ListFormat.ApplyListTemplateWithLevel(listTemplate, true);
WdContinue isContinue = range2.ListFormat.CanContinuePreviousList(listTemplate);
range2.Text = "İkinci";
range2.InsertParagraphAfter();
Range range3 = doc.Range(range2.StoryLength - 1);
range3.ListFormat.ApplyListTemplate(listTemplate);
range3.Text = "Üçüncü";
range3.InsertParagraphAfter();
}
//Create document method
private void CreateDocument()
{
try
{
//Create an instance for word app
Microsoft.Office.Interop.Word.Application winword = new Microsoft.Office.Interop.Word.Application();
//Set animation status for word application
winword.ShowAnimation = false;
//Set status for word application is to be visible or not.
winword.Visible = false;
//Create a missing variable for missing value
object missing = System.Reflection.Missing.Value;
//Create a new document
Microsoft.Office.Interop.Word.Document document = winword.Documents.Add(ref missing, ref missing, ref missing, ref missing);
//Styles
object Title = "Title";
object Header1 = "Heading 1";
object SubtleReference = "Subtle Reference";
object SubtleEmph = "Subtle Emphasis";
object NoSpacing = "No Spacing";
object ListPara = "List Paragraph";
//Title Section
//Report title Site name
Paragraph title1 = document.Content.Paragraphs.Add(ref missing);
string siteNameCap = ReportCreator.siteName.ToUpper();
title1.Range.Text = siteNameCap + " ";
title1.Range.set_Style(ref Title);
title1.Range.Font.ColorIndex = WdColorIndex.wdBlack;
title1.Range.Font.Size = 22;
title1.Range.Font.Name = "Candara";
title1.Range.Borders[WdBorderType.wdBorderTop].LineStyle = WdLineStyle.wdLineStyleDot;
title1.Range.ParagraphFormat.Alignment = WdParagraphAlignment.wdAlignParagraphCenter;
title1.Range.InsertParagraphAfter();
//Report title part 2
Paragraph title2 = document.Content.Paragraphs.Add(ref missing);
title2.Range.Text = "WEBSITE ACCESSIBILITY REPORT";
title2.Range.set_Style(ref Title);
title2.Range.Font.ColorIndex = WdColorIndex.wdBlack;
title2.Range.Font.Size = 22;
title2.Range.Font.Name = "Candara";
title2.Range.Borders[WdBorderType.wdBorderBottom].LineStyle = WdLineStyle.wdLineStyleDot;
title2.Range.ParagraphFormat.Alignment = WdParagraphAlignment.wdAlignParagraphCenter;
title2.Range.InsertParagraphAfter();
//Report title Tester Name
Paragraph title3 = document.Content.Paragraphs.Add(ref missing);
title3.Range.Text = "Submitted by " + ReportCreator.testerName;
title3.Range.set_Style(ref NoSpacing);
title3.Range.Font.Name = "Candara";
title3.Range.Font.Italic = 1;
title3.Range.Font.ColorIndex = WdColorIndex.wdBlack;
title3.Range.Font.Size = 11;
title3.Range.ParagraphFormat.Alignment = WdParagraphAlignment.wdAlignParagraphCenter;
title3.Range.InsertParagraphAfter();
//Report title ETA
title3.Range.Text = "Emerging Technology and Accessibility";
title3.Range.Font.Name = "Candara";
title3.Range.Font.Italic = 1;
title3.Range.Font.ColorIndex = WdColorIndex.wdBlack;
title3.Range.Font.Size = 11;
title3.Range.ParagraphFormat.Alignment = WdParagraphAlignment.wdAlignParagraphCenter;
title3.Range.InsertParagraphAfter();
//Report title OIT
title3.Range.Text = "Office of Information Technology";
title3.Range.Font.Name = "Candara";
title3.Range.Font.Italic = 1;
title3.Range.Font.ColorIndex = WdColorIndex.wdBlack;
title3.Range.Font.Size = 11;
title3.Range.ParagraphFormat.Alignment = WdParagraphAlignment.wdAlignParagraphCenter;
title3.Range.InsertParagraphAfter();
//Report title Date
string day = DateTime.Now.Day.ToString();
string month = DateTime.Now.ToString("MMMM");
string year = DateTime.Now.Year.ToString();
title3.Range.Text = day + " " + month + " " + year;
title3.Range.Font.Name = "Candara";
title3.Range.Font.Italic = 1;
title3.Range.Font.ColorIndex = WdColorIndex.wdBlack;
title3.Range.Font.Size = 11;
title3.Range.ParagraphFormat.Alignment = WdParagraphAlignment.wdAlignParagraphCenter;
title3.Range.InsertParagraphAfter();
//Summary Section
//Summary Title
Paragraph summary1 = document.Content.Paragraphs.Add(ref missing);
summary1.Range.Text = "SUMMARY";
summary1.Range.set_Style(ref Header1);
summary1.Range.Font.ColorIndex = WdColorIndex.wdBlack;
summary1.Range.Font.Size = 12;
summary1.Range.Font.Name = "Candara";
summary1.Range.Borders[WdBorderType.wdBorderBottom].LineStyle = WdLineStyle.wdLineStyleThinThickSmallGap;
summary1.Range.InsertParagraphAfter();
summary1.Range.InsertParagraphAfter();
//Summary paragraph
Paragraph summary2 = document.Content.Paragraphs.Add(ref missing);
string pagesTested = ReportCreator.pagesTested;
summary2.Range.Text = "This report summarizes the accessibility review of University of Alabama Adapted Athletics web pages. "
+ pagesTested
+ " pages were examined using a checklist derived from the World Wide Web Consortium Web Content Accessibility Guidelines, the emerging standard for web accessibility."
+ " The sites/pages were reviewed in Fall 2017 by the Office of Information Technology Emerging Technology and Accessibility (ETA) team."
+ " It is hoped that this initial evaluation will offer insight into the accessibility of these UA web pages and suggest future steps to"
+ " improve the accessibility of the Office of Information Technology’s web presence. ";
summary2.Range.Font.ColorIndex = WdColorIndex.wdBlack;
summary2.Range.Font.Size = 11;
summary2.Range.Font.Name = "Candara";
summary2.Range.InsertParagraphAfter();
//Review Results Section
//Review Results Title
Paragraph results1 = document.Content.Paragraphs.Add(ref missing);
results1.Range.Text = "REVIEW RESULTS";
results1.Range.set_Style(ref Header1);
results1.Range.Font.ColorIndex = WdColorIndex.wdBlack;
results1.Range.Font.Size = 12;
results1.Range.Font.Name = "Candara";
results1.Range.Borders[WdBorderType.wdBorderBottom].LineStyle = WdLineStyle.wdLineStyleThinThickSmallGap;
results1.Range.InsertParagraphAfter();
results1.Range.InsertParagraphAfter();
//Results paragraph
Paragraph results2 = document.Content.Paragraphs.Add(ref missing);
results2.Range.Text = "Like many UA web resources, the site does contain issues that can prevent users with disabilities from accessing site contents and functions."
+ " The results given here summarize the review findings, focusing on the challenges that would interfere most heavily with a user’s experience."
+ " Individual page checklists are available. ";
results2.Range.Font.ColorIndex = WdColorIndex.wdBlack;
results2.Range.Font.Size = 11;
results2.Range.Font.Name = "Candara";
results2.Range.InsertParagraphAfter();
//Results Checklist
/*
* Code below adds failed items to the Review Results section. Boolean to check if failed is selected,
* if so then the message gets added
*/
//Create list
var resultsList = new List <string>();
// Add items to the list. If radiobutton is false, add related message
//----------------------
//Keyboard Accessiblity
//----------------------
//All func. available
if (rb_f1.Checked == true)
{
resultsList.Add("Keyboard Accessibility Issues: Not all functionality is available by using only the keyboard (Tab, Shift +Tab, Enter, etc.).");
}
//"Skip nav"
if (rb_f2.Checked == true)
{
resultsList.Add("Page structure: Most, if not all, pages examined lack a link that allows users to 'skip navigation' or 'skip to main content'");
}
//Nav order logical
if (rb_f3.Checked == true)
{
resultsList.Add("Page structure: Navigation order is not logical");
}
//Visible focus indicator
if (rb_f4.Checked == true)
{
resultsList.Add("A visible keyboard focus indicator or outline is not present");
}
//Dialog boxes and popups
if (rb_f5.Checked == true)
{
resultsList.Add("Dialog boxes or popups cannot be navigated or closed using the Esc key");
}
//------------------------
//Eval Form Accessibllity and Usability
//-----------------------
//Properly labeled
if (rb_f6.Checked == true)
{
//resultsList.Add("");
}
//If label not visable...
if (rb_f7.Checked == true)
{
//resultsList.Add("");
}
//All forms can be completed via keyboard
if (rb_f8.Checked == true)
{
//resultsList.Add("");
}
//Error recovery mechanisms present
if (rb_f9.Checked == true)
{
//resultsList.Add("");
}
//Convert list to array
var bulletItems = resultsList.ToArray();
//Created bulleted list
Paragraph assets = document.Content.Paragraphs.Add();
assets.Range.ListFormat.ApplyBulletDefault();
for (int i = 0; i < bulletItems.Length; i++)
{
string bulletItem = bulletItems[i];
if (i < bulletItems.Length - 1)
{
bulletItem = bulletItem + "\n";
}
assets.Range.InsertBefore(bulletItem);
}
//----------------------
//End of Review Results
//----------------------
//Potential Next Steps Section
//Potential Next Steps Title
Paragraph nextsteps1 = document.Content.Paragraphs.Add(ref missing);
nextsteps1.Range.Text = "POTENTIAL NEXT STEPS";
nextsteps1.Range.set_Style(ref Header1);
nextsteps1.Range.Font.ColorIndex = WdColorIndex.wdBlack;
nextsteps1.Range.Font.Size = 12;
nextsteps1.Range.Font.Name = "Candara";
nextsteps1.Range.Borders[WdBorderType.wdBorderBottom].LineStyle = WdLineStyle.wdLineStyleThinThickSmallGap;
nextsteps1.Range.InsertParagraphAfter();
nextsteps1.Range.InsertParagraphAfter();
//Create list
var nextStepsList = new List <string>();
// Add items to the list. If radiobutton is false, add related message
if (rb_f1.Checked == true)
{
nextStepsList.Add("Page structure: On each page, make sure all headings have content and that the heading structure s begins with an h1.");
}
if (rb_f2.Checked == true)
{
nextStepsList.Add("Keyboard Accessibility: Make sure that when an element on a webpage receives focus, a visual indicator of the element is present.");
}
if (rb_f3.Checked == true)
{
nextStepsList.Add("Color and Contrast: Make sure that links change visibly when a user hovers over or tabs to them. Links should be underlined and color change shouldn't be only indicator to distinguish elements.")
;
}
if (rb_f4.Checked == true)
{
//resultsList.Add("");
}
//Convert list to array
var bulletItems_nextSteps = nextStepsList.ToArray();
//Created bulleted list
Paragraph nextSteps = document.Content.Paragraphs.Add();
nextSteps.Range.ListFormat.ApplyBulletDefault();
for (int i = 0; i < bulletItems_nextSteps.Length; i++)
{
string bulletItem_nextSteps = bulletItems_nextSteps[i];
if (i < bulletItems_nextSteps.Length - 1)
{
bulletItem_nextSteps = bulletItem_nextSteps + "\n";
}
nextSteps.Range.InsertBefore(bulletItem_nextSteps);
}
//Testing Process Section
//Testing Process Title
Paragraph process1 = document.Content.Paragraphs.Add(ref missing);
process1.Range.Text = "TESTING PROCESS";
process1.Range.set_Style(ref Header1);
process1.Range.Font.ColorIndex = WdColorIndex.wdBlack;
process1.Range.Font.Size = 12;
process1.Range.Font.Name = "Candara";
process1.Range.Borders[WdBorderType.wdBorderBottom].LineStyle = WdLineStyle.wdLineStyleThinThickSmallGap;
process1.Range.InsertParagraphAfter();
//Process paragraph
Paragraph process2 = document.Content.Paragraphs.Add(ref missing);
process2.Range.Text = "The AMP automated tool (Accessibility Management Platform) was used as an initial evaluation of page accessibility to find potential errors and alerts related to WCAG 2.0 A/AA."
+ " Each page was then checked manually based on 37 criteria, summarized below, and status documented as Pass, Fail with explanation, or N/A (not applicable)."
+ " Pages were evaluated by at least two individuals from the Center for Instructional Technology Emerging Technology and Accessibility team."
+ " Checklists for each page, which include details regarding accessibility issues, are available. ";
process2.Range.Font.ColorIndex = WdColorIndex.wdBlack;
process2.Range.Font.Size = 11;
process2.Range.Font.Name = "Candara";
process2.Range.InsertParagraphAfter();
//Process List
Paragraph p1 = document.Content.Paragraphs.Add();
Range range = document.Range(0, 0);
p1.Range.ListFormat.ApplyBulletDefault();
p1.Range.Text = "Keyboard accessibility:";
p1.Range.ListFormat.ApplyBulletDefault();
p1.Range.InsertParagraphAfter();
ListTemplate listTemplate = p1.Range.ListFormat.ListTemplate;
Range subRange = document.Range(p1.Range.StoryLength - 1, p1.Range.StoryLength - 1);
//subRange.ListFormat.ListIndent();
subRange.ListFormat.ListIndent();
subRange.Text = "All functionality, including forms, dialog boxes, and pop-ups, is available using only the keyboard (tab, shift + tab, enter, etc.).\n"
+ @"A ""skip navigation"" link is available."
+ "\nNavigation order is logical."
+ "\nA visible keyboard focus indicator/outline is present.";
ListTemplate sublistTemplate = subRange.ListFormat.ListTemplate;
p1.Range.InsertParagraphAfter();
Range range2 = document.Range(p1.Range.StoryLength - 1);
range2.ListFormat.ApplyListTemplateWithLevel(listTemplate, true);
WdContinue isContinue = range2.ListFormat.CanContinuePreviousList(listTemplate);
range2.Text = "Form accessibility and usability:";
range2.InsertParagraphAfter();
Range subRange2 = document.Range(p1.Range.StoryLength - 1, p1.Range.StoryLength - 1);
subRange2.ListFormat.ListIndent();
subRange2.Text = "Form fields are properly labeled. If a label is not visible, a hidden label or descriptive title attribute exists. \n"
+ "Error recovery mechanisms are present and easy-to-use.";
p1.Range.InsertParagraphAfter();
Range range3 = document.Range(p1.Range.StoryLength - 1);
range3.ListFormat.ApplyListTemplateWithLevel(listTemplate, true);
WdContinue isContinue2 = range3.ListFormat.CanContinuePreviousList(listTemplate);
range3.Text = "Color and contrast:";
range3.InsertParagraphAfter();
Range subRange3 = document.Range(p1.Range.StoryLength - 1, p1.Range.StoryLength - 1);
subRange3.ListFormat.ListIndent();
subRange3.Text = "Contrast is sufficient so that text is visible to persons with vision impairment such as color-blindness."
+ "\nLinks are underlined and change adequately when hovered over or with keyboard focus."
+ "\nColor is not used as the sole method of conveying content or distinguishing visual elements.";
p1.Range.InsertParagraphAfter();
Range range4 = document.Range(p1.Range.StoryLength - 1);
range4.ListFormat.ApplyListTemplateWithLevel(listTemplate, true);
WdContinue isContinue3 = range4.ListFormat.CanContinuePreviousList(listTemplate);
range4.Text = "Images";
range4.InsertParagraphAfter();
Range subRange4 = document.Range(p1.Range.StoryLength - 1, p1.Range.StoryLength - 1);
subRange4.ListFormat.ListIndent();
subRange4.Text = "Alternative text is present for all images and conveys the content and function of the image in a succinct, accurate, and useful manner."
+ "\nTrue text is used in lieu of images of text.";
p1.Range.InsertParagraphAfter();
Range range5 = document.Range(p1.Range.StoryLength - 1);
range5.ListFormat.ApplyListTemplateWithLevel(listTemplate, true);
WdContinue isContinue4 = range5.ListFormat.CanContinuePreviousList(listTemplate);
range5.Text = "Content scaling";
range5.InsertParagraphAfter();
Range subRange5 = document.Range(p1.Range.StoryLength - 1, p1.Range.StoryLength - 1);
subRange5.ListFormat.ListIndent();
subRange5.Text = "With text enlarged (with or without images enlarged) the text is readable and usable and horizontal scrolling is minimized.";
p1.Range.InsertParagraphAfter();
Range range6 = document.Range(p1.Range.StoryLength - 1);
range6.ListFormat.ApplyListTemplateWithLevel(listTemplate, true);
WdContinue isContinue5 = range6.ListFormat.CanContinuePreviousList(listTemplate);
range6.Text = "Page structure";
range6.InsertParagraphAfter();
Range subRange6 = document.Range(p1.Range.StoryLength - 1, p1.Range.StoryLength - 1);
subRange6.ListFormat.ListIndent();
subRange6.Text = "The main heading on the page is an <h1>. No more than 2 H1s are used. No heading levels are skipped or empty. Headings are properly nested. Headings contain meaningful information."
+ "\nThe page<title> is unique and descriptive."
+ "\nWith styles disabled and tables linearized, the reading order is logical and content is understandable and usable.";
p1.Range.InsertParagraphAfter();
Range range7 = document.Range(p1.Range.StoryLength - 1);
range7.ListFormat.ApplyListTemplateWithLevel(listTemplate, true);
WdContinue isContinue6 = range7.ListFormat.CanContinuePreviousList(listTemplate);
range7.Text = "Screen reader testing";
range7.InsertParagraphAfter();
Range subRange7 = document.Range(p1.Range.StoryLength - 1, p1.Range.StoryLength - 1);
subRange7.ListFormat.ListIndent();
subRange7.Text = "Using a screen reader, all page navigation is available and all forms are navigable."
+ "\nDynamic pages read accurately."
+ "\nNo repetitive elements are present.";
p1.Range.InsertParagraphAfter();
Range range8 = document.Range(p1.Range.StoryLength - 1);
range8.ListFormat.ApplyListTemplateWithLevel(listTemplate, true);
WdContinue isContinue7 = range8.ListFormat.CanContinuePreviousList(listTemplate);
range8.Text = "All videos and multimedia have captions and/or transcripts.";
range8.InsertParagraphAfter();
Range range9 = document.Range(p1.Range.StoryLength - 1);
range9.ListFormat.ApplyListTemplateWithLevel(listTemplate, true);
WdContinue isContinue8 = range9.ListFormat.CanContinuePreviousList(listTemplate);
range9.Text = "Animating or updating content or media can be paused and stopped. ";
range9.InsertParagraphAfter();
Range range10 = document.Range(p1.Range.StoryLength - 1);
range10.ListFormat.ApplyListTemplateWithLevel(listTemplate, true);
WdContinue isContinue9 = range10.ListFormat.CanContinuePreviousList(listTemplate);
range10.Text = @"There are no generic links like ""click here.""";
range10.InsertParagraphAfter();
Range range11 = document.Range(p1.Range.StoryLength - 1);
range11.ListFormat.ApplyListTemplateWithLevel(listTemplate, true);
WdContinue isContinue10 = range11.ListFormat.CanContinuePreviousList(listTemplate);
range11.Text = "The page language is specified.";
range11.InsertParagraphAfter();
Range range12 = document.Range(p1.Range.StoryLength - 1);
range12.ListFormat.ApplyListTemplateWithLevel(listTemplate, true);
WdContinue isContinue11 = range12.ListFormat.CanContinuePreviousList(listTemplate);
range12.Text = "Instructions do not rely on shape, size, or location.";
range12.InsertParagraphAfter();
Range range13 = document.Range(p1.Range.StoryLength - 1);
range13.ListFormat.ApplyListTemplateWithLevel(listTemplate, true);
WdContinue isContinue12 = range13.ListFormat.CanContinuePreviousList(listTemplate);
range13.Text = "No strobe or flashing content is present that could cause seizures.";
range13.InsertParagraphAfter();
//Federal Action Regarding Accessibility in Higher Education Section
//Fed Action Title
Paragraph fedAction1 = document.Content.Paragraphs.Add(ref missing);
fedAction1.Range.Text = "FEDERAL ACTION REGARDING ACCESSIBILITY IN HIGHER EDUCATION";
fedAction1.Range.set_Style(ref Header1);
fedAction1.Range.Font.ColorIndex = WdColorIndex.wdBlack;
fedAction1.Range.Font.Size = 12;
fedAction1.Range.Font.Name = "Candara";
fedAction1.Range.Borders[WdBorderType.wdBorderBottom].LineStyle = WdLineStyle.wdLineStyleThinThickSmallGap;
fedAction1.Range.InsertParagraphAfter();
//Fed Action Paragraph
Paragraph fedAction2 = document.Content.Paragraphs.Add(ref missing);
process2.Range.Text = "Why does web accessibility matter? While we are focused on meeting stakeholder needs and recognize that accessibility is one very important way to do this, there are also legal reasons to make sure web resources are accessible." + "\r\n"
+ "In the past few years, the following institutions have faced review of their web and/or instructional technology by the US Department of Education Office of Civil Rights and the US Department of Justice. In these cases, the institution has been required to make web sites, instructional technology, or other online materials accessible. When specific standards are named, institutions are expected to follow Web Content Accessibility Guidelines (WCAG) 2.0 A and AA:";
process2.Range.Font.ColorIndex = WdColorIndex.wdBlack;
process2.Range.Font.Size = 11;
process2.Range.Font.Name = "Candara";
process2.Range.InsertParagraphAfter();
//Fed Action List
Paragraph fedActionList = document.Content.Paragraphs.Add();
fedActionList.Range.ListFormat.ApplyBulletDefault();
string[] fedBulletItems = new string[]
{ "Florida State University (June 2014)",
"University of Montana-Missoula (March 2014)",
"Louisiana Tech (July 2013)",
"South Carolina Technical College System (March 2013)",
"University of Montana (August 2012)",
"Penn State University (November 2010)" };
for (int i = 0; i < fedBulletItems.Length; i++)
{
string fedbulletItem = fedBulletItems[i];
if (i < fedBulletItems.Length - 1)
{
fedbulletItem = fedbulletItem + "\n";
}
fedActionList.Range.InsertBefore(fedbulletItem);
}
//Pages Evaluated Section
//Pages Evaluated Title
Paragraph eval1 = document.Content.Paragraphs.Add(ref missing);
eval1.Range.Text = "PAGES EVALUATED";
eval1.Range.set_Style(ref Header1);
eval1.Range.Font.ColorIndex = WdColorIndex.wdBlack;
eval1.Range.Font.Size = 12;
eval1.Range.Font.Name = "Candara";
eval1.Range.Borders[WdBorderType.wdBorderBottom].LineStyle = WdLineStyle.wdLineStyleThinThickSmallGap;
eval1.Range.InsertParagraphAfter();
//Save the document to My documents folder
string docfolder = Environment.GetFolderPath(Environment.SpecialFolder.MyDocuments);
//Naming the document
string mnth = DateTime.Now.Month.ToString();
string yr = DateTime.Now.Year.ToString();
object filename = docfolder + "\\" + ReportCreator.siteName + "_" + mnth + "_" + yr;
document.SaveAs2(ref filename);
document.Close(ref missing, ref missing, ref missing);
document = null;
winword.Quit(ref missing, ref missing, ref missing);
winword = null;
MessageBox.Show("Document created successfully !");
}
catch (Exception ex)
{
MessageBox.Show(ex.Message);
}
//Close program
Close();
}
