PDA

View Full Version : آموزش نحوه ذخیره عکس در بانک sql برای کسانی که مشکل دارند(VB.NET & C#)



alicomputer
یک شنبه 15 اسفند 1389, 14:09 عصر
In this article you will learn how to insert an image from database SQL Server
Inserting an image in database
Creating a table in SQL Server.
Table name student and database name master.
use master

go

create table student

(

name varchar(20),

rollno int,

photo image

);

go

select * from student;

go


Now come to the front end window forms application in VB.NET.
Taking two level, two textbox and three button and one picture box and opendialog control on the form
Table has created in SQL Server..





Now double click on the button named browse and add the following code in c#.
private void button1_Click(object sender, EventArgs e)

{

openFileDialog1.Filter = "Image Files|*.gif;*.jpg;*.png;*.bmp";

openFileDialog1.ShowDialog();

pictureBox1.Image = Image.FromFile(openFileDialog1.FileName);

}


code in visual Basic.
private void button1_Click(object sender, EventArgs e)

{

openFileDialog1.Filter = "Image Files|*.gif;*.jpg;*.png;*.bmp";

openFileDialog1.ShowDialog();

pictureBox1.Image = Image.FromFile(openFileDialog1.FileName);

}





Now double click on the button save and add the following c# code.
private void button2_Click(object sender, EventArgs e)

{

string str = "Data Source=.;uid=sa;pwd=wintellect;database=master";

SqlConnection con = new SqlConnection(str);

con.Open();

string sql = "INSERT INTO student VALUES(@rollno,@name,@photo)";

SqlCommand cmd = new SqlCommand(sql, con);

cmd.Parameters.AddWithValue("@rollno", textBox1.Text);

cmd.Parameters.AddWithValue("@name", textBox2.Text);



MemoryStream ms = new MemoryStream();

pictureBox1.Image.Save(ms, pictureBox1.Image.RawFormat);

byte[] data = ms.GetBuffer();

SqlParameter p = new SqlParameter("@photo", SqlDbType.Image);

p.Value = data;

cmd.Parameters.Add(p);

cmd.ExecuteNonQuery();

MessageBox.Show("record has been saved","Save", MessageBoxButtons .OK);

con.Close();



}








code in visual Basic.
Private Sub button2_Click(ByVal sender As Object, ByVal e As EventArgs) Dim str As String = "Data Source=.;uid=sa;pwd=wintellect;database=master"

Dim con As New SqlConnection(str)

con.Open()

Dim sql As String = "INSERT INTO student VALUES(@rollno,@name,@photo)"

Dim cmd As New SqlCommand(sql, con)

cmd.Parameters.AddWithValue("@rollno", textBox1.Text)

cmd.Parameters.AddWithValue("@name", textBox2.Text)

Dim ms As New MemoryStream()

pictureBox1.Image.Save(ms, pictureBox1.Image.RawFormat)

Dim data As Byte() = ms.GetBuffer()

Dim p As New SqlParameter("@photo", SqlDbType.Image)

p.Value = data

cmd.Parameters.Add(p)

cmd.ExecuteNonQuery()

MessageBox.Show("record has been saved", "Save", MessageBoxButtons.OK)

con.Close()

End Sub



این هم لینک سایت اصلی کلیک کنید


این هم لینک سایت اصلی کلیک (http://www.vbdotnetheaven.com/UploadFile/rohatash/3876/)کنید

omid-vbAuto
یک شنبه 15 اسفند 1389, 14:20 عصر
In this article you will learn how to insert an image from database SQL Server
Inserting an image in database
Creating a table in SQL Server.
Table name student and database name master.

use master
go
create table student
(
name varchar(20),
rollno int,
photo image
);
go
select * from student;
go

Now come to the front end window forms application in VB.NET.
Taking two level, two textbox and three button and one picture box and opendialog control on the form
Table has created in SQL Server..





Now double click on the button named browse and add the following code in c#.
private void button1_Click(object sender, EventArgs e)
{
openFileDialog1.Filter = "Image Files|*.gif;*.jpg;*.png;*.bmp";
openFileDialog1.ShowDialog();
pictureBox1.Image = Image.FromFile(openFileDialog1.FileName);
}

code in visual Basic.
private void button1_Click(object sender, EventArgs e)
{
openFileDialog1.Filter = "Image Files|*.gif;*.jpg;*.png;*.bmp";
openFileDialog1.ShowDialog();
pictureBox1.Image = Image.FromFile(openFileDialog1.FileName);
}




Now double click on the button save and add the following c# code.
private void button2_Click(object sender, EventArgs e)
{
string str = "Data Source=.;uid=sa;pwd=wintellect;database=master";
SqlConnection con = new SqlConnection(str);
con.Open();
string sql = "INSERT INTO student VALUES(@rollno,@name,@photo)";
SqlCommand cmd = new SqlCommand(sql, con);
cmd.Parameters.AddWithValue("@rollno", textBox1.Text);
cmd.Parameters.AddWithValue("@name", textBox2.Text);

MemoryStream ms = new MemoryStream();
pictureBox1.Image.Save(ms, pictureBox1.Image.RawFormat);
byte[] data = ms.GetBuffer();
SqlParameter p = new SqlParameter("@photo", SqlDbType.Image);
p.Value = data;
cmd.Parameters.Add(p);
cmd.ExecuteNonQuery();
MessageBox.Show("record has been saved","Save", MessageBoxButtons .OK);
con.Close();

}





code in visual Basic.
Private Sub button2_Click(ByVal sender As Object, ByVal e As EventArgs) Dim str As String = "Data Source=.;uid=sa;pwd=wintellect;database=master"
Dim con As New SqlConnection(str)
con.Open()
Dim sql As String = "INSERT INTO student VALUES(@rollno,@name,@photo)"
Dim cmd As New SqlCommand(sql, con)
cmd.Parameters.AddWithValue("@rollno", textBox1.Text)
cmd.Parameters.AddWithValue("@name", textBox2.Text)
Dim ms As New MemoryStream()
pictureBox1.Image.Save(ms, pictureBox1.Image.RawFormat)
Dim data As Byte() = ms.GetBuffer()
Dim p As New SqlParameter("@photo", SqlDbType.Image)
p.Value = data
cmd.Parameters.Add(p)
cmd.ExecuteNonQuery()
MessageBox.Show("record has been saved", "Save", MessageBoxButtons.OK)
con.Close()
End Sub


این هم لینک سایت اصلی کلیک (http://www.vbdotnetheaven.com/UploadFile/rohatash/3876/)کنید




دوست عزیز کدهای بالا تون رو نمیشه خوند.(اینها چیه!!! لطفا درستش کنید)

nice_boy_a
یک شنبه 15 اسفند 1389, 20:20 عصر
خیلی بدخط نوشتی:لبخند:

omid-vbAuto
یک شنبه 15 اسفند 1389, 22:03 عصر
خیلی بدخط نوشتی:لبخند:

خیلی شیرینی ها .با نمک.این حرف ها رو از کی یاد میگری؟احتمالا موز زیاد می خوری ها.

منظور من این بود که کدهای دوستمون قاطی شدن و سایر دوستان نمی تونند استفاده کنند.این مورد هم بر میگره به نویسنده پست که باید اصلاح کند.

shotor moo ferferi
سه شنبه 17 اسفند 1389, 16:11 عصر
من که اصلا کد ها رو نمی بینم. واسه من این جوری نشون میده واسه شما چطور؟
<font face="Calibri"><i> <font face="Verdana"> <font color="blue">Dim</font> p <font color="blue">As</font> <font color="blue">New</font> SqlParameter(<font color="#a31515">"@photo"</font>, <font color="#2b91af">SqlDbType</font>.Image)</font></i></font>
<font face="Calibri"><i> <font face="Verdana"> p.Value = data</font></i></font>
<font face="Calibri"><i> <font face="Verdana"> cmd.Parameters.Add(p)</font></i></font>

alicomputer
سه شنبه 17 اسفند 1389, 16:11 عصر
به نظر من بهتره به سایت اصلی آموزش برید

asif1358
چهارشنبه 18 اسفند 1389, 03:37 صبح
در آدرس زیر یک مقاله جمع و جور در این مورد می خوانید:

http://www.fekrenaw.com/TopicDetails.aspx?tid=21