500 N. Warren
- Big Rapids, Michigan 49307
Phone 231-592-8503
|
|||
|
|||
|
|
|
|
|
|||
|
|||
|
500 N. Warren
- Big Rapids, Michigan 49307 |
|
|
|
|||
|
|
|
Pearson Project PageNext week, October 23-27th, 2006, I am going to get very busy and rewrite these reports. Please let me know what fields may need changing. Also please be sure to subscribe to the discussion group below. New - Listserver for Skyward / Pearson reporting subscribe skyward-pearson your@email.address On March 17th, 2006, I have completed the reports necessary for the Benchmark product. You will see some changes in the download files section. I have separated the Inform and Benchmark reports into their own .PRL files. We are providing these files to help districts get a jump start on the data submission process. If you have experience with Progress Report builder, and would like to contribute to the many exports necessary, please email me and let me know which of the reports you are considering working on. I hope this website is a jumpstart to allow all of us to share the many reports necessary for the Pearson Project, and other projects in the future |
|
|
|
|
|
|
<%
Dim objFSO, objCountFile
Dim strCountFileName
Dim iCount
Dim bUseImages
Dim I
bUseImages = False
strCountFileName = Server.MapPath(Request.ServerVariables("SCRIPT_NAME") & ".cnt")
Set objFSO = Server.CreateObject("Scripting.FileSystemObject")
Set objCountFile = objFSO.OpenTextFile(strCountFileName, 1, True)
If Not objCountFile.AtEndOfStream Then
iCount = CLng(objCountFile.ReadAll)
Else
iCount = 501
End If
objCountFile.Close
Set objCountFile = nothing
iCount = iCount + 1
Set objCountFile = objFSO.CreateTextFile(strCountFileName, True)
objCountFile.Write iCount
objCountFile.Close
Set objCountFile = nothing
Set objFSO = Nothing
If bUseImages Then
For I = 1 to Len(iCount)
Response.Write "
|
|
|
