Jump to content

Recommended Posts

Posted

Does anyone provide personal webspace for pupils thats only accessable locally and will allow tem to upload and view there school made websites.

 

If so what did you use for this and how did you set it up.

 

Thanks

Posted

We have a linux server that does this and it authenticates users via active directory. Vsftpd as the FTP server and Apache serving the pages.

 

Set up by yours truly, a linux hippy.

Posted
We have a linux server that does this and it authenticates users via active directory. Vsftpd as the FTP server and Apache serving the pages.

 

Set up by yours truly, a linux hippy.

 

We do something very similar to Webman - but not for all students. Just selected students for use in their ICT course.

Posted

We have a W2k3 server running IIS.

 

have created a script to create a folder for the class then a subfolder for each students (which is then set up as an application in IIS incase they need ASP.net). Folder permissions are all set up so that they can only add/edit files in their folder.

 

They can upload in a couple of ways - either by connecting to a file share then navigating to their class and then their folder or the server is also set up for FTP access. All authentican is though AD.

 

Server also had PHP installed for the adventerous types!!

  • Thanks 1
Posted

Not a bad idea,

 

We don't at the school i'm on placement on but our university has what they call 'iws'

 

 

How would you plan on doing it if you did?

 

On my linux server i use apache userdir to create public_html in all my users /home dir's.

and for it to include it into the server. (this is outside the school)

 

 

I think it'd be too complicated for the kids though to ftp to the linux server.

 

We're behind a firewall which blocks the ports anyway so it'd have to be 100% internal here.

 

if you want help with apache give me a shout, i've been using it for well over 5years =)

Posted
I think it'd be too complicated for the kids though to ftp to the linux server.

 

I think they'd get the idea pretty quickly if they were taught how to use an FTP client properly and what one is and why it is used. E.g. The left pane is the files you've been working on, the right pane is the folder on the server. Copy from one to the other...

Posted
I think they'd get the idea pretty quickly if they were taught how to use an FTP client properly and what one is and why it is used. E.g. The left pane is the files you've been working on, the right pane is the folder on the server. Copy from one to the other...

 

True its just teaching them and teaching the teachers to teach the kids :p.

 

We have a hard enough time getting them to use their emails!

Posted
Thanks Pete, you dont have a copy of that script I could have do you? I would prefer to use Windows to set this up.

 

 

 

Option Explicit
Dim oFSO, oExcel, oSheet, sUser, iRow, sYear, sCourse
iRow = 9
Set oFSO = CreateObject("Scripting.FileSystemObject")
Set oExcel = CreateObject("Excel.Application")
Set oSheet = oExcel.Workbooks.Open("C:\createaccounts\RequestForCAASWEB.xls")

Do Until oExcel.Cells(iRow,1).Value= ""
sUser=oExcel.Cells(iRow,1).Value
sYear=oExcel.Cells(iRow,3).Value
sCourse=oExcel.Cells(3,2).Value
Call HomeDir()
iRow = iRow+1
Loop
oExcel.Quit
WScript.Echo "finished!!"

Wscript.Quit

Sub HomeDir()
Dim sHome, sHomeDir, oFolder,oShell
sHome = "d:\Web\"
sHomeDir = sHome&sCourse&"\"&sYear&"\"&sUser
'WScript.Echo sHomeDir
If oFSO.FolderExists(sHomeDir) Then
  Set oFolder = oFSO.GetFolder(sHomeDir)
Else
  oFSO.CreateFolder(sHomeDir) 
End If 
Set oShell = Wscript.CreateObject("Wscript.Shell")
oShell.Run "%COMSPEC% /c cacls "& sHomeDir & " /e /g " & sUser&"@student.belfastmet.int:c", 2, false
oShell.Run "%COMSPEC% /c cacls "& sHomeDir & " /e /g " & "caasweb\iusr_caasweb:c", 2, false

'set up IIS application for VD
dim IIsWebVDirObj
dim IIsWebVDirRootObj
dim NewFolderName

NewFolderName = sCourse&"\"&sYear&"\"&sUser     '"HNCComputingDay\07\GIL08173716"

const UseExistingApplicationPool = true
'Set IIsWebVDirObj = GetObject("IIS://localhost/W3SVC/1/Root/" & NewFolderName) 

' Create the Metabase entry
Set IIsWebVDirRootObj = GetObject("IIS://LocalHost/W3SVC/1/Root")
Set IIsWebVDirObj = IIsWebVDirRootObj.Create("IIsWebDirectory", NewFolderName)

IIsWebVDirObj.AppCreate3 2, "DefaultAppPool", UseExistingApplicationPool
IIsWebVDirObj.AppFriendlyName = sUser
IIsWebVDirObj.SetInfo


End Sub

 

Obviously will need to change paths etc.

 

Blank excel file also attached

 

I'll just wait for all the powershell fans to crucify my vbscripting!!!!

RequestForCAASWEB.xls

  • Thanks 1

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now



×
×
  • Create New...