Frage : Einsparung-Zugangs-archiviert ALTE Gegenstand-Bitübersichten zu BMP

Hallo:
I haben eine Zugangstabelle, ein ALTES Gegenstandfeld zu enthalten, das „Bild“ genannt wird, und jede Aufzeichnung enthält ein kleines Bit-Übersichtsbild.  Ich habe Mühe den VB Befehl finden, diese in eine Reihe BMP-Akten zu exportieren.  

The Tabelle enthält auch eine „Namens“ Feldbestimmung, wer das Bild ist.  Meine Absicht ist, das Namensfeld zu benutzen, um den Namen der Akte vorzuschreiben, zu der ich jedes Bild speichere.  Wenn z.B. die Namen Arnie, Betty und Cammie waren und ich die Bilder in das C:\Images\-Verzeichnis speichern wollte, würde ich zum Prozess erwarten, diese drei Akten zu beenden:

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

I haben, einen Codeblock zu umfassen, der meinen Fortschritt bis jetzt zeigt.  Dank im Voraus für Ihre Unterstützung mit this.
~Peter Ferber
 
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:

Sub MigrateImages ()
    Schwaches MyDB als Datenbank
    Schwaches MyRcd als DAO.Recordset
    
    Schwaches strsql als Schnur
    
    MyDB = CurrentDb einstellen
    strsql = _
        „Vorwählen“ u. vbcrlf u. _
        „Bild“ u. vbcrlf u. _
        „, Name“ u. vbcrlf u. _
        „VON“ u. vbcrlf u. _
        „tblImages“
    MyRcd = MyDB.OpenRecordset (strsql, dbOpenDynaset) einstellen
    Wenn (nicht (MyRcd.BOF und MyRcd.EOF)) Dann
        MyRcd.MoveFirst
        Während (nicht MyRcd.EOF)
            das 
        Wend
    Beenden wenn
Unterseeboot beenden

Antwort : Einsparung-Zugangs-archiviert ALTE Gegenstand-Bitübersichten zu BMP

Hallo Peter

Ich denke, dass dieses sein konnte, nach was Sie suchen…

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

--
Graham

Weitere Lösungen  
 
programming4us programming4us