VirtualFile(String) Konstruktor

Definicja

Przestrzeń nazw:

System.Web.Hosting

Zestaw:

System.Web.dll

Inicjuje nowe wystąpienie klasy VirtualFile.

protected:
 VirtualFile(System::String ^ virtualPath);

protected VirtualFile (string virtualPath);

new System.Web.Hosting.VirtualFile : string -> System.Web.Hosting.VirtualFile

Protected Sub New (virtualPath As String)

Parametry

virtualPath

String

Ścieżka wirtualna do zasobu reprezentowanego przez to wystąpienie.

Przykłady

Poniższy przykład kodu to implementacja VirtualFile konstruktora, który pobiera informacje o pliku wirtualnym DataSet z obiektu dostarczonego przez obiekt niestandardowy VirtualPathProvider . Pełny kod wymagany do uruchomienia przykładu można znaleźć w sekcji Przykład w przeglądzie VirtualFile klasy.

public SampleVirtualFile(string virtualPath, SamplePathProvider provider)
  : base(virtualPath)
{
  this.spp = provider;
  GetData();
}

protected void GetData()
{
  // Get the data from the SamplePathProvider
  DataSet ds = spp.GetVirtualData();

  // Get the virtual file from the resource table.
  DataTable files = ds.Tables["resource"];
  DataRow[] rows = files.Select(
    String.Format("(name = '{0}') AND (type='file')", this.Name));

  // If the select returned a row, store the file contents.
  if (rows.Length > 0)
  {
    DataRow row = rows[0];

    content = row["content"].ToString();
  }
}

Public Sub New(ByVal virtualPath As String, ByVal provider As SamplePathProvider)
  MyBase.New(virtualPath)
  spp = provider
  GetData()
End Sub

Protected Sub GetData()
  ' Get the data from the SamplePathProvider.
  Dim spp As SamplePathProvider
  spp = CType(HostingEnvironment.VirtualPathProvider, SamplePathProvider)

  Dim ds As DataSet
  ds = spp.GetVirtualData

  ' Get the virtual file data from the resource table.
  Dim files As DataTable
  files = ds.Tables("resource")

  Dim rows As DataRow()
  rows = files.Select( _
    String.Format("(name='{0}') AND (type='file')", Me.Name))

  ' If the select returned a row, store the file contents.
  If (rows.Length > 0) Then
    Dim row As DataRow
    row = rows(0)

    content = row("content").ToString()
  End If
End Sub