Object.Finalize Yöntem

Tanım

Bir nesnenin çöp toplama tarafından geri alınmadan önce kaynakları serbest bırakma ve diğer temizleme işlemlerini gerçekleştirmesine izin verir.Allows an object to try to free resources and perform other cleanup operations before it is reclaimed by garbage collection.

!Object ()
~Object ();
abstract member Finalize : unit -> unit
override this.Finalize : unit -> unit
Finalize ()

Örnekler

Aşağıdaki örnek, Finalize geçersiz kılan bir nesne yok edildiğinde yöntemin çağrıldığını doğrular Finalize .The following example verifies that the Finalize method is called when an object that overrides Finalize is destroyed. Bir üretim uygulamasında, Finalize nesne tarafından tutulan yönetilmeyen kaynakları serbest bırakmak için yönteminin geçersiz kılınabileceğini unutmayın.Note that, in a production application, the Finalize method would be overridden to release unmanaged resources held by the object. Ayrıca C# örneği, yöntemi geçersiz kılmak yerine bir yıkıcı sağlar Finalize .Also note that the C# example provides a destructor instead of overriding the Finalize method.

using System;
using System.Diagnostics;

public class ExampleClass
{
   Stopwatch sw;

   public ExampleClass()
   {
      sw = Stopwatch.StartNew();
      Console.WriteLine("Instantiated object");
   }

   public void ShowDuration()
   {
      Console.WriteLine("This instance of {0} has been in existence for {1}",
                        this, sw.Elapsed);
   }

   ~ExampleClass()
   {
      Console.WriteLine("Finalizing object");
      sw.Stop();
      Console.WriteLine("This instance of {0} has been in existence for {1}",
                        this, sw.Elapsed);
   }
}

public class Demo
{
   public static void Main()
   {
      ExampleClass ex = new ExampleClass();
      ex.ShowDuration();
   }
}
// The example displays output like the following:
//    Instantiated object
//    This instance of ExampleClass has been in existence for 00:00:00.0011060
//    Finalizing object
//    This instance of ExampleClass has been in existence for 00:00:00.0036294
Imports System.Diagnostics

Public Class ExampleClass
   Dim sw As StopWatch
   
   Public Sub New()
      sw = Stopwatch.StartNew()
      Console.WriteLine("Instantiated object")
   End Sub 

   Public Sub ShowDuration()
      Console.WriteLine("This instance of {0} has been in existence for {1}",
                        Me, sw.Elapsed)
   End Sub
   
   Protected Overrides Sub Finalize()
      Console.WriteLine("Finalizing object")
      sw.Stop()
      Console.WriteLine("This instance of {0} has been in existence for {1}",
                        Me, sw.Elapsed)
   End Sub
End Class

Module Demo
   Public Sub Main()
      Dim ex As New ExampleClass()
      ex.ShowDuration()
   End Sub
End Module
' The example displays output like the following:
'    Instantiated object
'    This instance of ExampleClass has been in existence for 00:00:00.0011060
'    Finalizing object
'    This instance of ExampleClass has been in existence for 00:00:00.0036294

Yöntemi geçersiz kılan ek bir örnek için Finalize , bkz GC.SuppressFinalize . yöntemi.For an additional example that overrides the Finalize method, see the GC.SuppressFinalize method.

Açıklamalar

FinalizeYöntemi, nesne yok etmeden önce geçerli nesne tarafından tutulan yönetilmeyen kaynaklarda temizleme işlemleri gerçekleştirmek için kullanılır.The Finalize method is used to perform cleanup operations on unmanaged resources held by the current object before the object is destroyed. Yöntemi korunuyor ve bu nedenle yalnızca bu sınıf veya türetilmiş bir sınıf aracılığıyla erişilebilir.The method is protected and therefore is accessible only through this class or through a derived class.

Bu bölümdeki konular:In this section:

Sonlandırmasının çalışmasıHow finalization works

ObjectSınıfı yöntemi için uygulama sağlamaz Finalize ve çöp toplayıcı, Object yöntemi geçersiz kılmadığı müddetçe sonlandırma için türetilmiş türleri işaretlemez Finalize .The Object class provides no implementation for the Finalize method, and the garbage collector does not mark types derived from Object for finalization unless they override the Finalize method.

Bir tür yöntemi geçersiz kıldığı takdirde Finalize , çöp toplayıcı, bir türün her örneği için sonlandırma kuyruğu adlı bir iç yapıya bir giriş ekler.If a type does override the Finalize method, the garbage collector adds an entry for each instance of the type to an internal structure called the finalization queue. Sonlandırma kuyruğu, Atık toplayıcısının belleğini geri kazanmak için sonlandırma kodu çalıştırması gereken yönetilen yığında tüm nesneler için girişler içerir.The finalization queue contains entries for all the objects in the managed heap whose finalization code must run before the garbage collector can reclaim their memory. Çöp toplayıcı daha sonra Finalize aşağıdaki koşullarda yöntemi otomatik olarak çağırır:The garbage collector then calls the Finalize method automatically under the following conditions:

  • Atık toplayıcı bir nesneye erişildikten sonra, nesnenin bir çağrı tarafından sonlandırılması dışında tutulmadığı durumlar GC.SuppressFinalize .After the garbage collector has discovered that an object is inaccessible, unless the object has been exempted from finalization by a call to the GC.SuppressFinalize method.

  • Yalnızca .NET Framework, nesne sonlandırmayla muaf tutulmadığı takdirde bir uygulama etki alanının kapatılırken.On .NET Framework only, during shutdown of an application domain, unless the object is exempt from finalization. Kapalı olduğunda bile, hala erişilebilir nesneler de sonlandırılır.During shutdown, even objects that are still accessible are finalized.

Finalize , gibi bir mekanizma kullanılarak yeniden kaydedilmediği GC.ReRegisterForFinalize ve GC.SuppressFinalize yöntemi daha sonra çağrılmadığı sürece, belirli bir örnek üzerinde otomatik olarak bir kez çağırılır.Finalize is automatically called only once on a given instance, unless the object is re-registered by using a mechanism such as GC.ReRegisterForFinalize and the GC.SuppressFinalize method has not been subsequently called.

Finalize işlemler aşağıdaki sınırlamalara sahiptir:Finalize operations have the following limitations:

  • Sonlandırıcı yürütüldüğünde tam zaman tanımsız olur.The exact time when the finalizer executes is undefined. Sınıfınızın örnekleri için kaynakların kararlı bir sürümünü sağlamak için bir Close Yöntem uygulayın veya bir IDisposable.Dispose uygulama sağlayın.To ensure deterministic release of resources for instances of your class, implement a Close method or provide a IDisposable.Dispose implementation.

  • İki nesnenin sonlandırıcılardan biri, bir nesne diğerini ifade etse bile, belirli bir sırada çalıştırılması garanti edilmez.The finalizers of two objects are not guaranteed to run in any specific order, even if one object refers to the other. Diğer bir deyişle, nesne A 'nın B nesnesine bir başvurusu varsa ve her ikisi de sonlandırıcılara sahipse, nesne Sonlandırıcı başlatıldığında nesne B zaten sonlandırılmış olabilir.That is, if Object A has a reference to Object B and both have finalizers, Object B might have already been finalized when the finalizer of Object A starts.

  • Sonlandırıcının çalıştığı iş parçacığı belirtilmemiş.The thread on which the finalizer runs is unspecified.

FinalizeYöntemi tamamlanmayabilir veya aşağıdaki olağanüstü koşullarda çalışmayabilir:The Finalize method might not run to completion or might not run at all under the following exceptional circumstances:

  • Başka bir Sonlandırıcı süresiz olarak engelliyorsa (sonsuz döngüye geçer, bir kilit almaya çalışır, hiçbir şekilde edinemez ve bu şekilde devam edebilir).If another finalizer blocks indefinitely (goes into an infinite loop, tries to obtain a lock it can never obtain, and so on). Çalışma zamanı sonlandırıcıları tamamlamaya çalışır, çünkü Sonlandırıcı süresiz olarak engelliyorsa diğer sonlandırıcılar çağrılamaz.Because the runtime tries to run finalizers to completion, other finalizers might not be called if a finalizer blocks indefinitely.

  • İşlem çalışma zamanına bir temizlik şansı vermeden sonlandığında.If the process terminates without giving the runtime a chance to clean up. Bu durumda, çalışma zamanının işlem sonlandırmasının ilk bildirimi DLL_PROCESS_DETACH bir bildirimdir.In this case, the runtime's first notification of process termination is a DLL_PROCESS_DETACH notification.

Çalışma zamanı, yalnızca sonlandırılabilir nesne sayısı azalmaya devam ederken, kapatmadan önce nesneleri sonlandırmaya devam eder.The runtime continues to finalize objects during shutdown only while the number of finalizable objects continues to decrease.

FinalizeYa da geçersiz kılma Finalize bir özel durum oluşturursa ve çalışma zamanı varsayılan ilkeyi geçersiz kılan bir uygulama tarafından barındırılmadıklarında, çalışma zamanı işlemi sonlandırır, etkin bir try / finally blok veya sonlandırıcılar yürütülmez.If Finalize or an override of Finalize throws an exception, and the runtime is not hosted by an application that overrides the default policy, the runtime terminates the process and no active try/finally blocks or finalizers are executed. Bu davranış, sonlandırıcının kaynakları serbest veya yok etme işlemini başaramazsa işlem bütünlüğünü sağlar.This behavior ensures process integrity if the finalizer cannot free or destroy resources.

Finalize yöntemini geçersiz kılmaOverriding the Finalize method

FinalizeDosya tanıtıcıları veya onları kullanan yönetilen nesne çöp toplama sırasında atıldığı zaman yayımlanması gereken veritabanı bağlantıları gibi yönetilmeyen kaynakları kullanan bir sınıf için geçersiz kılmanız gerekir.You should override Finalize for a class that uses unmanaged resources, such as file handles or database connections that must be released when the managed object that uses them is discarded during garbage collection. Yönetilen Finalize nesneler için bir yöntem uygulamanız gerekmez, çünkü çöp toplayıcı yönetilen kaynakları otomatik olarak yayımlar.You shouldn't implement a Finalize method for managed objects because the garbage collector releases managed resources automatically.

Önemli

SafeHandleYönetilmeyen kaynağı sarmalayan bir nesne varsa, Önerilen alternatif, Dispose deseninin bir güvenli tanıtıcı ile uygulanması ve geçersiz kılınmamalıdır Finalize .If a SafeHandle object is available that wraps your unmanaged resource, the recommended alternative is to implement the dispose pattern with a safe handle and not override Finalize. Daha fazla bilgi için SafeHandle alternatif bölümüne bakın.For more information, see The SafeHandle alternative section.

Object.FinalizeYöntemi varsayılan olarak hiçbir şey yapmaz, ancak Finalize yalnızca gerektiğinde ve yalnızca yönetilmeyen kaynakları serbest bırakmak için geçersiz kılmalısınız.The Object.Finalize method does nothing by default, but you should override Finalize only if necessary, and only to release unmanaged resources. Geri kazanma bellek, en az iki çöp koleksiyonu gerektirdiğinden bir sonlandırma işlemi çalışırsa çok daha uzun sürer.Reclaiming memory tends to take much longer if a finalization operation runs, because it requires at least two garbage collections. Ayrıca, Finalize yöntemi yalnızca başvuru türleri için geçersiz kılmanız gerekir.In addition, you should override the Finalize method for reference types only. Ortak dil çalışma zamanı yalnızca başvuru türlerini sonlandırır.The common language runtime only finalizes reference types. Değer türlerinde sonlandırıcıları yoksayar.It ignores finalizers on value types.

Object.FinalizeYöntemin kapsamı protected .The scope of the Object.Finalize method is protected. Yöntemi sınıfınızda geçersiz kılarken bu sınırlı kapsamı korumanız gerekir.You should maintain this limited scope when you override the method in your class. Bir Finalize yöntemi korumalı tutarak, uygulamanızın kullanıcılarının bir nesnenin Finalize yöntemini doğrudan aramasını engelleyebilirsiniz.By keeping a Finalize method protected, you prevent users of your application from calling an object's Finalize method directly.

FinalizeTüretilmiş bir tür içindeki her uygulama, temel türünün öğesinin uygulamasını çağırmalıdır Finalize .Every implementation of Finalize in a derived type must call its base type's implementation of Finalize. Bu, uygulama kodunun çağrı yapmasına izin verilen tek durumdur Finalize .This is the only case in which application code is allowed to call Finalize. Bir nesnenin Finalize yöntemi, temel sınıfının dışında herhangi bir nesne üzerinde bir yöntemi çağırmamalıdır.An object's Finalize method shouldn't call a method on any objects other than that of its base class. Bunun sebebi, ortak dil çalışma zamanı kapatması örneğinde olduğu gibi, çağrılan diğer nesnelerin aynı zamanda çağrı nesnesi olarak da toplanabilmesidir.This is because the other objects being called could be collected at the same time as the calling object, such as in the case of a common language runtime shutdown.

Not

C# derleyicisi yöntemi geçersiz kılmanıza izin vermez Finalize .The C# compiler does not allow you to override the Finalize method. Bunun yerine, sınıfınız için bir yıkıcı uygulayarak sonlandırıcıyı sağlarsınız.Instead, you provide a finalizer by implementing a destructor for your class. C# yıkıcısı, temel sınıfının yıkıcıyı otomatik olarak çağırır.A C# destructor automatically calls the destructor of its base class.

Visual C++, yöntemi uygulamak için kendi sözdizimini de sağlar Finalize .Visual C++ also provides its own syntax for implementing the Finalize method. Daha fazla bilgi için bkz. nasıl yapılır: sınıfları ve yapıları tanımlama ve kullanma (C++/CLI)konusunun "Yıkıcılar ve sonlandırıcılar" bölümü.For more information, see the "Destructors and finalizers" section of How to: Define and Consume Classes and Structs (C++/CLI).

Çöp toplama belirleyici olmadığından, çöp toplayıcı sonlandırma yaptığında tam olarak bilemezsiniz.Because garbage collection is non-deterministic, you do not know precisely when the garbage collector performs finalization. Kaynakları hemen serbest bırakmak için Dispose modelini ve arabirimini uygulamayı da seçebilirsiniz IDisposable .To release resources immediately, you can also choose to implement the dispose pattern and the IDisposable interface. IDisposable.DisposeUygulama, yönetilmeyen kaynakları serbest bırakmak için sınıfınızın tüketicileri tarafından çağrılabilir ve yöntemi, Finalize yöntemin çağrılmaması durumunda yönetilmeyen kaynakları serbest bırakmak için kullanabilirsiniz Dispose .The IDisposable.Dispose implementation can be called by consumers of your class to free unmanaged resources, and you can use the Finalize method to free unmanaged resources in the event that the Dispose method is not called.

Finalize çöp toplama sırasında temizlendikten sonra bir nesneyi (yani, nesneyi tekrar erişilebilir hale getirmek) dahil olmak üzere neredeyse her türlü eylemi gerçekleştirebilir.Finalize can take almost any action, including resurrecting an object (that is, making the object accessible again) after it has been cleaned up during garbage collection. Ancak, nesne yalnızca bir kez daha yeniden ayarlanabilir; Finalize çöp toplama sırasında Resurrected nesnelerinde çağrılamaz.However, the object can only be resurrected once; Finalize cannot be called on resurrected objects during garbage collection.

SafeHandle alternatifiThe SafeHandle alternative

Güvenli sonlandırıcılara, uygulamanızın durumu hakkında varsayımlar yapamamaları ve bu gibi işlenmemiş sistem özel durumları, OutOfMemoryException StackOverflowException sonlandırıcıyı sonlandırmanız nedeniyle genellikle zor olur.Creating reliable finalizers is often difficult, because you cannot make assumptions about the state of your application, and because unhandled system exceptions such as OutOfMemoryException and StackOverflowException terminate the finalizer. Yönetilmeyen kaynakları serbest bırakmak için sınıfınız için bir Sonlandırıcı uygulamak yerine, System.Runtime.InteropServices.SafeHandle yönetilmeyen kaynaklarınızı kaydırabilmeniz için sınıftan türetilmiş bir nesne kullanabilir ve sonra bir sonlandırıcı olmadan Dispose modelini uygulayabilirsiniz.Instead of implementing a finalizer for your class to release unmanaged resources, you can use an object that is derived from the System.Runtime.InteropServices.SafeHandle class to wrap your unmanaged resources, and then implement the dispose pattern without a finalizer. .NET Framework, şu sınıftan türetilmiş ad alanı içinde aşağıdaki sınıfları sağlar Microsoft.Win32 System.Runtime.InteropServices.SafeHandle :The .NET Framework provides the following classes in the Microsoft.Win32 namespace that are derived from System.Runtime.InteropServices.SafeHandle:

Aşağıdaki örnek, yöntemini geçersiz kılmak yerine güvenli tanıtıcılarla Dispose modelini kullanır Finalize .The following example uses the dispose pattern with safe handles instead of overriding the Finalize method. FileAssociationBelirli bir dosya uzantısına sahip dosyaları işleyen uygulamayla ilgili kayıt defteri bilgilerini sarmalayan bir sınıfı tanımlar.It defines a FileAssociation class that wraps registry information about the application that handles files with a particular file extension. outWindows RegOpenKeyEx işlev çağrıları tarafından parametre olarak döndürülen iki kayıt defteri tutamacı SafeRegistryHandle oluşturucuya geçirilir.The two registry handles returned as out parameters by Windows RegOpenKeyEx function calls are passed to the SafeRegistryHandle constructor. Türün Protected Dispose yöntemi daha sonra SafeRegistryHandle.Dispose Bu iki tutamacı serbest bırakmak için yöntemini çağırır.The type's protected Dispose method then calls the SafeRegistryHandle.Dispose method to free these two handles.

using Microsoft.Win32.SafeHandles;
using System;
using System.ComponentModel;
using System.IO;
using System.Runtime.InteropServices;

public class FileAssociationInfo : IDisposable
{
   // Private variables.
   private String ext;
   private String openCmd;
   private String args;
   private SafeRegistryHandle hExtHandle, hAppIdHandle;

   // Windows API calls.
   [DllImport("advapi32.dll", CharSet= CharSet.Auto, SetLastError=true)]
   private static extern int RegOpenKeyEx(IntPtr hKey,
                  String lpSubKey, int ulOptions, int samDesired,
                  out IntPtr phkResult);
   [DllImport("advapi32.dll", CharSet= CharSet.Unicode, EntryPoint = "RegQueryValueExW",
              SetLastError=true)]
   private static extern int RegQueryValueEx(IntPtr hKey,
                  string lpValueName, int lpReserved, out uint lpType,
                  string lpData, ref uint lpcbData);
   [DllImport("advapi32.dll", SetLastError = true)]
   private static extern int RegSetValueEx(IntPtr hKey, [MarshalAs(UnmanagedType.LPStr)] string lpValueName,
                  int Reserved, uint dwType, [MarshalAs(UnmanagedType.LPStr)] string lpData,
                  int cpData);
   [DllImport("advapi32.dll", SetLastError=true)]
   private static extern int RegCloseKey(UIntPtr hKey);

   // Windows API constants.
   private const int HKEY_CLASSES_ROOT = unchecked((int) 0x80000000);
   private const int ERROR_SUCCESS = 0;

    private const int KEY_QUERY_VALUE = 1;
    private const int KEY_SET_VALUE = 0x2;

   private const uint REG_SZ = 1;

   private const int MAX_PATH = 260;

   public FileAssociationInfo(String fileExtension)
   {
      int retVal = 0;
      uint lpType = 0;

      if (!fileExtension.StartsWith("."))
             fileExtension = "." + fileExtension;
      ext = fileExtension;

      IntPtr hExtension = IntPtr.Zero;
      // Get the file extension value.
      retVal = RegOpenKeyEx(new IntPtr(HKEY_CLASSES_ROOT), fileExtension, 0, KEY_QUERY_VALUE, out hExtension);
      if (retVal != ERROR_SUCCESS)
         throw new Win32Exception(retVal);
      // Instantiate the first SafeRegistryHandle.
      hExtHandle = new SafeRegistryHandle(hExtension, true);

      string appId = new string(' ', MAX_PATH);
      uint appIdLength = (uint) appId.Length;
      retVal = RegQueryValueEx(hExtHandle.DangerousGetHandle(), String.Empty, 0, out lpType, appId, ref appIdLength);
      if (retVal != ERROR_SUCCESS)
         throw new Win32Exception(retVal);
      // We no longer need the hExtension handle.
      hExtHandle.Dispose();

      // Determine the number of characters without the terminating null.
      appId = appId.Substring(0, (int) appIdLength / 2 - 1) + @"\shell\open\Command";

      // Open the application identifier key.
      string exeName = new string(' ', MAX_PATH);
      uint exeNameLength = (uint) exeName.Length;
      IntPtr hAppId;
      retVal = RegOpenKeyEx(new IntPtr(HKEY_CLASSES_ROOT), appId, 0, KEY_QUERY_VALUE | KEY_SET_VALUE,
                            out hAppId);
       if (retVal != ERROR_SUCCESS)
         throw new Win32Exception(retVal);

      // Instantiate the second SafeRegistryHandle.
      hAppIdHandle = new SafeRegistryHandle(hAppId, true);

      // Get the executable name for this file type.
      string exePath = new string(' ', MAX_PATH);
      uint exePathLength = (uint) exePath.Length;
      retVal = RegQueryValueEx(hAppIdHandle.DangerousGetHandle(), String.Empty, 0, out lpType, exePath, ref exePathLength);
      if (retVal != ERROR_SUCCESS)
         throw new Win32Exception(retVal);

      // Determine the number of characters without the terminating null.
      exePath = exePath.Substring(0, (int) exePathLength / 2 - 1);
      // Remove any environment strings.
      exePath = Environment.ExpandEnvironmentVariables(exePath);

      int position = exePath.IndexOf('%');
      if (position >= 0) {
         args = exePath.Substring(position);
         // Remove command line parameters ('%0', etc.).
         exePath = exePath.Substring(0, position).Trim();
      }
      openCmd = exePath;
   }

   public String Extension
   { get { return ext; } }

   public String Open
   { get { return openCmd; }
     set {
        if (hAppIdHandle.IsInvalid | hAppIdHandle.IsClosed)
           throw new InvalidOperationException("Cannot write to registry key.");
        if (! File.Exists(value)) {
           string message = String.Format("'{0}' does not exist", value);
           throw new FileNotFoundException(message);
        }
        string cmd = value + " %1";
        int retVal = RegSetValueEx(hAppIdHandle.DangerousGetHandle(), String.Empty, 0,
                                   REG_SZ, value, value.Length + 1);
        if (retVal != ERROR_SUCCESS)
           throw new Win32Exception(retVal);
     } }

   public void Dispose()
   {
      Dispose(true);
      GC.SuppressFinalize(this);
   }

   protected void Dispose(bool disposing)
   {
      // Ordinarily, we release unmanaged resources here;
      // but all are wrapped by safe handles.

      // Release disposable objects.
      if (disposing) {
         if (hExtHandle != null) hExtHandle.Dispose();
         if (hAppIdHandle != null) hAppIdHandle.Dispose();
      }
   }
}
Imports Microsoft.Win32.SafeHandles
Imports System.ComponentModel
Imports System.IO
Imports System.Runtime.InteropServices
Imports System.Text

Public Class FileAssociationInfo : Implements IDisposable
   ' Private variables.
   Private ext As String
   Private openCmd As String
   Private args As String
   Private hExtHandle, hAppIdHandle As SafeRegistryHandle

   ' Windows API calls.
   Private Declare Unicode Function RegOpenKeyEx Lib"advapi32.dll" _
                   Alias "RegOpenKeyExW" (hKey As IntPtr, lpSubKey As String, _
                   ulOptions As Integer, samDesired As Integer, _
                   ByRef phkResult As IntPtr) As Integer
   Private Declare Unicode Function RegQueryValueEx Lib "advapi32.dll" _
                   Alias "RegQueryValueExW" (hKey As IntPtr, _
                   lpValueName As String, lpReserved As Integer, _
                   ByRef lpType As UInteger, lpData As String, _
                   ByRef lpcbData As UInteger) As Integer   
   Private Declare Function RegSetValueEx Lib "advapi32.dll" _
                  (hKey As IntPtr, _
                  <MarshalAs(UnmanagedType.LPStr)> lpValueName As String, _
                  reserved As Integer, dwType As UInteger, _
                  <MarshalAs(UnmanagedType.LPStr)> lpData As String, _
                  cpData As Integer) As Integer 
   Private Declare Function RegCloseKey Lib "advapi32.dll" _
                  (hKey As IntPtr) As Integer

   ' Windows API constants.
   Private Const HKEY_CLASSES_ROOT As Integer = &h80000000
   Private Const ERROR_SUCCESS As Integer = 0

   Private Const KEY_QUERY_VALUE As Integer = 1
   Private Const KEY_SET_VALUE As Integer = &h2
   
   Private REG_SZ As UInteger = 1
   
   Private Const MAX_PATH As Integer  = 260
   
   Public Sub New(fileExtension As String)
      Dim retVal As Integer = 0
      Dim lpType As UInteger = 0
                  
      If Not fileExtension.StartsWith(".") Then 
         fileExtension = "." + fileExtension
      End If   
      ext = fileExtension
       
      Dim hExtension As IntPtr = IntPtr.Zero
      ' Get the file extension value.
      retVal = RegOpenKeyEx(New IntPtr(HKEY_CLASSES_ROOT), fileExtension, 0, 
                            KEY_QUERY_VALUE, hExtension)
      if retVal <> ERROR_SUCCESS Then 
         Throw New Win32Exception(retVal)
      End If  
      ' Instantiate the first SafeRegistryHandle.
      hExtHandle = New SafeRegistryHandle(hExtension, True)
      
      Dim appId As New String(" "c, MAX_PATH)
      Dim appIdLength As UInteger = CUInt(appId.Length)
      retVal = RegQueryValueEx(hExtHandle.DangerousGetHandle(), String.Empty, _
                               0, lpType, appId, appIdLength)
      if retVal <> ERROR_SUCCESS Then
         Throw New Win32Exception(retVal)
      End If   
      ' We no longer need the hExtension handle.
      hExtHandle.Dispose()

      ' Determine the number of characters without the terminating null.
      appId = appId.Substring(0, CInt(appIdLength) \ 2 - 1) + "\shell\open\Command"

      ' Open the application identifier key.
      Dim exeName As New string(" "c, MAX_PATH)
      Dim exeNameLength As UInteger = CUInt(exeName.Length)
      Dim hAppId As IntPtr
      retVal = RegOpenKeyEx(New IntPtr(HKEY_CLASSES_ROOT), appId, 0, 
                            KEY_QUERY_VALUE Or KEY_SET_VALUE, hAppId)
      If retVal <> ERROR_SUCCESS Then 
         Throw New Win32Exception(retVal)
      End If   

      ' Instantiate the second SafeRegistryHandle.
      hAppIdHandle = New SafeRegistryHandle(hAppId, True)

      ' Get the executable name for this file type.
      Dim exePath As New string(" "c, MAX_PATH)
      Dim exePathLength As UInteger = CUInt(exePath.Length)
      retVal = RegQueryValueEx(hAppIdHandle.DangerousGetHandle(), _
                               String.Empty, 0, lpType, exePath, exePathLength)
      If retVal <> ERROR_SUCCESS Then
         Throw New Win32Exception(retVal)
      End If     
      ' Determine the number of characters without the terminating null.
      exePath = exePath.Substring(0, CInt(exePathLength) \ 2 - 1)
  
      exePath = Environment.ExpandEnvironmentVariables(exePath)
      Dim position As Integer = exePath.IndexOf("%"c)
      If position >= 0 Then
         args = exePath.Substring(position)
         ' Remove command line parameters ('%0', etc.).
         exePath = exePath.Substring(0, position).Trim()
      End If   
      openCmd = exePath
   End Sub

   Public ReadOnly Property Extension As String
      Get
         Return ext
      End Get
   End Property
   
   Public Property Open As String
      Get
         Return openCmd
      End Get    
      Set 
        If hAppIdHandle.IsInvalid Or hAppIdHandle.IsClosed Then
           Throw New InvalidOperationException("Cannot write to registry key.")
        End If    
        If Not File.Exists(value) Then
           Dim message As String = String.Format("'{0}' does not exist", value)
           Throw New FileNotFoundException(message) 
        End If
        Dim cmd As String = value + " %1"
        Dim retVal As Integer = RegSetValueEx(hAppIdHandle.DangerousGetHandle(), String.Empty, 0, 
                                              REG_SZ, value, value.Length + 1)
        If retVal <> ERROR_SUCCESS Then 
           Throw New Win32Exception(retVal)
        End If                             
      End Set
   End Property   
   
   Public Sub Dispose() _
      Implements IDisposable.Dispose 
      Dispose(true)
      GC.SuppressFinalize(Me)
   End Sub   
   
   Protected Sub Dispose(disposing As Boolean)
      ' Ordinarily, we release unmanaged resources here 
      ' but all are wrapped by safe handles.
      
      ' Release disposable objects.
      If disposing Then
         If hExtHandle IsNot Nothing Then hExtHandle.Dispose()
         If hAppIdHandle IsNot Nothing Then hAppIdHandle.Dispose()
      End If
   End Sub
End Class

Şunlara uygulanır

Ayrıca bkz.