Υπόσταση το αντικείμενο που δημιουργεί ασφάλεια . Για να χρησιμοποιήσετε το δίκτυο , το αντικείμενο αυτό απαιτείται για την παροχή των διαπιστευτηρίων credentials.Set χρήστη = CreateObject ( " WbemScripting.SWbemLocator " ) 2
Δημιουργήστε τα διαπιστευτήρια και να τους εκχωρήσετε σε μια σύνδεση object.Set con = credentials.ConnectServer ( " ApplicationServer " , " apps \\ install_directory " , "τομέας \\ AdminUsername " , " myPass " , " kerberos : ApplicationServer " ) con.Security_.ImpersonationLevel = wbemImpersonationLevelDelegate
εικόνων 3
Υπόσταση την κατηγορία της εγκατάστασης . Ρυθμίστε την κλήση εγκατάσταση σε μια μεταβλητή σφάλματος . Η μεταβλητή σφάλματος σας ειδοποιεί για τυχόν εγκαταστάσεις που απέτυχαν στο inst network.Set = con.Get ( " Win32_Product " ) myErr = inst.Install ( " \\ \\ server \\ εγκαθιστά \\ myInstall.msi " , True )
4
Σώστε το αρχείο με επέκταση vbs . . Τοποθετήστε αυτό το αρχείο στο φάκελο του πελάτη " Εκκίνηση" στο σκληρό δίσκο . Μπορείτε επίσης να ωθήσει αυτά τα αρχεία χρησιμοποιώντας δέσμες ενεργειών σύνδεσης στο διακομιστή .
Εικόνων Εγκατάσταση μιας εφαρμογής από τον τοπικό υπολογιστή
5
Υπόσταση της υπηρεσίας εγκαταστήσετε class.Set install = GetObject ( " winmgmts : " )
Η 6
Υπόσταση την κατηγορία λογισμικού . Η κατηγορία αυτή δηλώνει το είδος του λογισμικού installation.Set = install.Get ( " Win32_Product " )
Η 7
Καλέστε τη μέθοδο εγκατάστασης και ορίστε την τιμή επιστροφής σε ένα λάθος variable.install_error = software.Install ( " c : \\. αρχεία \\ officeinstall.msi » . , , True )
8
Σώστε το αρχείο με επέκταση vbs και τοποθετήστε το σε του χρήστη " "κατάλογο Startup
Η
Η
Πνευματικά δικαιώματα © Γνώση Υπολογιστών Όλα τα δικαιώματα κατοχυρωμένα