As requested by Danp, here is the solution for my problem....
Issue: Students are on a mandatory profile in a windows 7 environment, this means they have no local user profile on the PCs. If they open a file from web mail (using IE as it's the only thing available), they invariable enable editing, then work on the file without saving it to thier file storage location!! When they save later on they tend not to do 'save as' (and believe me we have told them lots to do that). By default IE stores any document in the IE temp folder on the profile.
If you don't have a profile on the PC then the files are deleted when you log off......cue wailing students "I worked for hours on it and now it's lost!!!"
Solution: I have enable a log off script in GPO to run a .vbs, this in turn calls a powershell script to save the files. Seems complicated - yes but it works and if you set the powershell script to run at log off it run as the student, who don't have execution rights.The VB script also waits until the powershell code has completed before it ends, this makes sure that the files have been copied over.
VB code
on error resume next
'-----initialize-------------------------------------------
const overwriteExisting = true
const forceRemoval=true
const forceDelete=true
const updateProfile=true
set objshell=wscript.createobject("wscript.shell")
set objnet=wscript.createobject("wscript.network")
Set objFSO=wscript.createObject("Scripting.FileSystemObject")
'------run copy-----------------------------------
objShell.run("powershell -executionpolicy bypass -noexit -file \\yourfilelocationhere\netlogon\filesavetemp.ps1")
WaitForIdle ".", "powershell", "3"
Sub WaitForIdle(strComputer, strProcessName, intIdleSec)
Dim bolIdle : bolIdle = False
Dim objWMIService : Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Dim strObjKeyPath : strObjKeyPath = "Win32_PerfRawData_PerfProc_Process.Name='" & strProcessName & "'"
Dim objPerfInstance : Set objPerfInstance = objWMIService.get(strObjKeyPath)
Dim intPercProcTime1 : intPercProcTime1 = objPerfInstance.PercentProcessorTime
Dim intProcTimeStamp1 : intProcTimeStamp1 = objPerfInstance.TimeStamp_Sys100NS
Dim intElemCount : intElemCount = CInt(intIdleSec) - 1
ReDim arrProcPercents(intElemCount)
Dim i : i = 0
Dim PercentProcessorTime, arrTemp, intPercProcTime2, intProcTimeStamp2
Do While Not bolIdle
WScript.Sleep 1000
Set objPerfInstance = objWMIService.get(strObjKeyPath)
intPercProcTime2 = objPerfInstance.PercentProcessorTime
intProcTimeStamp2 = objPerfInstance.TimeStamp_Sys100NS
If (intProcTimeStamp2 - intProcTimeStamp1) = 0 Then
WScript.Echo "Error, probably " & strProcessName & " not found running"
Exit Do
Else
PercentProcessorTime = ((intPercProcTime2 - intPercProcTime1) _
/ (intProcTimeStamp2 - intProcTimeStamp1))
' WScript.Echo FormatPercent(PercentProcessorTime)
' add value to array
arrProcPercents(i) = FormatPercent(PercentProcessorTime)
' if the number of seconds have been met then check the array
If i = (intElemCount) Then
' look at the array and filter for values of 0.00%
arrTemp = Filter(arrProcPercents, "0.00%")
' if the array size of the filtered and the original is the same then
' all the values for the time specified where 0.00%
If UBound(arrTemp) = intElemCount Then
' set bolIdle = True to exit the Do...Loop
bolIdle = True
End If
' if all the values where not 0.00% then reset the counter and
' array index to update
i = 0
Else
' increment the counter/array index
i = i + 1
End If
End If
intPercProcTime1 = intPercProcTime2
intProcTimeStamp1 = intProcTimeStamp2
Loop
End Sub
The Powershell script....this checks who the user is and then checks to see if they have a folder created yet (forward planning FTW - next years intake are automatically catered for), then it copies the temp files to the folder....but only the ones you specify, so we don't fill yp your servers with all the images and stuff from IE
$strUser = $env:username
$path = "\\yourfileserver\saved\$strUser"
if(!(test-path -Path $path))
{
new-item -Path $path -type directory
}
get-childitem "C:\users\TEMP.COLLEGE*\AppData\local\microsoft\windows\Temporary Internet Files\content.IE5\*\*" -include @("*.docx","*.ppt","*.xlsx","*.doc","*.csv","*.xls","*.pptx","*.pub") -force -recurse |
where-object { (-not $_.PSIsContainer) -and ($_.LastWriteTime -lt (get-date).AddDays(+60)) } | Copy-item -Destination "\\yourfileserver\saved\$strUser" -recurse -force
I know the code is not overly clean on either one but I was rushed slightly
