<topic> försöker jag lösa, någon som har en ide ?? Mmm, det tar en jäklarns tid. Bättre att lagra länk i tabellen och peka till en fysisk bild som ligger i en separat katalog.. jo har funderat på det, men det krånglar till en enkel lösning lite för mycket ... skall skapa konfigurationer som skall distribueras, måste jag börja distribuera en mappstruktur med bilder också blir det lite för mekkigt ... Har smällt ihop två funktioner som kan vara till hjälp. Du bör lämpligast bara använda dig av bitmap bilder för dessa funktioner. Iconer kan strula lite. Eftersom bara extraherad bild sparas och inte hela iconen:BLOB, IMAge control och Stand alone recordsets
Vill kunna ta en bild och spara ner den i ett stand alone recordsett...
tips länkar erfarenheter ?? Sv: BLOB, IMAge control och Stand alone recordsets
Sv: BLOB, IMAge control och Stand alone recordsets
Sv: BLOB, IMAge control och Stand alone recordsets
Public Sub PictureToField(Picture As StdPicture, Field As ADODB.Field)
Dim PropBag As PropertyBag
Set PropBag = New PropertyBag
PropBag.WriteProperty "Picture", Picture
Field.AppendChunk PropBag.Contents
End Sub
Public Function FieldToPicture(Field As ADODB.Field) As StdPicture
Dim PropBag As PropertyBag
Set PropBag = New PropertyBag
PropBag.Contents = Field.GetChunk(Field.ActualSize)
Set FieldToPicture = PropBag.ReadProperty("Picture", LoadPicture(""))
End Function