ASP.NET Tutorial/File Directory/FileStream

Материал из .Net Framework эксперт
Версия от 11:57, 26 мая 2010; Admin (обсуждение | вклад) (1 версия)
(разн.) ← Предыдущая | Текущая версия (разн.) | Следующая → (разн.)
Перейти к: навигация, поиск

Use FileStream to read file (VB.net)

<%@ Import Namespace="System.IO" %>
<script language="VB" runat="server">
   sub Page_Load(Sender as Object, e as EventArgs)
      dim fs as new FileStream(Server.MapPath("Default.aspx"), FileMode.Open, FileAccess.Read)
      dim objReader as new StreamReader(fs)
      
      while objReader.Peek() > -1
         Response.Write(Server.HTMLEncode _
            (objReader.ReadLine) & "<br>")
      end while
      objReader.Close
      fs.close
      
   end sub
</script>
<html><body>
</body></html>


Using a FileStream to read a system file (C#)

<%@ Page Language="C#" %>
<%@ Import Namespace="System.IO" %>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<script runat="server">
    protected void Page_Load(object sender, EventArgs e)
    {
        FileStream fs = new FileStream(Server.MapPath("Data.txt"), FileMode.Open);
        byte[] data = new byte[fs.Length];
        fs.Read(data, 0, (int)fs.Length);
        fs.Close();
    }
</script>
<html xmlns="http://www.w3.org/1999/xhtml" >
<head runat="server">
    <title>Untitled Page</title>
</head>
<body>
    <form id="form1" runat="server">
    <div>
    
    </div>
    </form>
</body>
</html>


Using a FileStream to read a system file (VB)

<%@ Page Language="VB" %>
<%@ Import Namespace="System.IO" %>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<script runat="server">
    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs)
        Dim fs As New FileStream(Server.MapPath("Data.txt"), FileMode.Open)
        Dim data(fs.Length) As Byte
        fs.Read(data, 0, fs.Length)
        fs.Close()
    End Sub
</script>
<html xmlns="http://www.w3.org/1999/xhtml" >
<head runat="server">
    <title>Untitled Page</title>
</head>
<body>
    <form id="form1" runat="server">
    <div>
    
    </div>
    </form>
</body>
</html>


Using I/O enumerations to control file behavior when writing a file (C#)

<%@ Page Language="C#" %>
<%@ Import Namespace="System.IO" %>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<script runat="server">
    protected void Page_Load(object sender, EventArgs e)
    {
        FileStream fs = new FileStream(Server.MapPath("Data.txt"), FileMode.Append,
                FileAccess.Write, FileShare.Read, 0, FileOptions.Asynchronous);
        byte[] data = System.Text.Encoding.ASCII.GetBytes("This is an additional string");
        fs.Write(data, 0, (int)data.Length);
        fs.Flush();
        fs.Close();
    }
</script>
<html xmlns="http://www.w3.org/1999/xhtml" >
<head runat="server">
    <title>Untitled Page</title>
</head>
<body>
    <form id="form1" runat="server">
    <div>
    
    </div>
    </form>
</body>
</html>


Using I/O enumerations to control file behavior when writing a file (VB)

<%@ Page Language="VB" %>
<%@ Import Namespace="System.IO" %>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<script runat="server">
    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs)
        Dim fs As New FileStream(Server.MapPath("Data.txt"), FileMode.Append, _
                FileAccess.Write, FileShare.Read, FileOptions.Asynchronous)
        Dim data() As Byte = System.Text.Encoding.ASCII.GetBytes("This is an additional string")
        fs.Write(data, 0, data.Length)
        fs.Flush()
        fs.Close()
    End Sub
</script>
<html xmlns="http://www.w3.org/1999/xhtml" >
<head runat="server">
    <title>Untitled Page</title>
</head>
<body>
    <form id="form1" runat="server">
    <div>
    
    </div>
    </form>
</body>
</html>