Afficher une image dynamique.
Résolu
cs_mocro
Messages postés
9
Date d'inscription
vendredi 6 juillet 2007
Statut
Membre
Dernière intervention
15 avril 2009
-
1 nov. 2008 à 16:04
cs_safsaf12 Messages postés 1 Date d'inscription mardi 17 février 2009 Statut Membre Dernière intervention 25 mars 2009 - 25 mars 2009 à 22:47
cs_safsaf12 Messages postés 1 Date d'inscription mardi 17 février 2009 Statut Membre Dernière intervention 25 mars 2009 - 25 mars 2009 à 22:47
3 réponses
Kevin.Ory
Messages postés
840
Date d'inscription
mercredi 22 octobre 2003
Statut
Membre
Dernière intervention
7 janvier 2009
11
2 nov. 2008 à 02:02
2 nov. 2008 à 02:02
Salut,
dim img as byte()
dim f as filestream
f=file.open("SourcePath",FileMode.open,fileaccess.read)
Redim img(CInt(f.length)-1)
f.close
1. Ce code ouvre un stream sur le fichier, mais tu ne le lis pas...
2. "SourcePath" ? C'est quoi ça? Il faut le chemin d'un fichier à la place.
Fais plutôt comme ceci:
Dim img As Byte() = IO.File.ReadAllBytes("C:\MonImage.jpg")
Et pour récupérer une image à partir du tableau de byte:
Dim stream As New IO.MemoryStream(img)
Dim image As New Bitmap(stream)
dim img as byte()
dim f as filestream
f=file.open("SourcePath",FileMode.open,fileaccess.read)
Redim img(CInt(f.length)-1)
f.close
1. Ce code ouvre un stream sur le fichier, mais tu ne le lis pas...
2. "SourcePath" ? C'est quoi ça? Il faut le chemin d'un fichier à la place.
Fais plutôt comme ceci:
Dim img As Byte() = IO.File.ReadAllBytes("C:\MonImage.jpg")
Et pour récupérer une image à partir du tableau de byte:
Dim stream As New IO.MemoryStream(img)
Dim image As New Bitmap(stream)
gillardg
Messages postés
3275
Date d'inscription
jeudi 3 avril 2008
Statut
Membre
Dernière intervention
14 septembre 2014
2
1 nov. 2008 à 16:33
1 nov. 2008 à 16:33
Bonjour,
crée ton champ picture dans ta base de donnée type longBinary
dans ta form colle une picturebox que tu lie a ton champ picture
utilise un openfiledialog pour mettre une image dans ton picturebox
enregistre les données et voila
pôur les rapport avec Christelle je ne sais pas
a+
crée ton champ picture dans ta base de donnée type longBinary
dans ta form colle une picturebox que tu lie a ton champ picture
utilise un openfiledialog pour mettre une image dans ton picturebox
enregistre les données et voila
pôur les rapport avec Christelle je ne sais pas
a+
cs_safsaf12
Messages postés
1
Date d'inscription
mardi 17 février 2009
Statut
Membre
Dernière intervention
25 mars 2009
25 mars 2009 à 22:47
25 mars 2009 à 22:47
salu
pour l'image voila le code qui marche pour ajoute une image ds base donnee
mycn.Open()
Dim
fs
As
FileStream
Dim
img()
As
Byte
fs = File.Open(image.Tex
t, FileMode.Open, FileAccess.Read)
ReDim img(fs.Length - 1)fs.Read(img, 0, fs.Lengt
h - 1)fs.Close()
Dim param
As
New SqlParameter(
"@images", SqlDbType.Image)param.Value = img
mycmd.Parameters.Add(par
am)mycmd.CommandText =
"insert into stagiere values ('" &
Me.TextBox1.Text &
"', @images )"mycmd.ExecuteNonQuery()
mycmd.Parameters.Clear()
MessageBox.Show(
"L'op‚ration d'ajout est r‚ussie")
et sa marche
aller bo chance
pour l'image voila le code qui marche pour ajoute une image ds base donnee
mycn.Open()
Dim
fs
As
FileStream
Dim
img()
As
Byte
fs = File.Open(image.Tex
t, FileMode.Open, FileAccess.Read)
ReDim img(fs.Length - 1)fs.Read(img, 0, fs.Lengt
h - 1)fs.Close()
Dim param
As
New SqlParameter(
"@images", SqlDbType.Image)param.Value = img
mycmd.Parameters.Add(par
am)mycmd.CommandText =
"insert into stagiere values ('" &
Me.TextBox1.Text &
"', @images )"mycmd.ExecuteNonQuery()
mycmd.Parameters.Clear()
MessageBox.Show(
"L'op‚ration d'ajout est r‚ussie")
et sa marche
aller bo chance
