Activity based intelligence (ABI) requires access to all available sources of data. Recorded Future allows analysts to observe structured data on the open, deep, and dark web.
'loop trough all (root) items in the camera device For Each itm In d.Items Dim f As Properties Set f = itm.Properties Dim str As String lCounter = lCounter + 1 DoEvents strHold = "" Name = d.Items(lCounter).Properties("Item Name").Value Ext = d.Items(lCounter).Properties("Filename extension").Value Set v = d.Items(lCounter).Properties("Item Time Stamp").Value PhotoDate = Format(v.Date, "mm/dd/yyyy") 'Debug.Print "Photo Number " & Format(i, "##0") & " Name: " & Name & "." & Ext & " Date taken: " & PhotoDate If IsBetween(PhotoDate, dtDateFrom, dtDateTo) Then 'download the file to a temp buffer Set imgpic = itm.Transfer 'store the file name and extension and app.path in a string, 'so you can use it to perform more operations on it str = App.Path & "\downloaded images\" & Name & "." & Ext imgpic.SaveFile str End If Next
|VBA: perform index match based on config sheet with two additional parameters.||9||45|
|Macro which automatically sends attachment to Outlook||14||42|
|Run code from text file in vb||1||17|
Join the community of 500,000 technology professionals and ask your questions.
Connect with top rated Experts
22 Experts available now in Live!