tailieunhanh - sams teach Yourself windows Script Host in 21 Days phần 7

bởi vì nó giúp loại bỏ các xung đột tiềm năng có thể xảy ra giữa các kịch bản. Hơn nữa, các biến trong các kịch bản WSH có thể thực hiện bất kỳ loại giá trị bao gồm chuỗi, số, và các đối tượng. Trong các tập tin hàng loạt, biến môi trường là luôn luôn strings | Simpo PDF Merge and Split Unregistered Version - http Listing Using to Create a Web Site FILE DESC This script illustrates how you can programmatically create a web site using IIS administration objects. AUTH Thomas L. Fredell DATE 11 23 98 Copyright 1998 Macmillan Publishing Option Explicit On Error Resume Next Dim oArgs sComputer sHostName sRootDir Dim oService nNewServer oServer oVDir oDir Dim oFS sBasePath sCGIDir Dim sTmp Step 1 Check script arguments Set oArgs If 4 Then USAGE createweb computer hostname _ instance rootdir hostname . Creates a new IIS web site on computer using the server root instance specifies the web and rootdir specifies the directory on the file system. 1 End If sComputer oArgs 0 sHostName oArgs 1 nNewServer oArgs 2 sRootDir oArgs 3 Step 2 Get the object that represents the web service Set oService GetObject IIS sComputer W3SVC Step 3 Create a new virtual server Determine the new virtual server number by SimpoPDF MergegandhS plit UnregisteredVersion - http Set oServer IIsWebServer nNewServer If 0 Then ShowErr Unable to create server. End If Step 4 Configure the new server New server created by 600 80 sHostName If 0 Then ShowErr An error occurred while setting configuration params. End If Step 5 Create virtual root directory for the new site Set oVDir IIsWebVirtualDir ROOT If 0 Then ShowErr Unable to create virtual root directory. End If Step 6 Configure the virtual root directory Set oFS CreateObject sBasePath .