Imhotheb
/
PB.Ex
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity
Browse Source

Update Mail to 1.0.8.0 

Signed-off-by: Imhotheb <Info@Imhotheb.de>
master
Imhotheb 6 years ago
parent
552afa6abe
commit
c8284ad249
4 changed files with 20 additions and 11 deletions
Whitespace
Show all changes Ignore whitespace when comparing lines Ignore changes in amount of whitespace Ignore changes in whitespace at EOL
Unified View
Diff Options
Show Stats Download Patch File Download Diff File
  1. 17
      PB.Ex_Mail/PB.Ex_Mail.pb
  2. 14
      PB.Ex_Mail/PB.Ex_Mail.pbi
  3. BIN
      PB.Ex_Mail/PB.Ex_Mail_x64.dll
  4. BIN
      PB.Ex_Mail/PB.Ex_Mail_x86.dll

17
PB.Ex_Mail/PB.Ex_Mail.pb
View File

@ -10,6 +10,11 @@ Global PBEx_Mail
#PBEx_Mail_Event_NewMail = 0 #PBEx_Mail_Event_NewMail = 0
#PBEx_Mail_Attribute_Unseen = 0 #PBEx_Mail_Attribute_Unseen = 0
#PBEx_Mail_Attribute_Seen = 32 #PBEx_Mail_Attribute_Seen = 32
#PBEx_Mail_SeenType_AllMails = 0
#PBEx_Mail_SeenType_OnlySeenMails = 1
#PBEx_Mail_SeenType_OnlyUnseenMails = 2
#PBEx_Mail_FetchType_AllData = 0
#PBEx_Mail_FetchType_OnlyHeaderData = 1
CompilerIf #PB_Compiler_Processor = #PB_Processor_x86 CompilerIf #PB_Compiler_Processor = #PB_Processor_x86
PBEx_Mail = OpenLibrary(#PB_Any, "PB.Ex_Mail_x86.dll") PBEx_Mail = OpenLibrary(#PB_Any, "PB.Ex_Mail_x86.dll")
@ -26,7 +31,7 @@ If PBEx_Mail
Global ExamineMailDirectoryEx.ExamineMailDirectoryEx = GetFunction(PBEx_Mail, "ExamineMailDirectoryEx") Global ExamineMailDirectoryEx.ExamineMailDirectoryEx = GetFunction(PBEx_Mail, "ExamineMailDirectoryEx")
Prototype MailDirectoryEntryNameEx(ID, Output, ErrorOutput) Prototype MailDirectoryEntryNameEx(ID, Output, ErrorOutput)
Global MailDirectoryEntryNameEx.MailDirectoryEntryNameEx = GetFunction(PBEx_Mail, "MailDirectoryEntryNameEx") Global MailDirectoryEntryNameEx.MailDirectoryEntryNameEx = GetFunction(PBEx_Mail, "MailDirectoryEntryNameEx")
Prototype ExamineMailEx(ID, ErrorOutput) Prototype ExamineMailEx(ID, SeenType, FetchType, SortByNew, ErrorOutput)
Global ExamineMailEx.ExamineMailEx = GetFunction(PBEx_Mail, "ExamineMailEx") Global ExamineMailEx.ExamineMailEx = GetFunction(PBEx_Mail, "ExamineMailEx")
Prototype MailEntrySubjectEx(ID, Output, ErrorOutput) Prototype MailEntrySubjectEx(ID, Output, ErrorOutput)
Global MailEntrySubjectEx.MailEntrySubjectEx = GetFunction(PBEx_Mail, "MailEntrySubjectEx") Global MailEntrySubjectEx.MailEntrySubjectEx = GetFunction(PBEx_Mail, "MailEntrySubjectEx")
@ -188,7 +193,7 @@ If OpenMailEx(1, #PBEx_Mail_Protocol_IMAP, "imap.gmail.com", 993, "yourmailaddre
;Determine all mail from inbox ;Determine all mail from inbox
;Or from any directory ;Or from any directory
;SetMailDirectoryEx(1, "Downloadportale/Chip", @ErrorOutput$) ;SetMailDirectoryEx(1, "Downloadportale/Chip", @ErrorOutput$)
If ExamineMailEx(1, @ErrorOutput$) If ExamineMailEx(1, #PBEx_Mail_SeenType_AllMails, #PBEx_Mail_FetchType_AllData, 0, @ErrorOutput$)
While NextMailEntryEx(1, @ErrorOutput$) While NextMailEntryEx(1, @ErrorOutput$)
MailEntrySubjectEx(1, @Output$, @ErrorOutput$) MailEntrySubjectEx(1, @Output$, @ErrorOutput$)
Debug "Subject: " + Output$ Debug "Subject: " + Output$
@ -220,14 +225,14 @@ EndIf
CloseLibrary(PBEx_Mail) CloseLibrary(PBEx_Mail)
; IDE Options = PureBasic 5.70 LTS (Windows - x64) ; IDE Options = PureBasic 5.60 (Windows - x64)
; CursorPosition = 188 ; CursorPosition = 201
; FirstLine = 152 ; FirstLine = 167
; Folding = - ; Folding = -
; EnableXP ; EnableXP
; EnableUser ; EnableUser
; Executable = PB.Ex_MSSQL.exe ; Executable = PB.Ex_MSSQL.exe
; CompileSourceDirectory ; CompileSourceDirectory
; EnableCompileCount = 780 ; EnableCompileCount = 782
; EnableBuildCount = 7 ; EnableBuildCount = 7
; EnableUnicode ; EnableUnicode

14
PB.Ex_Mail/PB.Ex_Mail.pbi
View File

@ -10,6 +10,11 @@ Global PBEx_Mail
#PBEx_Mail_Event_NewMail = 0 #PBEx_Mail_Event_NewMail = 0
#PBEx_Mail_Attribute_Unseen = 0 #PBEx_Mail_Attribute_Unseen = 0
#PBEx_Mail_Attribute_Seen = 32 #PBEx_Mail_Attribute_Seen = 32
#PBEx_Mail_SeenType_AllMails = 0
#PBEx_Mail_SeenType_OnlySeenMails = 1
#PBEx_Mail_SeenType_OnlyUnseenMails = 2
#PBEx_Mail_FetchType_AllData = 0
#PBEx_Mail_FetchType_OnlyHeaderData = 1
CompilerIf #PB_Compiler_Processor = #PB_Processor_x86 CompilerIf #PB_Compiler_Processor = #PB_Processor_x86
PBEx_Mail = OpenLibrary(#PB_Any, "PB.Ex_Mail_x86.dll") PBEx_Mail = OpenLibrary(#PB_Any, "PB.Ex_Mail_x86.dll")
@ -26,7 +31,7 @@ If PBEx_Mail
Global ExamineMailDirectoryEx.ExamineMailDirectoryEx = GetFunction(PBEx_Mail, "ExamineMailDirectoryEx") Global ExamineMailDirectoryEx.ExamineMailDirectoryEx = GetFunction(PBEx_Mail, "ExamineMailDirectoryEx")
Prototype MailDirectoryEntryNameEx(ID, Output, ErrorOutput) Prototype MailDirectoryEntryNameEx(ID, Output, ErrorOutput)
Global MailDirectoryEntryNameEx.MailDirectoryEntryNameEx = GetFunction(PBEx_Mail, "MailDirectoryEntryNameEx") Global MailDirectoryEntryNameEx.MailDirectoryEntryNameEx = GetFunction(PBEx_Mail, "MailDirectoryEntryNameEx")
Prototype ExamineMailEx(ID, ErrorOutput) Prototype ExamineMailEx(ID, SeenType, FetchType, SortByNew, ErrorOutput)
Global ExamineMailEx.ExamineMailEx = GetFunction(PBEx_Mail, "ExamineMailEx") Global ExamineMailEx.ExamineMailEx = GetFunction(PBEx_Mail, "ExamineMailEx")
Prototype MailEntrySubjectEx(ID, Output, ErrorOutput) Prototype MailEntrySubjectEx(ID, Output, ErrorOutput)
Global MailEntrySubjectEx.MailEntrySubjectEx = GetFunction(PBEx_Mail, "MailEntrySubjectEx") Global MailEntrySubjectEx.MailEntrySubjectEx = GetFunction(PBEx_Mail, "MailEntrySubjectEx")
@ -144,10 +149,9 @@ If PBEx_Mail
Global GetMailAttributeEx.GetMailAttributeEx = GetFunction(PBEx_Mail, "GetMailAttributeEx") Global GetMailAttributeEx.GetMailAttributeEx = GetFunction(PBEx_Mail, "GetMailAttributeEx")
EndIf EndIf
; IDE Options = PureBasic 5.60 (Windows - x64)
; IDE Options = PureBasic 5.70 LTS (Windows - x64) ; CursorPosition = 150
; CursorPosition = 146 ; FirstLine = 91
; FirstLine = 87
; EnableXP ; EnableXP
; EnableUser ; EnableUser
; Executable = PB.Ex_MSSQL.exe ; Executable = PB.Ex_MSSQL.exe

BIN
PB.Ex_Mail/PB.Ex_Mail_x64.dll
View File

Binary file not shown.

BIN
PB.Ex_Mail/PB.Ex_Mail_x86.dll
View File

Binary file not shown.
Write Preview
Loading…
Cancel
Save

Impressum | Datenschutz