ماهو الأمر البرمجي أو طريقة تحويل الحقل Image في داتا بيس إلى حقل يخزن فديو ذو أمتداد Mpeg

اتمنى ان الكود ينفعك هذا الكود حق وضع الصورة وهو من مشروع فى شغلى

 Dim imagelength As IntegerDim imagetype As StringDim imagestream As StreamDim con As New SqlConnection("Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=Northwind;Data Source=.")imagelength = MyImage.PostedFile.ContentLengthimagetype = MyImage.PostedFile.ContentTypeimagestream = MyImage.PostedFile.InputStreamDim mycontent(imagelength) As ByteDim aa As Integer = imagestream.Read(mycontent, 0, imagelength)  Dim com As New SqlCommand("insert into test(photo,type) values (@a,@p)", con)Dim p1 As New SqlParameter("@a", SqlDbType.Image)p1.Value = mycontentcom.Parameters.Add(p1) Dim p2 As New SqlParameter("@p", SqlDbType.VarChar)p2.Value = imagetypecom.Parameters.Add(p2)con.Open()com.ExecuteNonQuery()Label1.Text = "the image inserted successfully"   con.Close()

أعطاه الى صديق جاهز ما فعلته بنفسىة وشغال ما تقلقى اتمنى انه يشتغل معكىالسلام عليكمما بعرف كل ماضعه يروح واخد تلقائى اشياء من ال htmlهذا من المنتدى يا ريت تتخلصى منن اى شىء اتش تى ام ال فى الكودالسلام عليكم

what is this that you have written???????

 
Dim imagelength As Integer
Dim imagetype As String
Dim imagestream As Stream
Dim con As New SqlConnection("Integrated Security=SSPI;Persist SecurityInfo=False;Initial Catalog=Northwind;Data Source=.")imagelength =MyImage.PostedFile.ContentLengthimagetype =MyImage.PostedFile.ContentTypeimagestream = MyImage.PostedFile.InputStream
Dim mycontent(imagelength) As Byte
Dim aa As Integer = imagestream.Read(mycontent, 0, imagelength)   
Dim com As New SqlCommand("insert into test(photo,type) values (@a,@p)", con)
Dim p1 As New SqlParameter("@a", SqlDbType.Image)p1.Value = mycontentcom.Parameters.Add(p1) 
Dim p2 As New SqlParameter("@p", SqlDbType.VarChar)p2.Value = imagetypecom.Parameters.Add(p2)con.Open()com.ExecuteNonQuery()Label1.Text ="the image inserted successfully"   con.Close()

الكود كدة ولكن الاتش تى ام ال كان من المنتدى ما بعرف ليش ما كان بيتظبط

السلام عليكم

ألف ألف ألف شكررر

أستاذ أحمد

وربنا يخليك ويكرممم ياررررررررررررررررررررررب