<%@ Language=VBScript %> Dinosaur Write <% Flag = Request.Form("Flag") if Flag = "ft" then Genre = Request.Form("Genre") Writing_Title = Request.Form("Writing_Title") Writing_ArticleText = Request.Form("Writing_ArticleText") FirstName = Request.Form("FirstName") if len(trim(FirstName)) > 0 then FirstName = UCase(Left(FirstName,1)) & right(FirstName, Len(FirstName) - 1) LastInitial = Ucase(Request.Form("LastInitial")) Grade = Request.Form("Grade") State = Request.Form("State") strtxt = "" subFlag = 0 blnkcnt = 0 emailcnt = 0 'phonecnt = 0 if Genre = "" or len(trim((Genre))) = 0 then subFlag = 1 strtxt = "Genre" blnkcnt = 1 end if if Writing_Title = "" or len(trim((Writing_Title))) = 0 then subFlag = 1 strtxt = strtxt + ", Title" blnkcnt = 1 end if if Writing_ArticleText = "" or len(trim((Writing_ArticleText))) = 0 then subFlag = 1 strtxt = strtxt + ", Dinosaur Writing" blnkcnt = 1 end if if FirstName = "" or len(trim((FirstName))) = 0 then subFlag = 1 strtxt = strtxt + ", First Name" blnkcnt = 1 end if if LastInitial = "" or len(trim((LastInitial))) = 0 then subFlag = 1 strtxt = strtxt + ", Last Initial" blnkcnt = 1 end if if Grade = "" or len(trim((Grade))) = 0 then subFlag = 1 strtxt = strtxt + ", Grade" blnkcnt = 1 end if if State = "" or len(trim((State))) = 0 then subFlag = 1 strtxt = strtxt + ", State" blnkcnt = 1 end if if left(strtxt,1) = "," then strtxt = right(strtxt,(len(strtxt)-1)) end if if blnkcnt = 1 then oops = "Oops!" oopsMsg = "You have left the following field(s) blank:" oopsColor = "red" end if else oops = "" oopsMsg = "" oopsColor = "" end if 'request('Flag') %> <% doMenu %>



Have you finished with your dinosaur writing? Use this form to publish your work.

Please don't send us any information that would allow someone to contact you, such as your last name, address, or phone number. Read our Terms of Submission before you submit your writing.
<% if blnkcnt = 1 then %> <% end if %>
<%=oops%>
<%=oopsMsg%>
<%=strtxt%>
Genre:
Title:
Your Dinosaur Writing:
First name only:
Last initial:
Grade:
State:

Kids: Ask your parents or teachers for approval before you submit anything to us, and read our Privacy Policy Statement.

Terms of Submission
 Before being published, your submission will be reviewed by Scholastic. It will be checked to see that:

  • your written submission fulfills the requirements of the Dinosaur Write project.
  • the piece does not contain any inappropriate language.
By sending us your work, you are giving Scholastic permission to edit, promote, and post your work on Scholastic.com. Also, it is really important to send us only work that you made from scratch and not any work that you copied from somewhere else. Thank you.

 
<% doFooter %>