.net 图片的二进制数据库存储和显示

来源：互联网发布：飞利浦电视软件升级编辑：程序博客网时间：2024/05/01 21:14

.net 图片的二进制数据库存储和显示

与图片的二进制数据库存储和显示

1.将图片以二进制存入数据库

2.读取二进制图片在页面显示

3.设置Image控件显示从数据库中读出的二进制图片

4.GridView中ImageField以URL方式显示图片

5.GridView显示读出的二进制图片

====================

用到的知识点：

FileSteam fs=new FileSteam(fileName,FileMode.Open,FileAccess.Read);

BinaryReader binaryReader=new BinaryReader(fs);

byte[] myByte=new byte[fs.length];

binaryReader.Read(myByte,0,Convet.ToInt32(fs.Length));

fs.close()

FileInfo fl=new FileInfo(fileName);

string imgName=fl.name;

Memorystream ms=new MemoryStream();

byte[] imgByte=(byte[])rd.GetValue(0);

Stream imgStream=new MemoryStream(imgByte);

pb.Image=Image.FromStream(imgStream);

DataView dv=(DataView)cmb.SelectedItem;

string imgId=dv.Row["id"].ToString();

============================

1.将图片以二进制存入数据库

--------------------------

//保存图片到数据库

protected void Button1_Click(object sender, EventArgs e)

{

//图片路径

string strPath = "~/photo/03.JPG";

string strPhotoPath = Server.MapPath(strPath);

//读取图片

FileStream fs = new System.IO.FileStream(strPhotoPath, FileMode.Open, FileAccess.Read);

BinaryReader br = new BinaryReader(fs);

byte[] photo = br.ReadBytes((int)fs.Length);

br.Close();

fs.Close();

//存入

SqlConnection myConn = new SqlConnection("Data Source=127.0.0.1;Initial Catalog=TestDB;User ID=sa;Password=sa");

string strComm = " INSERT INTO personPhoto(personName, personPhotoPath, personPhoto) ";

strComm += " VALUES('wangwu', '" + strPath + "', @photoBinary )";

SqlCommand myComm = new SqlCommand(strComm, myConn);

myComm.Parameters.Add("@photoBinary", SqlDbType.Binary,photo.Length);

myComm.Parameters["@photoBinary"].Value = photo;

myConn.Open();

myComm.ExecuteNonQuery();

myConn.Close();

}

VB.NET

'保存图片到数据库

Protected Sub Button1_Click(ByVal sender As Object, ByVal e As EventArgs)

'图片路径

Dim strPath As String = "~/photo/03.JPG"

Dim strPhotoPath As String = Server.MapPath(strPath)

'读取图片

Dim fs As FileStream = New System.IO.FileStream(strPhotoPath, FileMode.Open, FileAccess.Read)

Dim br As BinaryReader = New BinaryReader(fs)

Dim photo() As Byte = br.ReadBytes(CType(fs.Length,Integer))

br.Close

fs.Close

'存入

Dim myConn As SqlConnection = New SqlConnection("Data Source=127.0.0.1;Initial Catalog=TestDB;User ID=sa;Password=sa")

Dim strComm As String = " INSERT INTO personPhoto(personName, personPhotoPath, personPhoto) "

strComm = (strComm + (" VALUES('wangwu', '" _

+ (strPath + "', @photoBinary )")))

Dim myComm As SqlCommand = New SqlCommand(strComm, myConn)

myComm.Parameters.Add("@photoBinary", SqlDbType.Binary, photo.Length)

myComm.Parameters("@photoBinary").Value = photo

myConn.Open

myComm.ExecuteNonQuery

myConn.Close

End Sub

2.读取二进制图片在页面显示

--------------------------

//读取图片

SqlConnection myConn = new SqlConnection("Data Source=127.0.0.1;Initial Catalog=TestDB;User ID=sa;Password=sa");

string strComm = " SELECT personPhoto FROM personPhoto WHERE personName='wangwu' ";

SqlCommand myComm = new SqlCommand(strComm, myConn);

myConn.Open();

SqlDataReader dr = myComm.ExecuteReader();

while (dr.Read())

{

byte[] photo = (byte[])dr["personPhoto"];

this.Response.BinaryWrite(photo);

}

dr.Close();

myConn.Close();

或

SqlConnection myConn = new SqlConnection("Data Source=127.0.0.1;Initial Catalog=TestDB;User ID=sa;Password=sa");

SqlDataAdapter myda = new SqlDataAdapter(" SELECT personPhoto FROM personPhoto WHERE personName='wangwu' ", myConn);

DataSet myds = new DataSet();

myConn.Open();

myda.Fill(myds);

myConn.Close();

byte[] photo = (byte[])myds.Tables[0].Rows[0]["personPhoto"];

this.Response.BinaryWrite(photo);

VB.NET

Dim myConn As SqlConnection = New SqlConnection("Data Source=127.0.0.1;Initial Catalog=TestDB;User ID=sa;Password=sa")

Dim strComm As String = " SELECT personPhoto FROM personPhoto WHERE personName='wangwu' "

Dim myComm As SqlCommand = New SqlCommand(strComm, myConn)

myConn.Open

Dim dr As SqlDataReader = myComm.ExecuteReader

While dr.Read

Dim photo() As Byte = CType(dr("personPhoto"),Byte())

Me.Response.BinaryWrite(photo)

End While

dr.Close

myConn.Close

或

Dim myConn As SqlConnection = New SqlConnection("Data Source=127.0.0.1;Initial Catalog=TestDB;User ID=sa;Password=sa")

Dim myda As SqlDataAdapter = New SqlDataAdapter(" SELECT personPhoto FROM personPhoto WHERE personName='wangwu' ", myConn)

Dim myds As DataSet = New DataSet

myConn.Open

myda.Fill(myds)

myConn.Close

Dim photo() As Byte = CType(myds.Tables(0).Rows(0)("personPhoto"),Byte())

Me.Response.BinaryWrite(photo)

3.设置Image控件显示从数据库中读出的二进制图片

---------------------------------------------

SqlConnection myConn = new SqlConnection("Data Source=192.168.0.36;Initial Catalog=TestDB;User ID=sa;Password=sa");

SqlDataAdapter myda = new SqlDataAdapter(" SELECT personPhoto FROM personPhoto WHERE personName='wangwu' ", myConn);

DataSet myds = new DataSet();

myConn.Open();

myda.Fill(myds);

myConn.Close();

byte[] photo = (byte[])myds.Tables[0].Rows[0]["personPhoto"];

//图片路径

string strPath = "~/photo/wangwu.JPG";

string strPhotoPath = Server.MapPath(strPath);

//保存图片文件

BinaryWriter bw = new BinaryWriter(File.Open(strPhotoPath,FileMode.OpenOrCreate));

bw.Write(photo);

bw.Close();

//显示图片

this.Image1.ImageUrl = strPath;

VB.NET

Dim myConn As SqlConnection = New SqlConnection("Data Source=192.168.0.36;Initial Catalog=TestDB;User ID=sa;Password=sa")

Dim myda As SqlDataAdapter = New SqlDataAdapter(" SELECT personPhoto FROM personPhoto WHERE personName='wangwu' ", myConn)

Dim myds As DataSet = New DataSet

myConn.Open

myda.Fill(myds)

myConn.Close

Dim photo() As Byte = CType(myds.Tables(0).Rows(0)("personPhoto"),Byte())

Dim strPath As String = "~/photo/wangwu.JPG"

Dim strPhotoPath As String = Server.MapPath(strPath)

Dim bw As BinaryWriter = New BinaryWriter(File.Open(strPhotoPath, FileMode.OpenOrCreate))

bw.Write(photo)

bw.Close

'显示图片

Me.Image1.ImageUrl = strPath

4.GridView中ImageField以URL方式显示图片

----------------------------

<asp:GridView ID="GridView1" runat="server" AutoGenerateColumns="False">

<asp:BoundField DataField="personName" HeaderText="姓名" />

<asp:ImageField DataImageUrlField="personPhotoPath"

HeaderText="图片">

</asp:ImageField>

</Columns>

</asp:GridView>

后台直接绑定即可

5.GridView显示读出的二进制图片

------------------------------

//样板列

<asp:GridView ID="GridView1" runat="server" AutoGenerateColumns="False" OnRowDataBound="GridView1_RowDataBound">

<asp:BoundField DataField="personName" HeaderText="姓名" />

<asp:ImageField DataImageUrlField="personPhotoPath"

HeaderText="图片">

</asp:ImageField>

<asp:TemplateField HeaderText="图片">

<asp:Image ID="Image1" runat="server" />

</ItemTemplate>

</asp:TemplateField>

</Columns>

</asp:GridView>

//绑定

protected void GridView1_RowDataBound(object sender, GridViewRowEventArgs e)

{

if (e.Row.RowIndex < 0)

return;

// System.ComponentModel.Container

string strPersonName = (string)DataBinder.Eval(e.Row.DataItem, "personName");

Image tmp_Image = (Image)e.Row.Cells[2].FindControl("Image1");

if (!System.Convert.IsDBNull(DataBinder.Eval(e.Row.DataItem, "personPhoto")))

{

byte[] photo = (byte[])DataBinder.Eval(e.Row.DataItem, "personPhoto");

//图片路径

string strPath = "~/photo/" + strPersonName.Trim() + ".JPG";

string strPhotoPath = Server.MapPath(strPath);

//保存图片文件

BinaryWriter bw = new BinaryWriter(File.Open(strPhotoPath, FileMode.OpenOrCreate));

bw.Write(photo);

bw.Close();

//显示图片

tmp_Image.ImageUrl = strPath;

}

VB.NET

Protected Sub GridView1_RowDataBound(ByVal sender As Object, ByVal e As GridViewRowEventArgs)

If (e.Row.RowIndex < 0) Then

Return

End If

' System.ComponentModel.Container

Dim strPersonName As String = CType(DataBinder.Eval(e.Row.DataItem, "personName"),String)

Dim tmp_Image As Image = CType(e.Row.Cells(2).FindControl("Image1"),Image)

If Not System.Convert.IsDBNull(DataBinder.Eval(e.Row.DataItem, "personPhoto")) Then

Dim photo() As Byte = CType(DataBinder.Eval(e.Row.DataItem, "personPhoto"),Byte())

Dim strPath As String = ("~/photo/" _

+ (strPersonName.Trim + ".JPG"))

Dim strPhotoPath As String = Server.MapPath(strPath)

'XG

Dim bw As BinaryWriter = New BinaryWriter(File.Open(strPhotoPath, FileMode.OpenOrCreate))

bw.Write(photo)

bw.Close

'>:G

tmp_Image.ImageUrl = strPath

End If

End Sub