Frage : Using VBA, zum von inbox des non-default Briefkastens zu lesen

Wir verwenden Austausch 2003/Aussicht 2000.
All unserer Ingenieure haben einen zusätzlichen Briefkasten, den geöffneter benannter „sptmail "

The Index unten freundlich das Rückstellung inbox liest und Mitteilungen addiert, die nicht im Zugang table.

I möchten existieren, dass es das inbox des sptmail Briefkastens anstelle vom Rückstellungsbenutzer liest.
I denken, dass die Stücke hier sind, es zu tun, ich gerade sind nicht in der Lage gewesen, sie als DAO.Recordset
Dim olApp als OutLook.Application
Dim Inbox als OutLook.MAPIFolder
Dim InboxItems als OutLook.Items
Dim Mailobject als Object
Dim DB als DAO.Database

Set zu setzen DB = CurrentDb

Set olApp = CreateObject alles together.

Dim rst („Outlook.Application“)
Set Inbox = olApp.GetNamespace („Mapi“) .GetDefaultFolder (olFolderInbox)

Set Rst = CurrentDb.OpenRecordset („tbl_OutlookTemp“)

Set InboxItems = Inbox.Items

For jedes Mailobject InboxItems „Schleife durch inbox

tun bis Rst.EOF“ in der Schleife durch database
wenn Rst! Identifikation = Mailobject.EntryID oder IsNull (Rst! Identifikation) Dann Goto- Zeilensprung „hat gefundene zusammenpassende Identifikation oder Tabelle ungültige ID
Rst.MoveNext
Schleife“ Endenschleife durch database

„keine zusammenpassende Mitteilung Identifikation, hinzufügen table
Rst.AddNew“ hinzufügen database
, wenn Mailobject.Subject = "" Then
„Thema als KEINE anstelle vom unbelegten
Rst hinzufügen! Thema = „kein "
Else
Rst! Thema = Mailobject.Subject
Ende If

Rst! VON = „" vom
Rst! Zu = Mailobject.To
Rst! Körper = Mailobject.Body
Rst! Empfangen = Mailobject.ReceivedTime
Rst! Identifikation = Mailobject.EntryID
Rst.Update
skip:
Next“ Endenschleife durch inbox

Set olApp = Nothing
Set Inbox = Nothing
Set InboxItems = Nothing
Set Mailobject = Nothing
Rst.Close
Set Rst = Nothing
DoCmd.Requery

End Sub

Antwort : Using VBA, zum von inbox des non-default Briefkastens zu lesen

DOS kann keine Windows-Fahrer benutzen. Alle DOS-Programme haben eingebaute Fahrer für alle Drucker, die sie stützen können. Da pdf nicht bis lang entwickelt, nachdem DOS von Windows ersetzt worden, gibt es keine DOS-Anwendungen, die PDFs verursachen.

Über alle, die ich an denken kann, ist, ein PCL zum pdf-Konverter zu verwenden. Die DOS-APP dann erhalten, um zu drucken, um (das Annehmen sie zu archivieren kann sogar tun dass) und der Konverter kann herauf die Akte aufheben und das pdf herstellen. Es gibt viele vorhandenen PCL Konverter, z.B.:

http://www.verypdf.com/pcltools/index.html

Wenn Ihr DOS-Ausgang nur aus Text, ohne irgendwelche Druckercodes besteht, haben sie auch einen freien Konverter:

http://www.verypdf.com/txt2pdf/index.htm

Beide laufen von einer Befehlszeile, also konnten Sie ein Stapelverarbeitungsprogramm schreiben, das hält, nach einer PCL Akte zu suchen. Wenn es ein findet, es umwandeln und die Vorlage löschen.

Wenn Ihre DOS-APP zu einem körperlichen Hafen (z.B. LPT1) nur drucken kann gibt es Programme, die den Ausgang gefangennehmen und ihn zu einer Akte umadressieren können. Dann können Sie VeryPDF auf dieser Akte verwenden. Z.B.:

http://www.printfil.com/manualen/c7.htm
Weitere Lösungen  
 
programming4us programming4us