IIS 7.0 World Wide Web Publishing Service, Microsoft Windows Server 2008'in yerine çalýþma kümesinde yapýlandýrma

1. Web sunucu rolünü, tüm küme düðümlerine yükleyin. Ayrýntýlar için aþaðýdaki Microsoft Web sitesini ziyaret edin:
   http://technet.microsoft.com/en-us/library/cc771752.aspx (http://technet.microsoft.com/en-us/library/cc771752.aspx)
2. Kümeleme yerine çalýþma özelliðini tüm küme düðümlerinde yükleme ve küme oluþturun. Ayrýntýlar için aþaðýdaki Microsoft Web sitesini ziyaret edin:
   http://technet.microsoft.com/en-us/library/dd197477.aspx (http://technet.microsoft.com/en-us/library/dd197477.aspx)
3. IIS paylaþýlan yapýlandýrma için kullanýlan bir dosya paylaþýmý oluþturun.
4. Paylaþýlan IIS yapýlandýrmasýný tüm küme düðümlerinde yapýlandýrýn.
5. IIS çevrimdýþý dosyalar paylaþýlan yapýlandýrmasý için tüm küme düðümlerinde yapýlandýrýn.
6. Web sitesi (iliþkilendirilmiþ uygulama havuzunu dahil) yapýlandýrmak ve bir küme düðümünde, içeriðin konumunu belirtin.
7. Web siteniz için yüksek kullanýlabilirlik, yerine çalýþma Küme hizmeti genel komut dosyasý oluþturarak yapýlandýrýn.

Üste

Paylaþýlan IIS yapýlandýrma için kullanýlan bir dosya paylaþýmýna ayarlama

1. IIS paylaþýlan yapýlandýrmasý için kullanýlacak paylaþým eriþecek kullanýcý oluþturun.
2. Dosya paylaþýmý oluþturun. Bu paylaþýmýn, IIS, tüm küme düðümlerinde arasýnda paylaþtýrýlýr IIS paylaþýlan yapýlandýrmasýný saklamak için kullanýlýr. Birden çok seçenek vardýr:
   • Herhangi bir baþarýsýzlýk kümesinin parçasý olan bir tek baþýna sunucuda bir dosya paylaþýmý oluþturun.
   • Baþka bir Windows Server Baþarýsýzlýk kümesinde, bir <a0>yüksek kullanýlabilirlik</a0> dosya paylaþýmý oluþturun. Ayrýntýlar için aþaðýdaki Microsoft Web sitesini ziyaret edin:
     http://technet.microsoft.com/en-us/library/cc731844.aspx (http://technet.microsoft.com/en-us/library/cc731844.aspx)
   • Yüksek kullanýlabilirlik Web sitesini barýndýracak ayný baþarýsýzlýk küme üzerinde bir <a0>yüksek kullanýlabilirlik</a0> dosya paylaþýmý oluþturun. Ayrýntýlar için aþaðýdaki Microsoft Web sitesini ziyaret edin:
     http://technet.microsoft.com/en-us/library/cc731844.aspx (http://technet.microsoft.com/en-us/library/cc731844.aspx)
3. 2. Adýmda oluþturduðunuz paylaþýmdaki izinler ayarlayýn. Oluþturduðunuz dosya paylaþýmý 1. adým Tam Denetim izinleri ve NTFS izinleri kullanýcýya verilir.
4. Tüm küme düðümlerine dosya paylaþýmýna Gözat ýnternet'e baðlanabildiðinizi doðrulayýn. Dosya paylaþýmýnýn yolu \\ <fileserver>\ <share>.

Üste

Paylaþýlan IIS yapýlandýrmasýný tüm küme düðümlerinde yapýlandýrýn.

1. Bir yönetici komut istemini açýn.
2. Aþaðýdaki komutu çalýþtýrýn:
   net stop apphostsvc
3. Aþaðýdaki komutu çalýþtýrýn:
   sc privs apphostsvc SeChangeNotifyPrivilege/SeTcbPrivilege/SeImpersonatePrivilege
4. Aþaðýdaki komutu çalýþtýrýn:
   net start apphostsvc

1. Yönetimsel Araçlar ' ýn üzerine gidin ve sonra da ýnternet ýnformation Services (IIS) Yöneticisi ' ni týklatýn.
2. Sol bölmede <a0>sunucu</a0> adý düðümünü'ý týklatýn.
3. Paylaþýlan bir konfigürasyon simgesini çift týklatýn.
4. Paylaþýlan yapýlandýrma sayfasýnda Verme yapýlandýrma yapýlandýrma dosyalarý dýþa aktarmak için Eylemler bölmesinde (saðdaki bölme) yerel bilgisayardan baþka bir yere týklatýn.
5. Verme yapýlandýrmasý iletiþim kutusunda, dosya paylaþýmýnýn yolunu yazýn (\\ <fileserver>\ <share>) fiziksel yolu kutusuna.
6. Farklý Baðlan'ý týklatýn ve sonra da kullanýcý adý ve paylaþýmýna eriþimi olan kullanýcý hesabýnýn parolasýný yazýn, paylaþýlan konfigürasyon depolanýr ve Tamam ' ý týklatýn. Bu hesabýn, paylaþýma eriþim için kullanýlýr. Etki alaný yöneticisi olmayan sýnýrlý bir Active Directory hesabý kullanmanýz gerekir.
7. Yapýlandýrmasý ver iletiþim kutusunda, þifreleme anahtarlarýný korumak için kullanýlan týklatýn ve sonra Tamam ' den küçük bir parola yazýn.
8. Paylaþýlan yapýlandýrma sayfasýnda paylaþýlan konfigürasyon etkinleþtir onay kutusunu seçmek için týklatýn.
9. Fiziksel yolu, kullanýcý hesabýnýn ve daha önce girdiðiniz parolayý yazýn ve sonra da Eylemler bölmesinde Uygula ' yý týklatýn.
10. Þifreleme anahtarlarý parolasý iletiþim kutusunda, daha önce ayarladýðýnýz þifreleme anahtarý parolasý yazýn ve Tamam ' ý týklatýn.
11. Paylaþýlan yapýlandýrmasý iletiþim kutusunda, <a3>Tamam</a3>'ý týklatýn.
12. Tamam ' ý týklatýn.

1. Yönetimsel Araçlar ' ýn üzerine gidin ve sonra da ýnternet ýnformation Services (IIS) Yöneticisi ' ni týklatýn.
2. Sunucu adý düðümünü týklatýn.
3. Paylaþýlan bir konfigürasyon simgesini çift týklatýn.
4. Paylaþýlan yapýlandýrma sayfasýnda paylaþýlan konfigürasyon etkinleþtir onay kutusunu seçmek için týklatýn.
5. Fiziksel dosya paylaþýmýnýn yolunu yazýn (\\ <fileserver>\ <share>), kullanýcý hesabý ve parolayý daha önce girilen ve sonra da Eylemler bölmesinde Uygula ' yý týklatýn.
6. Þifreleme anahtarlarý parolasý iletiþim kutusunda, daha önce ayarladýðýnýz þifreleme anahtarý parolasý yazýn ve Tamam ' ý týklatýn.
7. Paylaþýlan yapýlandýrmasý iletiþim kutusunda, <a3>Tamam</a3>'ý týklatýn.
8. Tamam ' ý týklatýn.

Üste

Tüm küme düðümlerinde IIS çevrimdýþý dosyalar paylaþýlan yapýlandýrma için yapýlandýrma

1. Masaüstü deneyimi yükleyin.
   1. Yönetimsel Araçlar ' ýn üzerine gidin ve sonra da Server Manager ' ý týklatýn.
   2. Sol bölmede, Özellikler ' i týklatýn.
   3. Sað bölmede, Özellikleri Ekle'yi týklatýn.
   4. Masaüstü deneyimi onay kutusunu seçmek için týklatýn.
   5. Masaüstü deneyimi yüklemek için Yükle ' yi týklatýn.
   6. Bilgisayarý yeniden baþlatýn.
2. Denetim Masasý'nda, Çevrimdýþý dosyalar ' ý açýn.
3. Çevrimdýþý dosyalarý etkinleþtir ' i týklatýn. Þu anda bu bilgisayarý yeniden baþlatmayýn.
4. Önbellek ayarlanmýþ emin salt okunur. Bunu yapmak için <a0></a0>, bir ayrýcalýðý yükseltilmiþ bir cmd penceresinde aþaðýdaki komutu çalýþtýrýn:

   REG ADD "HKLM\System\CurrentControlSet\Services\CSC\Parameters" /v ReadOnlyCache /t REG_DWORD /d 1 /f 
   

5. Bilgisayarý yeniden baþlatýn.
6. Dosya sunucusuna bilgisayardan göz atýn. Paylaþýlan IIS yapýlandýrmasýný içeren paylaþým'ý sað týklatýn ve sonra Her zaman çevrimdýþý.
   Küme düðümü üzerinde olan yüksek oranda kullanýlabilir dosya sunucusuna ev sahipliði yapan, paylaþýmý üzerinde sað týklattýðýnýzda, ayný Baþarýsýzlýk kümesinde yüksek oranda kullanýlabilir dosya paylaþýmýna Kur varsa, IIS düðümlerin barýndýran Not, her zaman çevrimdýþý seçeneði görünmez. Yüksek kullanýlabilir dosya sunucu uygulamasý baþka bir düðüme taþýmak gerekir.
7. Denetim Masasý'nda, Çevrimdýþý dosyalar ' ý açýn. Eþitleme Merkezi'ni Aç'ý týklatýn ve sonra Schedule ' ý týklatýn.
8. Bir çevrimdýþý dosya eþitleme, her gün için veya gereksinimin göre zamanlayabilirsiniz. Çevrimdýþý eþitleme birkaç dakikada bir çalýþacak þekilde de yapýlandýrabilirsiniz Applicationhost.config dosyasýndaki bir þey deðiþtiðinde Çizelgeleyici, ayarlanmýþ olsa bile, deðiþiklik, Web sunucusu üzerinde yansýtýlýr.

Üste

Web sitesi (iliþkilendirilmiþ uygulama havuzunu dahil) yapýlandýrmak ve bir küme düðümünde, içeriðin konumunu belirtin

1. Yönetimsel Araçlar ' ýn üzerine gidin ve Yerine çalýþma için Küme Yöneticisi ' ni týklatýn.
2. Kümeye baðlanýn. Küme düðümlerinde birini kullanýyorsanýz, küme listede otomatik olarak görüntülenir.
3. Depolama ' nýn altýnda Web sayfasý içeriðini alaca?? disk kaynaðý bulun. Bunu yapmak için <a0></a0>, disk kaynaðý için depolama aðacý geniþletin. Depolama Birimi küme üzerinde baþka bir yüksek kullanýlabilirlik uygulama tarafýndan kullanýlmasýný saðlayýn. Depolama Kullanýlabilir depolama altýnda bulabilirsiniz.
4. Bu kaynaðýn çevrimiçi olduðu küme düðümü unutmayýn. IIS, bu küme düðümünde yapýlandýracaktýr.
5. Küme disk kaynaðý adýný not edin. Bu içerik dosyalarý kullanýr.

1. Yönetimsel Araçlar ' ýn üzerine gidin ve sonra da ýnternet ýnformation Services (IIS) Yöneticisi ' ni týklatýn.
2. Sol bölmede, sunucu adý düðümünü geniþletin.
3. Siteleri ' ni týklatýn ve sonra Site altýnda yapýlandýrmakta olduðunuz site.
4. Sað bölmede, Geliþmiþ ayarlar altýnda Web sitesi Yönet'i seçin.
5. Genel ayarlar altýnda Fiziksel PATH özelliði'ni bulun ve sonra da Web sitesinin içerik dosyalarýnýn bulunduðu konumun konumu yazýn. Önceki yordamý 5 adýmýnda not ettiðiniz küme disk kaynaðý konumudur.
6. Tamam ' ý týklatýn.

Üste

Yerine çalýþma Küme Yöneticisi'nde genel komut dosyasý oluþturarak, yüksek kullanýlabilirlik Web siteniz için yapýlandýrma

1. Her küme düðümünde, Windows\System32\inetsrv\Clusweb7.vbs için bu makalenin sonunda komut dosyasýný kopyalayýn.
2. Varsayýlan olarak, komut dosyasý "varsayýlan Web sitesi" ve "DefaultAppPool" adlý bir uygulama havuzu adlý bir Web sitesi izler. Bu uygulama havuzu ve doðru Web sitesi deðilse, SITE_NAME ve APP_POOL_NAME deðiþkenleri deðiþtirir. Tüm küme düðümlerinde ayný Web sitesi ve uygulama havuzu komut dosyasýnda bulunduðundan emin olun. Adlar büyük/küçük harf duyarlý olduðunu unutmayýn.
3. Yönetimsel Araçlar ' ýn üzerine gidin ve Yerine çalýþma için Küme Yöneticisi ' ni týklatýn.
4. Kümeye baðlanýn. Küme düðümlerinde birini kullanýyorsanýz, küme listede otomatik olarak görüntülenir.
5. Kümeyi sað týklatýn ve bir hizmet veya uygulama Yapýlandýr ' ý týklatýn. Sihirbaz, yüksek kullanýlabilirlik iþ yükü oluþturur.
6. Genel komut dosyasý ' ný týklatýn.
7. Komut dosyasýný aþaðýdaki yoldan seçin: %systemroot%\System32\Inetsrv\clusweb7.vbs
8. Client Access Point (CAP) adý, istemciler yüksek kullanýlabilirlik Web sitesine baðlanmak için kullanacaðý Web sitesi adýna ayarlayýn. CAP Web sitesi için kullanýlacak bir statik ýp belirtin. DHCP kullanýyorsanýz, bu seçeneði görüntülenmez.
9. Depolama Seç adýmý, Web sitesinin içerik dosyalarýnýn bulunduðu küme paylaþýlmýþ disk seçin. Depolama kullanýlmayan olmasý gereken baþka bir yüksek kullanýlabilirlik uygulama küme üzerinde. IIS paylaþýlan yapýlandýrma için kullanýlan bir dosya paylaþýmýna ayný küme üzerinde barýndýrýlýyorsa, bir baþka disk kaynaðý burada kullanýlmasý gerektiðini unutmayýn.
10. Ayarlarý doðruladýktan sonra Sihirbaz küme grubunu, küme kaynaklarý ve kaynaklarý arasýndaki baðýmlýlýklar ve sonra kaynaklarýný çevrimiçine getirin.

'<begin script sample>


'This script provides high availability for IIS websites
'By default, it monitors the "Default Web Site" and "DefaultAppPool"
'To monitor another web site, change the SITE_NAME below
'To monitor another application pool, change the APP_POOL_NAME below
'More thorough and application-specific health monitoring logic can be added to the script if needed

Option Explicit

DIM SITE_NAME
DIM APP_POOL_NAME
Dim START_WEB_SITE
Dim START_APP_POOL
Dim SITES_SECTION_NAME
Dim APPLICATION_POOLS_SECTION_NAME
Dim CONFIG_APPHOST_ROOT
Dim STOP_WEB_SITE


'Note:
'Replace this with the site and application pool you want to configure high availability for
'Make sure that the same web site and application pool in the script exist on all cluster nodes. Note that the names are case-sensitive.
SITE_NAME = "Default Web Site"
APP_POOL_NAME = "DefaultAppPool"

START_WEB_SITE = 0
START_APP_POOL = 0
STOP_WEB_SITE  = 1
SITES_SECTION_NAME = "system.applicationHost/sites"
APPLICATION_POOLS_SECTION_NAME = "system.applicationHost/applicationPools"
CONFIG_APPHOST_ROOT = "MACHINE/WEBROOT/APPHOST"

'Helper script functions


'Find the index of the website on this node
Function FindSiteIndex(collection, siteName)

    Dim i

    FindSiteIndex = -1    

    For i = 0 To (CInt(collection.Count) - 1)
        If collection.Item(i).GetPropertyByName("name").Value = siteName Then
            FindSiteIndex = i
            Exit For
        End If		 
    Next

End Function


'Find the index of the application pool on this node
Function FindAppPoolIndex(collection, appPoolName)

    Dim i

    FindAppPoolIndex = -1    

    For i = 0 To (CInt(collection.Count) - 1)
        If collection.Item(i).GetPropertyByName("name").Value = appPoolName Then
            FindAppPoolIndex = i
            Exit For
        End If		 
    Next

End Function

'Get the state of the website
Function GetWebSiteState(adminManager, siteName)

    Dim sitesSection, sitesSectionCollection, siteSection, index, siteMethods, startMethod, executeMethod
    Set sitesSection = adminManager.GetAdminSection(SITES_SECTION_NAME, CONFIG_APPHOST_ROOT)
    Set sitesSectionCollection = sitesSection.Collection

    index = FindSiteIndex(sitesSectionCollection, siteName)
    If index = -1 Then
        GetWebSiteState = -1
    End If	    

    Set siteSection = sitesSectionCollection(index)

    GetWebSiteState = siteSection.GetPropertyByName("state").Value

End Function

'Get the state of the ApplicationPool
Function GetAppPoolState(adminManager, appPool)

    Dim configSection, index, appPoolState

    set configSection = adminManager.GetAdminSection(APPLICATION_POOLS_SECTION_NAME, CONFIG_APPHOST_ROOT)
    index = FindAppPoolIndex(configSection.Collection, appPool)

    If index = -1 Then
        GetAppPoolState = -1
    End If	    

    GetAppPoolState = configSection.Collection.Item(index).GetPropertyByName("state").Value
End Function


'Start the w3svc service on this node
Function StartW3SVC()

    Dim objWmiProvider
    Dim objService
    Dim strServiceState
    Dim response

    'Check to see if the service is running
    set objWmiProvider = GetObject("winmgmts:/root/cimv2")
    set objService = objWmiProvider.get("win32_service='w3svc'")
    strServiceState = objService.state

    If ucase(strServiceState) = "RUNNING" Then
        StartW3SVC = True
    Else
        'If the service is not running, try to start it
        response = objService.StartService()

        'response = 0  or 10 indicates that the request to start was accepted
        If ( response <> 0 ) and ( response <> 10 ) Then
            StartW3SVC = False
        Else
            StartW3SVC = True
        End If
    End If
    
End Function


'Start the application pool for the website
Function StartAppPool()

    Dim ahwriter, appPoolsSection, appPoolsCollection, index, appPool, appPoolMethods, startMethod, callStartMethod
    Set ahwriter = CreateObject("Microsoft.ApplicationHost.WritableAdminManager")

    Set appPoolsSection = ahwriter.GetAdminSection(APPLICATION_POOLS_SECTION_NAME, CONFIG_APPHOST_ROOT)       
    Set appPoolsCollection = appPoolsSection.Collection

    index = FindAppPoolIndex(appPoolsCollection, APP_POOL_NAME)
    Set appPool = appPoolsCollection.Item(index)
    
    'See if it is already started
    If appPool.GetPropertyByName("state").Value = 1 Then
        StartAppPool = True
        Exit Function
    End If

    'Try To start the application pool
    Set appPoolMethods = appPool.Methods
    Set startMethod = appPoolMethods.Item(START_APP_POOL)
    Set callStartMethod = startMethod.CreateInstance()
    callStartMethod.Execute()
    
    'If started return true, otherwise return false
    If appPool.GetPropertyByName("state").Value = 1 Then
        StartAppPool = True
    Else
        StartAppPool = False
    End If

End Function


'Start the website
Function StartWebSite()

    Dim ahwriter, sitesSection, sitesSectionCollection, siteSection, index, siteMethods, startMethod, executeMethod
    Set ahwriter = CreateObject("Microsoft.ApplicationHost.WritableAdminManager")
    Set sitesSection = ahwriter.GetAdminSection(SITES_SECTION_NAME, CONFIG_APPHOST_ROOT)
    Set sitesSectionCollection = sitesSection.Collection

    index = FindSiteIndex(sitesSectionCollection, SITE_NAME)
    Set siteSection = sitesSectionCollection(index)

    if siteSection.GetPropertyByName("state").Value = 1 Then
        'Site is already started
        StartWebSite = True
        Exit Function
    End If

    'Try to start site
    Set siteMethods = siteSection.Methods
    Set startMethod = siteMethods.Item(START_WEB_SITE)
    Set executeMethod = startMethod.CreateInstance()
    executeMethod.Execute()

    'Check to see if the site started, if not return false
    If siteSection.GetPropertyByName("state").Value = 1 Then
        StartWebSite = True
    Else
        StartWebSite = False
    End If

End Function


'Stop the website
Function StopWebSite()

    Dim ahwriter, sitesSection, sitesSectionCollection, siteSection, index, siteMethods, startMethod, executeMethod, autoStartProperty
    Set ahwriter = CreateObject("Microsoft.ApplicationHost.WritableAdminManager")
    Set sitesSection = ahwriter.GetAdminSection(SITES_SECTION_NAME, CONFIG_APPHOST_ROOT)
    Set sitesSectionCollection = sitesSection.Collection

    index = FindSiteIndex(sitesSectionCollection, SITE_NAME)
    Set siteSection = sitesSectionCollection(index)

    'Stop the site
    Set siteMethods = siteSection.Methods
    Set startMethod = siteMethods.Item(STOP_WEB_SITE)
    Set executeMethod = startMethod.CreateInstance()
    executeMethod.Execute()

End Function



'Cluster resource entry points. More details here:
'http://msdn.microsoft.com/en-us/library/aa372846(VS.85).aspx

'Cluster resource Online entry point
'Make sure the website and the application pool are started
Function Online( )

    Dim bOnline
    'Make sure w3svc is started
    bOnline = StartW3SVC()

    If bOnline <> True Then
        Resource.LogInformation "The resource failed to come online because w3svc could not be started."
        Online = False
        Exit Function
    End If


    'Make sure the application pool is started
    bOnline = StartAppPool()
    If bOnline <> True Then
        Resource.LogInformation "The resource failed to come online because the application pool could not be started."
        Online = False
        Exit Function
    End If


    'Make sure the website is started
    bOnline = StartWebSite()
    If bOnline <> True Then
        Resource.LogInformation "The resource failed to come online because the web site could not be started."
        Online = False
        Exit Function
    End If

    Online = true 

End Function

 
'Cluster resource offline entry point
'Stop the website
Function Offline( )

    StopWebSite()
    Offline = true

End Function


'Cluster resource LooksAlive entry point
'Check for the health of the website and the application pool
Function LooksAlive( )

    Dim adminManager, appPoolState, configSection, i, appPoolName, appPool, index

    i = 0
    Set adminManager  = CreateObject("Microsoft.ApplicationHost.AdminManager")
    appPoolState = -1

    'Get the state of the website
    if GetWebSiteState(adminManager, SITE_NAME) <> 1 Then
        Resource.LogInformation "The resource failed because the " & SITE_NAME & " web site is not started."
        LooksAlive = false
        Exit Function
    End If


    'Get the state of the Application Pool
     if GetAppPoolState(adminManager, APP_POOL_NAME) <> 1 Then
         Resource.LogInformation "The resource failed because Application Pool " & APP_POOL_NAME & " is not started."
         LooksAlive = false  
	 Exit Function
     end if

     '  Web site and Application Pool state are valid return true
     LooksAlive = true
End Function


'Cluster resource IsAlive entry point
'Do the same health checks as LooksAlive
'If a more thorough than what we do in LooksAlive is required, this should be performed here
Function IsAlive()   

    IsAlive = LooksAlive

End Function


'Cluster resource Open entry point
Function Open()

    Open = true

End Function


'Cluster resource Close entry point
Function Close()

    Close = true

End Function


'Cluster resource Terminate entry point
Function Terminate()

    Terminate = true

End Function
'<end script sample>

Üste