Personlig adressebog

Vores Notes er sat på, aå alle filerne ligger på netværksdrevet - dvs. Notes.ini ogs ligger på brugernes pers. drev på nettet.  ALle filer undt. cache.dsk ligger på nettet.

Dette betyder at man kan logge sig på nettet og få ens notes, fra en hvilken som helst workstation på nettet.

Ikonen (W98), "START I" peger på netværksdrevet.

Hej Mettemusen

Det lydder som et godt bud. Kører I også R5 ?

Hej Chrob
Nedenstående artikel fra Notes.Net beskriver meget godt den foreslåede løsning i detaljer.
Den er værd at læse inden du kaster dig ud i relokering af notes-filer.
Notes from Support: From the Field--Managing CACHE.DSK size when serving the Notes client
http://www.notes.net/today.nsf/8a6d147cf55a7fd385256658007aacf1/347f536e720bddb0852565f60056897e?OpenDocument

Her er en anden artikel, specielt med fokus på R5 :
Centrally managing the desktop
http://www.notes.net/today.nsf/8a6d147cf55a7fd385256658007aacf1/bf3860dfa8187fde852567f9006965ed?OpenDocument

Husk at du i R5 også skal tage hensyn til bookmark.nsf & headline.nsf

Hejsa Chrob.

Nope - vi kører 4.6.1 (endnu da)

Mette

Jeg har lavet et KiXtart 3.61 WinNT login script der configurere Lotus Notes 4.56 klienter automatisk når de logge på en Win9x eller nt wrk.

Alle Notes commen filerne (*.dll; *.exe; osv.) ligger på klienterne, men når brugeren logger på bliver notes.ini filen backed up og configureret til den nye user, samtiddigt bliver Personal address book, desktop.dsk og User.id kopieret over fra brugerens tidligere backup fra en anden wrk.

Hvis dette kunne hjælpe, skal jeg nok give dig kode stumpen.

Du kan indstille hvor databiblioteket ligger - men lidt nemmere er det vel at lave en replikakopi af names.nsf på netværket. Du kan bare give replikakopien navn efter brugeren, bruger-PC´en.

Det du kan gøre er at lave en DIR fil der indeholder stien til din names.nsf. Denne DIR fil lægger du så i DATA kataloget, og vupti. Det fungere...

Lav. f.eks en names.dir der ikke indeholder andet end ex. "J:\Mit Dir\names.nsf'. Læg names.dir i DATA kataloget, og du er kørende. Vær dog opmærksom på at Notes tit "snakker" med names.nsf, og det derfor generere en del netværkstrafik, og bliver SLØVT!

Øhh, jeg er vist mere end sløv i betrækket, for jeg har totalt glemt dette spørgsmål.

Xion --> er du der fortsat, for så vil jeg meget gerne have den kode stump. Jeg har endnu ikke prøvet at \"lege\" med Kixstart, men har den til at ligge. cbrob21@sol.dk

Tusinde tak for tålmodigheden.

Som du kan se af følgende kix script, er der en del variabler der skal sættes før scriptet vil virke, og server navn osv. Håber du kan få det til at virke:

; -------------------------------------------
; Checking and Configuring Lotus Notes Client
; Using KiXtart 3.62
; -------------------------------------------

$LNotesInst = \"False\"

IF $Check_LotusNotes = True
 
  If exist (\"C:\\notes\\notes.exe\")
    $LNotesInst = \"True\"
    $NotesDrive = \"C\"
  EndIf

  If exist (\"D:\\notes\\notes.exe\")
    $LNotesInst = \"True\"
    $NotesDrive = \"D\"
  EndIf

  If exist (\"E:\\notes\\notes.exe\")
    $LNotesInst = \"True\"
    $NotesDrive = \"E\"
  EndIf

  If $LNotesInst = \"False\"
    $NotesDrive = \"\"
    ?
    ? \"Lotus Notes Client was NOT found on this system.\"
    ? \"This software is required by FIRMA.\"
    ? \"Install this program through your I: drive\"
    ?
  EndIf

ENDIF

IF $LNotesInst = \"True\"
  ? \"Lotus Notes Client found\"
  ; ___If last configured user isen\'t current user configure begins___

  $LastConfiguredNotesUser = ReadValue(\"HKEY_LOCAL_MACHINE\\SOFTWARE\\FIRMA\\Lotus Notes\", \"LastConfiguredNotesUser\")

  If $LastConfiguredNotesUser = \"\"
    $res = AddKey(\"HKEY_LOCAL_MACHINE\\SOFTWARE\\FIRMA\\Lotus Notes\")
    $res = WriteValue(\"HKEY_LOCAL_MACHINE\\SOFTWARE\\FIRMA\\Lotus Notes\", \"LastConfiguredNotesUser\", \"$UserID\", \"REG_SZ\")
  EndIf

  :CheckAgain

  If $LastConfiguredNotesUser = \"$UserID\"
    ; Check if ID file is still there
    if exist (\"$NotesDrive:\\notes\\data\\$UserID.id\")
    else
      $LastConfiguredNotesUser = \"\"
      goto CheckAgain
    endif
  Else
    \", configuring software please wait\"
    $res = REDIRECTOUTPUT (\"\\\\XION\\Netlogon\\Log\\NotesLog.log\", 0)
    ? \"$UserID - @Day  @Date  @TIME\"
    ?
    ? \"Configuring Lotus Notes Workstation $WkSta\"

    ; ## Only backup old user\'s files if old user exist
    if $LastConfiguredNotesUser = \"\"
    else
      ; ## Backup old user\'s Desktop.dsk, Names.nsf, UserID.ID and Notes.ini file\'s ##
      ? \"Backing up $LastConfiguredNotesUser\'s Desktop.dsk, Names.nsf,\"
      ? \"UserID.id and Notes.ini file\'s\"
      copy \"$NotesDrive:\\notes\\data\\$LastConfiguredNotesUser.id\" \"\\\\XION\\KiXtart\\LotusNotes\\Backup\\ID Files\\$LastConfiguredNotesUser.id\"
      $ProgressRes=RedirectOutput(\"\")
      \".\"
      copy \"%windir%\\notes.ini\" \"\\\\XION\\KiXtart\\LotusNotes\\Backup\\INI Files\\$LastConfiguredNotesUser_notes.ini\"
      \".\"
      copy \"$NotesDrive:\\notes\\data\\desktop.dsk\" \"\\\\XION\\KiXtart\\LotusNotes\\Backup\\Desktop Files\\$LastConfiguredNotesUser_Desktop.dsk\"
      \".\"
      copy \"$NotesDrive:\\notes\\data\\names.nsf\" \"\\\\XION\\KiXtart\\LotusNotes\\Backup\\PAB Files\\$LastConfiguredNotesUser_names.nsf\"
      $ProgressRes=RedirectOutput(\"\\\\XION\\Netlogon\\Log\\NotesLog.log\", 0)
      \" ...Backup done\"
    endif


    ; ## Check if old backups exist on server ##
    ?
    ? \"Checking if current user has old backups on server\"

    ; Checking ID File
    if exist (\"\\\\XION\\KiXtart\\LotusNotes\\Backup\\ID Files\\$UserID.id\")
      ? \"Downloading backup copy off $UserID.id file...\"
      Copy \"\\\\Xion\\KiXtart\\LotusNotes\\Backup\\ID Files\\$UserID.id\" \"$NotesDrive:\\notes\\data\\$UserID.id\"
    else
      ? \"Downloading standard copy off $UserID.id file...\"
      Copy \"\\\\Xion\\KiXtart\\LotusNotes\\ID Files\\$UserID.id\" \"$NotesDrive:\\notes\\data\\$UserID.id\"
    endif

    $ProgressRes=RedirectOutput(\"\")
    \".\"
    $ProgressRes=RedirectOutput(\"\\\\XION\\Netlogon\\Log\\NotesLog.log\", 0)

    ; Checking Desktop.dsk File
    if exist (\"\\\\XION\\KiXtart\\LotusNotes\\Backup\\Desktop Files\\$UserID.dsk\")
      ? \"Downloading backup copy off desktop.dsk file...\"
      copy \"\\\\XION\\KiXtart\\LotusNotes\\Backup\\Desktop Files\\$UserID.dsk\" \"$NotesDrive:\\notes\\data\\Desktop.dsk\"
    else
      ? \"Downloading standard copy off desktop.dsk file...\"
      Copy \"\\\\Xion\\KiXtart\\LotusNotes\\Desktop Files\\$UserID.dsk\" \"$NotesDrive:\\notes\\data\\Desktop.dsk\"
    endif

    $ProgressRes=RedirectOutput(\"\")
    \".\"
    $ProgressRes=RedirectOutput(\"\\\\XION\\Netlogon\\Log\\NotesLog.log\", 0)


    ; Checking Notes.ini File
    if exist (\"\\\\XION\\KiXtart\\LotusNotes\\Backup\\INI Files\\$UserID.ini\")
      ? \"Downloading backup copy off notes.ini file...\"
      $NotesINIFound = \"True\"
      copy \"\\\\Xion\\KiXtart\\LotusNotes\\Backup\\INI Files\\$UserID.ini\" \"%windir%\\notes.ini\"
    else
      ? \"Downloading standard copy off notes.ini file...\"
      $NotesINIFound = \"False\"
      copy \"\\\\Xion\\KiXtart\\LotusNotes\\NotesWrk.ini\" \"%windir%\\notes.ini\"
    endif

    $ProgressRes=RedirectOutput(\"\")
    \".\"
    $ProgressRes=RedirectOutput(\"\\\\XION\\Netlogon\\Log\\NotesLog.log\", 0)


    ; Checking Private Address Book File
    if exist (\"\\\\XION\\KiXtart\\LotusNotes\\Backup\\PAB Files\\$UserID.nsf\")
      ? \"Downloading backup copy off names.nsf file...\"
      copy \"\\\\XION\\KiXtart\\LotusNotes\\Backup\\PAB Files\\$UserID.nsf\" \"$NotesDrive:\\notes\\data\\names.nsf\"
    else
      ? \"Downloading standard copy off names.nsf file...\"
      Copy \"\\\\Xion\\KiXtart\\LotusNotes\\names.nsf\" \"$NotesDrive:\\notes\\data\\names.nsf\"
    endif

    $ProgressRes=RedirectOutput(\"\")
    \".\"
    $ProgressRes=RedirectOutput(\"\\\\XION\\Netlogon\\Log\\NotesLog.log\", 0)


    ;Setting notes.ini user strings
    ?
    if $NotesINIFound = \"False\"
      ? \"Setting notes.ini user strings (4 strings)\"
      WriteProfileString(\"%windir%\\Notes.ini\", \"Notes\", \"Directory\", \"$NotesDrive:\\notes\\data\")
      WriteProfileString(\"%windir%\\Notes.ini\", \"Notes\", \"FileDlgDirectory\", \"$NotesDrive:\\notes\\data\")
      WriteProfileString(\"%windir%\\Notes.ini\", \"Notes\", \"KeyFilename\", \"$UserID.id\")
      WriteProfileString(\"%windir%\\Notes.ini\", \"Notes\", \"MailFile\", \"mail\\$UserID.nsf\")
    else
      ? \"Setting notes.ini user strings (2 strings)\"
      WriteProfileString(\"%windir%\\Notes.ini\", \"Notes\", \"Directory\", \"$NotesDrive:\\notes\\data\")
      WriteProfileString(\"%windir%\\Notes.ini\", \"Notes\", \"FileDlgDirectory\", \"$NotesDrive:\\notes\\data\")
    endif

    $LastConfiguredNotesUser = $UserID
    $rc = WriteValue(\"HKEY_LOCAL_MACHINE\\SOFTWARE\\FIRMA\\Lotus Notes\", \"LastConfiguredNotesUser\", \"$LastConfiguredNotesUser\", \"REG_SZ\")
    ? \"-----------------------------------------------------\"
    $res = REDIRECTOUTPUT (\"\")
    \"Done\"
  EndIf
ENDIF

If $Check_LotusNotes = False
  $LNotesInst = \"Check not enabled\"
  $NotesDrive = \"\"
EndIf

Hov, jeg så lige at Jeres firma havde købt Norton AV, så her for du lige et script til det også:

; -------------------------------------------------
; Distribute updated \"Liveupdt.hst\" file to clients
; By TechBiz I/S using KiXtart 3.62
; -------------------------------------------------

IF ExistKey(\"HKEY_LOCAL_MACHINE\\SOFTWARE\\TechBiz\\NAV\") > 0
  $res = AddKey(\"HKEY_LOCAL_MACHINE\\SOFTWARE\\TechBiz\\NAV\")
  $res = WriteValue(\"HKEY_LOCAL_MACHINE\\SOFTWARE\\TechBiz\\NAV\",\"HSTFile\",\"\",\"REG_SZ\")
  $res = WriteValue(\"HKEY_LOCAL_MACHINE\\SOFTWARE\\TechBiz\\NAV\",\"Installed\",\"\",\"REG_SZ\")
ENDIF

; Check if NAV is installed
IF ExistKey(\"HKEY_LOCAL_MACHINE\\SOFTWARE\\Symantec\\InstalledApps\") = 0
  $res = WriteValue(\"HKEY_LOCAL_MACHINE\\SOFTWARE\\TechBiz\\NAV\",\"Installed\",\"True\",\"REG_SZ\")
  $NAVInstalled = True
ELSE
  $res = WriteValue(\"HKEY_LOCAL_MACHINE\\SOFTWARE\\TechBiz\\NAV\",\"HSTFile\",\"\",\"REG_SZ\")
  $res = WriteValue(\"HKEY_LOCAL_MACHINE\\SOFTWARE\\TechBiz\\NAV\",\"Installed\",\"False\",\"REG_SZ\")
  $NAVInstalled = False
ENDIF

IF $NAVInstalled = False
  $NavHSTFileUpdated = \"False, NAV not installed!\"
  Goto NAV_Done
ENDIF

$HSTFile = ReadValue(\"HKEY_LOCAL_MACHINE\\SOFTWARE\\TechBiz\\NAV\",\"HSTFile\")

; Check if .hst file still exist
IF $HSTFile <> \"\"
  if exist(\"$HSTFile\")
  else
    $res = WriteValue(\"HKEY_LOCAL_MACHINE\\SOFTWARE\\TechBiz\\NAV\",\"HSTFile\",\"\",\"REG_SZ\")
    $HSTFile = ReadValue(\"HKEY_LOCAL_MACHINE\\SOFTWARE\\TechBiz\\NAV\",\"HSTFile\")   
  endif
ENDIF

$NAVOK = True

IF $HSTFile = \"\"
? \"Searching for Norton Antivirus LiveUpdate file. \"

  ; Find current Liveupdt.hst file
  $SearchFile = \"Liveupdt.hst\"
  $ResultFile = \"%temp%\\HSTlist.ini\"
  $cmdline = \"%comspec% /c dir \"+$SystemDrive+\"\\\"+$SearchFile+\" /b /s >\"+$ResultFile

  shell $cmdline
  $found=0

  if Open(2,$ResultFile)=0
    $file=readline(2)
    while len($file)>2
      $res = WriteValue(\"HKEY_LOCAL_MACHINE\\SOFTWARE\\TechBiz\\NAV\",\"HSTFile\",\"$file\",\"REG_SZ\")
      $found=$found+1
      $file=readline(2)
    loop
    $result=close(2)
  endif
  del \"%temp%\\HSTlist.ini\"

  if $found>1
    $NAVOK = False
    ? \"ERROR: TechBiz Logon Script found more than one Liveupdt.hst file,\"
    ? \"please contact your local help center.\"
    sleep 2
  endif

  if $found<1
    $NAVOK = False
    ? \"ERROR: Liveupdt.hst file not found, please contact your local help center.\"
    sleep 2
  endif
ENDIF

$NavHSTFileUpdated = False

IF $NAVOK = True
  $FileName = \"Liveupdt.hst\"
  $SrcPath = \"$ld\\LiveUpdate\"

  $DestFile = ReadValue(\"HKEY_LOCAL_MACHINE\\SOFTWARE\\TechBiz\\NAV\",\"HSTFile\")

  $SrcFile = $SrcPath+\"\\\"+$FileName
  if comparefiletimes($DestFile,$SrcFile)<0
    copy $SrcFile $DestFile
    $NavHSTFileUpdated = True
  endif
ENDIF


; ----------------------------
; Run Silent Norton LiveUpdate
; ----------------------------
; Compatible with Norton Antivirus 2000 for Windows 9x and NT/2000

IF ExistKey(\"HKEY_LOCAL_MACHINE\\SOFTWARE\\Symantec\\Norton AntiVirus\") = 0
  ? \"Preparing for the NAV Live Update...\"
  $NavPath = ReadValue(\"HKEY_LOCAL_MACHINE\\SOFTWARE\\Symantec\\InstalledApps\",\"NAV\")
  $res = WriteValue(\"HKEY_CURRENT_USER\\Software\\Microsoft\\Windows\\CurrentVersion\\RunOnce\", \"NAV LiveUpdate\", \"$NavPath\\navlu32.exe /silent\", \"REG_SZ\")
ENDIF

:NAV_Done

Hvis du vil have andre smarte KiXtart stuff mm. så sig lige til ... TechBiz klarer den :)

Det skal lige siges at det første script med opdatering af NAV Liveupdt.hst filen ikke er nødvændigt hvis dine klienter skal bruge symantec\'s liveupdate server, jeg har lavet det pga. at jeg har min egen Live Update server :)