Vraag : Bitmaps van de Objecten van de Toegang OLE van de besparing aan BMP dossiers

Hello:
I heeft een lijst die van de Toegang een geroepen „Beeld“ van Objecten bevatten OLE gebied, en elk verslag bevat een klein bitmap beeld.  Ik heb probleem vindend het bevel VB om deze naar een reeks BMP dossiers uit te voeren.  

The- lijst ook een „naam“ gebied die wie identificeren het beeld is.  Mijn bedoeling is het gebied van de Naam te gebruiken om de naam van het dossier te dicteren waaraan ik elk beeld zal bewaren.  Als, bijvoorbeeld, de namen Arnie, Betty, en Cammie, waren en ik wilde de beelden in de C:\Images\ folder bewaren, zou ik aan het proces om met deze drie dossiers denken te eindigen:

C:\Images\Arnie.bmp; C:\Images\Betty.bmp; C:\Images\Cammie.bmp

I heeft een codeblok omvatten dat mijn vooruitgang tot zover toont.  Dank, vooraf, voor uw hulp met this.
~Peter Ferber
" codeBody " 
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:

Sub MigrateImages ()
    Schemerige MyDB als Gegevensbestand
    Schemerige MyRcd als DAO.Recordset
    
    Schemerige strsql als Koord
    
    Vastgestelde MyDB = CurrentDb
    strsql = _
        „Selecteer“ & vbcrlf & _
        „Beeld“ & vbcrlf & _
        „, Naam“ & vbcrlf & _
        „VAN“ & vbcrlf & _
        „tblImages“
    Vastgestelde MyRcd = MyDB.OpenRecordset (strsql, dbOpenDynaset)
    Als (niet (MyRcd.BOF en MyRcd.EOF)) Dan
        MyRcd.MoveFirst
        Terwijl (niet MyRcd.EOF)
            
        Wend
    Eind als
Sub van het eind

Antwoord : Bitmaps van de Objecten van de Toegang OLE van de besparing aan BMP dossiers

Hallo Peter

Ik denk dit zou kunnen zijn wat u… zoekt

http://www.lebans.com/oletodisk.htm

--
Graham

Andere oplossingen  
 
programming4us programming4us