April 2006 - Posts

Upload File to Database SQL Server 97/2000
Wednesday, April 26, 2006 2:41 AM
Ini bisa di sebut dengan BLOB / Binary Large Object.  Jadi pastilah document ataupun image yang kita punyai akan di konvert ke binary dulu setelah itu simpan ke data base kita dengan type binary juga.

Contoh bisa di lihat di MSDN cari dengan keyword BLOB, di sini juga saya berikan contoh nya :


Imports System
Imports System.Data
Imports System.Data.SqlClient
Imports System.IO

Public Class TestBLOB

  Public Shared Sub Main()
    AddBLOBtoDatabase()
  End Sub
  Public Shared Sub AddBLOBtoDatabase()
    Dim byFile() as Byte = GetPhoto(“C:\test.txt“)
 

SqlConnection conn = new SqlConnection("Data Source=localhost;Integrated Security=SSPI;Initial Catalog=TESTDATABASE;");

SqlCommand cmd = new SqlCommand("INSERT INTO DOCS ([Document]) " +
"Values(@File)", Conn);

cmd .Parameters.Add(“@File", SqlDbType.Image, photo.Length).Value = byFile;

conn.Open(); // Open Connection

cmd.ExecuteNonQuery(); //Execute Query

conn.Close(); //Close Connection

  End Sub
  Public Shared Function GetFile(sFilePath as string) as byte()
    Dim fs As FileStream = new FileStream(sFilePath, FileMode.Open, FileAccess.Read) //read File
Dim br As BinaryReader = new BinaryReader(fs)

Dim byFile() As Byte = br.ReadBytes(fs.Length)

br.Close()
fs.Close()

Return byFile
  End Function
 
End Class
Share this post: | | | |
by agusto | with no comments