Jump to content

thorgood

Expert Member
  • Gesamte Inhalte

    2.709
  • Registriert seit

  • Letzter Besuch

Beiträge erstellt von thorgood

  1. Sehr schön. Danke.

     

    Als kleine Erweiterung kann der Benutzer noch aufgefordert werden seine Datei

    gleich unter einem vorgebenen Pfad und Dateinamen zu speichern.

     

    Sub FileNew()
       If Dialogs(wdDialogFileNew).Show Then
           Call SaveDocument
       End If
    End Sub
    
    Sub SaveDocument()
       Dim DocPath As String
       Dim DocName As String
       Dim dlg As Dialog
    
       DocPath = "C:\"
       DocName = "FNxxxx"
    
       Set dlg = Dialogs(wdDialogFileSaveAs)
       With dlg
           .Name = DocPath + DocName
           .Show
       End With
    
    End Sub

     

    thorgood

  2. Hi Apache,

     

    die einfachste Möglichkeit ist die Computer vor der Installation im AD anzulegen.

     

    Zweitens kann RIS, sollten alle Computer mit ABC beginnen, auch nach deiner

    Vorgabe die Namen vergeben.

     

    Bei manuellem/script umbennen beim Start müsstest du uns noch sagen woher

    die Informationen kommen welcher Computer welchen Namen erhält.

     

    thorgood

  3. Hi nissanracer,

     

    die "Shell Folders" werden bei der Anmeldung aus den "User Shell Folders" erzeugt.

    Da die Einträge dort vom Typ SZ_EXPANDABLE sind kannst du dort auch Variablen verwenden.

     

    CLASS MACHINE

    CLASS USER

    CATEGORY "Windows-Komponenten"

    CATEGORY "Internet Explorer"

    KEYNAME "Software\Microsoft\Windows\CurrentVersion\Explorer\User Shell Folders"

    POLICY "UNC Pfad Favoriten"

    PART "Eingabe des Ordners für Favoriten" EDITTEXT

    REQUIRED

    EXPANDABLETEXT

    DEFAULT "\\Server01\Home$\%USERNAME%\Favoriten"

    VALUENAME "Favorites"

    END PART

    END POLICY

    END CATEGORY

    END CATEGORY

     

    thorgood

×
×
  • Neu erstellen...