The Windows Scripting Host - dFPUG-Portal

More documents

Recommendations

Info

Print Article Arguments Parameters to a shortcut object Description A description of a shortcut object Hotkey The hot key of a shortcut object IconLocation The icon location of a shortcut object TargetPath The target path of a shortcut object WindowStyle The window style of a shortcut object WorkingDirectory The working directory of a shortcut object The WSHShortcut object only has one method -- Save() -- which saves the shortcut object to the file system. ExpandEnvironmentSettings (strString) This method expands a process environment variable and returns the result. A typical environment variable is WINDIR. The following code illustrates how this method works: Fullpath = WSHShell.ExpandEnvironmentStrings ; ("%windir%\notepad.exe, 0") Popup (strText, [natSecondsToWait], [strTitle], [natType]) This method displays the Window MessageBox. Unlike the existing MessageBox function, the Popup method accepts an optional argument to clear the dialog box after a specified amount of time. The following line of code illustrates how the Popup method works: WSHShell.Popup("Message",1,"Title",64) Run(strCommand, [intWindowStyle], [blnWaitOnReturn]) The Run method creates a new process that executes a specified command with a specified window style. In addition to being able to specify the command and the window style, a third parameter can be used to determine whether script execution should pause until the new process has terminated. Applications windows can be started in several states. The following outlines the various options available: SW_HIDE 0 SW_MINIMIZE 6 SW_RESTORE 9 SW_SHOW 5 SW_SHOWMAXIMIZED 3 SW_SHOWMINIMIZED 2 SW_SHOWMINNOACTIVE 7 SW_SHOWNA 8 SW_SHOWNOACTIVATE 4 SW_SHOWNORMAL 1 The following code starts Notepad with a normal window: WSHshell.Run("notepad",1) The following code starts Notepad with a maximized window. In addition, the user must close Notepad before control will return to VFP: WSHshell.Run("notepad",3,.T.) Fully qualified paths can be used to denote a file to execute. The following code starts Visio: WSHshell.Run("D:\VISIO\VISIO32.EXE") Also, script files can be executed with the Run method as well: WSHshell.Run("hello world.vbs") WSHshell.Run("hello world.js") Network object properties and methods ComputerName This property denotes the name of the computer: ComputerName = WSHNetwork.ComputerName UserDomain http://foxtalknewsletter.com/ME2/Audiences/Segments/Publications/Print.asp?Module=... Seite 4 von 6 31.01.06
Print Article This property denotes the domain to which the user belongs: DomainName = WSHNetwork.UserDomain UserName This property denotes the ID of the currently logged-in user: UserName = WSHNetwork.UserName AddPrinterConnection(strLocalName, strRemoteName, [bUpdateProfile], [strUser], [strPassword] ) This method maps a network printer to a local resource. WSHNetwork.AddPrinterConnection("LPT1","\\server\ ; printer_share",.T.,"UserID","Password") Of special interest here is the third parameter -- bUpdateProfile. If this parameter is set to .T., the user profile for the local machine is updated to restore the printer mapping the next time the user logs onto the machine and network. EnumNetworkDrives This method returns a collection of drive mappings. The following code loops through the collection of network drive mappings: oDrives = WSHNetwork.EnumDriveMappings item = -1 For Each x In oDrives item = item + 1 If Mod(item,2) = 0 ?"Drive Letter: ",x Else ?"Network Resource: ",x Endif Next x Like other collections, the drive mapping collection supports both the Count and Length properties as well as the Item() method. EnumPrinterConnections This method works just like the EnumNetworkDrives, with the difference being that the collection returned represents printers, not drive mappings: item = -1 For Each x In oPrinters item = item + 1 If Mod(item,2) = 0 ?"Printer Name: ",x Else ?"Network Resource: ",x Endif Next x MapNetworkDrive(strLocalName, strRemoteName, [bUpdateProfile], [strUser], [strPassword] ) This method works just like the AddPrinterConnection Method, with the exception that a local drive to a network resource is created: WSHNetwork.MapNetworkDrive("z:","\\server\ ; server_share",.T.,"User","Password") RemoveNetworkDrive(strName, [bForce], [bUpdateProfile] ) This method removes a specified network drive mapping. Optionally, you can force the removal even if the resource is being used. An optional third parameter specifies whether the user profile should be updated: WSHNetwork.RemoveNetworkDrive("z:",.T.,.T.) or WSHNetwork.RemoveNetworkDrive("\\server\ ; server_share",.T.,.T.) RemovePrinterConnection(strName, [bForce], [bUpdateProfile] ) This method works just like the RemoveNetworkDrive method, with the exception that a printer resource is being removed: WSHNetwork.RemovePrinerConnection("LPT1",.T.,.T.) http://foxtalknewsletter.com/ME2/Audiences/Segments/Publications/Print.asp?Module=... Seite 5 von 6 31.01.06
Page 1 and 2: Print Article Issue Date: FoxTalk J
Page 3: Print Article oEnv = wshshell.envir

The Windows Scripting Host - dFPUG-Portal

You also want an ePaper? Increase the reach of your titles

Delete template?

Save as template?