script eller lign til opdatering af frontend

Lav en .bat-fil med en XCopy:
XCopy Z:\Databaser\JeresFrontend.mdb C:\Databaser\JeresFrontend.mdb

jeps den er jeg med på så langt
men jeg ville gerne have den til at..
når man starter databasen at tjekke om der er en nyere version af frontenden.  også lukker basen køre opdateringen også starte basen igen. derfor tror jeg ikke man kan bruge dos men skal over i et script

Jeg har lavet lige præcis den løsning, som du beskriver. Men den koster dyrt, da det er MEGET besværligt at få Access til at overskrive sig selv med en fil. For i det øjeblik, du overskriver database-filen, mister Access også kontrollen og kan derfor ikke genstarte systemet. Endvidere får du slet ikke lov at overskrive filen, så længe Access er åben.

Det svarer til at save den gren over, som du selv sidder på - uden at falde ned.

Jeg har fået lavet en måde at gøre det på, men den koster som sagt en del og kan oftest kun anbefales hvis man har mange brugere og man tit laver opdateringer. Da kan det være brugervenligt at gøre det på denne måde.

/Thomas

koster en del ......
mmm jeg kan ikke se problem kan man ikke køre et vb-script fra access

Well...spørgsmålet kommer ofte frem her på sitet...og jeg har endnu ikke set en løsning - ud over min egen.

Men du kan jo også bare lade brugerne hente en frisk kopi hver gang de logger på nettet (via login-script)
Eller lade dem selv klikke på .bat-filen. Det er vel også rimelig brugervenligt...!?

man kan vel lave et vb-script til at starte access med og der tjekke om der er nyer version

ok jeg prøver at lave en løsning og poster den her.
hvad skal du evt have for en sådanne løsning selvom man ikke må nævne beløb herinde

Hej Juks,

Du har ret i, at man burde kunne lave et vb-script, som først checker Access-versionen, kopierer hvis nødvendigt og derefter starter Access.

Min funktion checker løbende (f.eks. hvert minut eller hvert 5. minut) om der er en ny version af databasen. Hvis dette er tilfældet får brugeren en besked på skærmen, som han kan annullere eller acceptere hvorefter systemet selv kopiere sig ned og derefter genstarter. Det kører ret fornuftigt og koster ikke under 4K og heller ikke over 4K (så har jeg vist ikke sagt for meget ;o)

det må jeg kunne lave billigere :-)

Det kan man også sagtens....hvis man går en smule på kompromis med brugervenligheden.

brugerne skal jo også havelidt at lave

Min løsning går på at have en lokaltabel med versionsnumr.

I en vbs fil kan man via ado tjekke om der er behov for opdatering (versions nummer i lokal db kontra den på nettet) og derefter kopiere den nye version til lokal disk.

Denne vbs fil skal derefter ligge i brugernes startmenu således at der tjekkes for ny version hver gang computeren tændes.

Det var min måde at gøre det på.

Niels

haha, ja det er selvfølgelig rigtigt :o)

Omvendt så opstår der jo altid problemer, så snart man har overladt noget til en bruger ;o)

nih kan man se den løsning

This one costs also
http://www.fmsinc.com/products/startup/index.asp

ca. 4K :o)

Jeg vil da godt fortælle hvordan jeg har løst dette problem her i vores virksomhed.
Alle brugere der logger på netværket får et drev H: som er deres helt personlig drev.
Jeg har så lavet et script der kopierer de forskellige frontends til de brugere der skal have adgang til dem. Dette script kører vores filserver så hver nat.
Når jeg har opdateret i diverse frontends, kører jeg en compact/repair på den og kopierer den op på filserveren. Så har brugerne den nye version senest dagen efter.

Det behøver ikke være mere forkromet, det fungerer fint og har gjort det de sidste 3 år.

Frontends kopieres til brugernes H: drev - bare for at præcisere det.

jamen det er jo scriptet jeg skal bruge nu har jeg lavet i et vb

im fs, f, s, fs1, f1, s1, filespec1, filespec
''' Dim filespec As String

  filespec = ("c:\databaser\hmfrontend.mdb")
  Set fs = CreateObject("Scripting.FileSystemObject")
    Set f = fs.GetFile(filespec)
    s = s & f.DateLastModified
 
  filespec1 = ("G:\Dokumenter\Access\Hfirma\work\front.mdb")
  Set fs1 = CreateObject("Scripting.FileSystemObject")
    Set f1 = fs1.GetFile(filespec1)
    s1 = s1 & f1.DateLastModified

   
   
If s >= s1 Then
MsgBox "old or same"


Set WshShell = CreateObject("WScript.Shell")
WshShell.Run filespec
Set WshShell = Nothing
Else
MsgBox "nyere"
Set WshShell = CreateObject("WScript.Shell")
WshShell.Run "command /C xcopy/y G:\Dokumenter\Access\firma\work\front.mdb C:\Databaser\HMFrontend.mdb"
Set WshShell = Nothing
End If