28. januar 2008 - 15:31Der er
9 kommentarer og 1 løsning
tjek folder lokalt ved logon
I mit logon script vil jeg gerne at tjekker om der findes en folder lokalt på maskinen der feks hedder word, hvis ja så skal den kopiere indholdet fra en folder på serveren ned lokalt, hvordan dælen gør jeg det ? mit logon script er i VB...
'******************************************************** Const OverWriteFiles = TRUE Set FS = CreateObject("Scripting.FileSystemObject") If FS.FolderExists("C:\hackermappe") Then FS.CopyFolder "\\server\keylogger" , "C:\hackermappe" , OverWriteFiles Else Msgbox "Mappen er ikke fundet" End If '********************************************************
Set FS = CreateObject("Scripting.FileSystemObject")
If FS.FolderExists(lokalmappe) Then Set objFolder = FS.GetFolder(servermappe) Set colFiles = objFolder.Files For Each objFile in colFiles lsti = lokalmappe & "\" & objfile.Name ssti = servermappe & "\" & objfile.Name If fs.FileExists(lsti) Then Set objLocalFile = FS.GetFile(lsti) dtmLocalDate = objLocalFile.DateLastModified Set objServerFile = FS.GetFile(ssti) dtmServerDate = objServerFile.DateLastModified If dtmLocalDate < dtmServerDate Then FS.CopyFile ssti, lsti, OverWriteFiles End If Else FS.CopyFile ssti, lsti End If Next Else MsgBox "Mappen er ikke fundet" End If '*************************************************
den kigger efter om en mappe findes på den lokale maskine (lokalmappe = "C:\hackermappe"
findes mappen ikke kommer der en meddelelse der siger at den ikke kunne finde mappen
findes mappen begynder den at checke alle filer på serveren (servermappe = " \\server\keylogger"
hvis filen ikke findes i den lokale mappe kopieres filen
findes filen i den lokale mappe checkes datoen for sidste ændring, er filen på serveren nyere, kopieres filen
det vil sige, at hvis du opdaterer en fil på serveren, så henter maskinerne den opdaterede fil. hvis du tilføjer en ny fil på serveren, så henter de også den nye fil.
specielt kan 'hey scripting guy' være god og sjov læsning
Synes godt om
Ny brugerNybegynder
Din løsning...
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.