mon literal crée la premiere image correctement et toutes les autres sont entassées koike je lui change le TOP de l image comme vous verrez ds ma fonction
Public Function images_promo(ByVal marque As String) Dim conn_pass As New SqlClient.SqlConnection("workstation id=TANIOS;packet size=4096;integrated security=SSPI;data source=TANIOS;persist security info=False;initial catalog=stock") Dim command As New SqlClient.SqlCommand("select * from promotion where marque ='" & marque & "'", conn_pass) conn_pass.Open()
Dim var_reader As SqlClient.SqlDataReader var_reader = command.ExecuteReader
Dim nbr_img As Integer Dim var_top As Integer Dim nom_image, lechemin As String Dim mybyte As Byte() var_top = 358
While (var_reader.Read()) nbr_img = nbr_img + 1
mybyte =
CType(var_reader.GetValue(2), Byte()) Dim mybitmap As New Bitmap(New System.IO.MemoryStream(mybyte)) lechemin = Server.MapPath("\imagesproduits")
mybitmap.Save(lechemin, Imaging.ImageFormat.Jpeg)
Probleme:
litimage.Text &= "<img src=""" & lechemin & """ alt=""" & nbr_img & """ id=""" & nbr_img & """ height=""200"" Width=""200"" style="" Z-INDEX: 102; LEFT: 100px; POSITION: absolute; TOP: " & var_top & " ""/>"
nbr_img = nbr_img + 1
var_top = 358 + 215
End While End Function 
mieux on dira mieux on saura