аааааааааааааааааа....

2 отговора 283 прегледа
#1

аааааааааааааааааа....

някой може ли да ми помогне с примерен код на ASP как да записвам и чета картина от SQL база данни? в конкретния случай не мога да записвам само пътя до файла в базата а трябва да се позва Image типа данни който май няма човек дето да го разбира напълно

мерси на всички!

Отговор
в отговор на ттт #2

Re: аааааааааааааааааа....

Пример как става това с VB има на [линк]
Понеже примера е малко дълъг, ще сложа поорязания код на двете функции тук:


Public Function LoadPictureFromDB(RS As ADODB.Recordset)
Set strStream = New ADODB.Stream
strStream.Type = adTypeBinary
strStream.Open
strStream.Write RS.Fields("**YourImageField**").Value
strStream.SaveToFile "C:\Temp.bmp", adSaveCreateOverWrite
Image1.Picture = LoadPicture("C:\Temp.bmp")
Kill ("C:\Temp.bmp")
End Function

Public Function SavePictureToDB(RS As ADODB.Recordset, sFileName As String)
Dim oPict As StdPicture
Set oPict = LoadPicture(sFileName)
'Exit Function if this is NOT a picture file
If oPict Is Nothing Then
MsgBox "Invalid Picture File!", vbOKOnly, "Oops!"
SavePictureToDB = False
GoTo procExitSub
End If
RS.AddNew
Set strStream = New ADODB.Stream
strStream.Type = adTypeBinary
strStream.Open
strStream.LoadFromFile sFileName
RS.Fields("***YourImageField***").Value = strStream.Read
Image1.Picture = LoadPicture(sFileName)
End Function



чети и дишай по-леко
Отговор
в отговор на Pechenia #3

Re: аааааааааааааааааа....

благодаря другарю печен!



Отговор