2016-09-26 118 views
-5

我有以下代碼以從現有文件創建另一個文件;生成的文件與原始文件相同。但是,我需要生成的文件database.test只有原始文件(database.1)的1024個字節。有人可以給我一些快速的解決方案來做到這一點是代碼。以下是我的代碼。將文件截斷爲字節大小

Imports System.IO 

Public Class Form1 
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click 
     Dim data() As Byte = File.ReadAllBytes("C:\PROGRAMS\DATABASE.1") 
     File.WriteAllBytes("c:\programs\database.test", data) 
    End Sub 
End Class 
+1

怎麼樣,而不是寫所有字節,你只寫他們的128?必須有一些方法來查看如何做到這一點...然後你會發現如何只讀128字節。 –

+0

如果截斷它,數據庫將不可用。除非它不是純文本文件。在這種情況下,我不會稱之爲「數據庫」。 –

回答

0

感謝您的建議: -

我終於得到它的工作是這樣的: -

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click 
     Dim data() As Byte = File.ReadAllBytes("C:\PROGRAMS\DATABASE.1") 
     'File.WriteAllBytes("c:\programs\database.test", data) 

     Using writer As BinaryWriter = New BinaryWriter(File.Open("c:\programs\database.test", FileMode.Create)) 

      Dim x As Single = data.Length - 1 

      Dim l As Single = 0 

      For l = 0 To 1023 

       writer.Write(data(l)) 

      Next 



     End Using 



    End Sub 
+1

這是寫1024 *字節* - 你的問題表明1024 *位*。 –

+0

抱歉,必須是字節! ! –