AddActivity.script Script

//Open the browser to your PT applications webpage  
WebPage.Get("http://<Your ServerName>/tat/en-us/gate.asp")

 
WebPage.Get("http://<Your ServerName>/tat/menu/menu.asp")

 
WebPage.Get("http://<Your ServerName>/tat/en-us/border.htm")

  
Sleep(20)
WebPage.Get("http://<Your ServerName>/tat/en-us/Welcome.htm")


 
//Select Group Activities to display the Activity form  
Sleep(4787)
WebPage.FormData["fileName"] = "activity"
WebPage.Get("http://<Your ServerName>/tat/en-us/gate.asp")

 
WebPage.Get("http://<Your ServerName>/tat/menu/menu.asp")

 
WebPage.Get("http://<Your ServerName>/tat/en-us/border.htm")

 
 
Sleep(10)
WebPage.FormData["fileName"] = "activity"
WebPage.Get("http://<Your ServerName>/tat/en-us/logo.htm")
 
 
Sleep(10)
WebPage.FormData["fileName"] = "activity"
WebPage.Get("http://<Your ServerName>/tat/en-us/activity.htm")
 
 
Sleep(10)
WebPage.FormData["fileName"] = "activity"
WebPage.Get("http://<Your ServerName>/tat/en-us/activityList.htm")

 
//Add a new activity 
Sleep(56842)
WebPage.FormData["tableName"] = "activity"
WebPage.FormData["procName"] = "lw_addActivity"
WebPage.FormData["actionBtn"] = "ADD"
WebPage.FormData["ID"] = ""
WebPage.FormData["ActivityId"] = ""
WebPage.FormData["Description"] = "QuizA"
WebPage.FormData["Comment"] = ""
WebPage.FormData["LocationId"] = "1"
WebPage.FormData["ActivityTypeId"] = "4"
WebPage.FormData["GroupId"] = "15"
WebPage.FormData["GradeScaleId"] = ""
WebPage.FormData["Weight"] = "50"
WebPage.FormData["MaxScore"] = "100"
WebPage.FormData["DueDate"] = ""
WebPage.Post("http://<Your ServerName>/tat/Scripts/postIt.asp")
 
//Change the activity  
Sleep(8352)
WebPage.FormData["tableName"] = "activity"
WebPage.FormData["procName"] = "lw_changeActivity"
WebPage.FormData["actionBtn"] = "CHANGE"
WebPage.FormData["ID"] = "58"
WebPage.FormData["ActivityId"] = "58"
WebPage.FormData["Description"] = "QuizA"
WebPage.FormData["Comment"] = ""
WebPage.FormData["LocationId"] = "1"
WebPage.FormData["ActivityTypeId"] = "4"
WebPage.FormData["GroupId"] = "15"
WebPage.FormData["GradeScaleId"] = "1"
WebPage.FormData["Weight"] = "50"
WebPage.FormData["MaxScore"] = "100"
WebPage.FormData["DueDate"] = ""
WebPage.FormData["button1"] = "New"
WebPage.FormData["button2"] = "Delete"
WebPage.Post("http://<Your ServerName>/tat/Scripts/postIt.asp")
 
//Change the activity  
Sleep(5768)
WebPage.FormData["tableName"] = "activity"
WebPage.FormData["procName"] = "lw_changeActivity"
WebPage.FormData["actionBtn"] = "CHANGE"
WebPage.FormData["ID"] = "58"
WebPage.FormData["ActivityId"] = "58"
WebPage.FormData["Description"] = "QuizA"
WebPage.FormData["Comment"] = ""
WebPage.FormData["LocationId"] = "2"
WebPage.FormData["ActivityTypeId"] = "4"
WebPage.FormData["GroupId"] = "15"
WebPage.FormData["GradeScaleId"] = "1"
WebPage.FormData["Weight"] = "50"
WebPage.FormData["MaxScore"] = "100"
WebPage.FormData["DueDate"] = ""
WebPage.FormData["button1"] = "New"
WebPage.FormData["button2"] = "Delete"
WebPage.Post("http://<Your ServerName>/tat/Scripts/postIt.asp")
 
//Change the activity  
Sleep(7151)
WebPage.FormData["tableName"] = "activity"
WebPage.FormData["procName"] = "lw_changeActivity"
WebPage.FormData["actionBtn"] = "CHANGE"
WebPage.FormData["ID"] = "58"
WebPage.FormData["ActivityId"] = "58"
WebPage.FormData["Description"] = "QuizA"
WebPage.FormData["Comment"] = ""
WebPage.FormData["LocationId"] = "2"
WebPage.FormData["ActivityTypeId"] = "6"
WebPage.FormData["GroupId"] = "15"
WebPage.FormData["GradeScaleId"] = "1"
WebPage.FormData["Weight"] = "50"
WebPage.FormData["MaxScore"] = "100"
WebPage.FormData["DueDate"] = ""
WebPage.FormData["button1"] = "New"
WebPage.FormData["button2"] = "Delete"
WebPage.Post("http://<Your ServerName>/tat/Scripts/postIt.asp")
 
//Change the activity  
Sleep(5488)
WebPage.FormData["tableName"] = "activity"
WebPage.FormData["procName"] = "lw_changeActivity"
WebPage.FormData["actionBtn"] = "CHANGE"
WebPage.FormData["ID"] = "58"
WebPage.FormData["ActivityId"] = "58"
WebPage.FormData["Description"] = "QuizA"
WebPage.FormData["Comment"] = ""
WebPage.FormData["LocationId"] = "2"
WebPage.FormData["ActivityTypeId"] = "6"
WebPage.FormData["GroupId"] = "4"
WebPage.FormData["GradeScaleId"] = "1"
WebPage.FormData["Weight"] = "50"
WebPage.FormData["MaxScore"] = "100"
WebPage.FormData["DueDate"] = ""
WebPage.FormData["button1"] = "New"
WebPage.FormData["button2"] = "Delete"
WebPage.Post("http://<Your ServerName>/tat/Scripts/postIt.asp")
 
//Change the activity  
Sleep(12267)
WebPage.FormData["tableName"] = "activity"
WebPage.FormData["procName"] = "lw_changeActivity"
WebPage.FormData["actionBtn"] = "CHANGE"
WebPage.FormData["ID"] = "58"
WebPage.FormData["ActivityId"] = "58"
WebPage.FormData["Description"] = "QuizA"
WebPage.FormData["Comment"] = ""
WebPage.FormData["LocationId"] = "2"
WebPage.FormData["ActivityTypeId"] = "6"
WebPage.FormData["GroupId"] = "4"
WebPage.FormData["GradeScaleId"] = "3"
WebPage.FormData["Weight"] = "50"
WebPage.FormData["MaxScore"] = "100"
WebPage.FormData["DueDate"] = ""
WebPage.FormData["button1"] = "New"
WebPage.FormData["button2"] = "Delete"
WebPage.Post("http://<Your ServerName>/tat/Scripts/postIt.asp")
 
//Change the activity  
Sleep(4306)
WebPage.FormData["tableName"] = "activity"
WebPage.FormData["procName"] = "lw_deleteActivity"
WebPage.FormData["actionBtn"] = "DELETE"
WebPage.FormData["ID"] = "58"
WebPage.FormData["ActivityId"] = "58"
WebPage.FormData["Description"] = "QuizA"
WebPage.FormData["Comment"] = ""
WebPage.FormData["LocationId"] = "2"
WebPage.FormData["ActivityTypeId"] = "6"
WebPage.FormData["GroupId"] = "4"
WebPage.FormData["GradeScaleId"] = "3"
WebPage.FormData["Weight"] = "50"
WebPage.FormData["MaxScore"] = "100"
WebPage.FormData["DueDate"] = ""
WebPage.FormData["button1"] = "New"
WebPage.FormData["button2"] = "Delete"
WebPage.Post("http://<Your ServerName>/tat/Scripts/postIt.asp")