How to get the EXIF and metadata of a file?

Hi @Matze7,

I copy pasted your code and was able to reproduce the issue you are facing. 

After pasting into PAD, it adds a backslash \ character inside the vbscript next to the " quotes as an escape character.

To fix the issue, open the Run vbscript action, remove all the \ and close. 

Only remove from inside the vbscript and nowhere else. 

It works fine. 

Rerun and check. 

Looks like this is exacly what I am looking for. Unfortunately I do not get the fill result. The export is this:

I am wondering if this is the correct VBScripting part?

Dim oAppShell, objFso, oFolder, output, i
 
 Set objFso = CreateObject(\"Scripting.FileSystemObject\")
 Set oAppShell = CreateObject(\"Shell.Application\")
 
 varFolderPath = \"%FolderPath%\"
 Set oFolder = oAppShell.Namespace(varFolderPath)
 
 
 File = \"%FileName%\" \'The name of file returned by the \'Get File Path Part action\'
 
 For i = 0 To 320
 output = output & oFolder.GetDetailsOf(, i) & \" - \" & oFolder.GetDetailsOf(oFolder.items.Item(File), i) & vbNewLine
 Next 
 
 
 Set oAppShell = Nothing
 Set objFso = Nothing
 
WScript.Echo output

Any idea, what the issue is?

the complete one is this:

/# 0 Name
 1 Size
 2 Item type
 3 Date modified
 4 Date created
 5 Date accessed
 6 Attributes
 7 Offline status
 8 Availability
 9 Perceived type
 10 Owner
 11 Kind
 12 Date taken
 13 Contributing artists
 14 Album
 15 Year
 16 Genre
 17 Conductors
 18 Tags
 19 Rating
 20 Authors
 21 Title
 22 Subject
 23 Categories
 24 Comments
 25 Copyright
 26 #
 27 Length
 28 Bit rate
 29 Protected
 30 Camera model
 31 Dimensions
 32 Camera maker
 33 Company
 34 File description
 35 Masters keywords
 36 Masters keywords
 42 Program name
 43 Duration
 44 Is online
 45 Is recurring
 46 Location
 47 Optional attendee addresses
 48 Optional attendees
 49 Organizer address
 50 Organizer name
 51 Reminder time
 52 Required attendee addresses
 53 Required attendees
 54 Resources
 55 Meeting status
 56 Free/busy status
 57 Total size
 58 Account name
 60 Task status
 61 Computer
 62 Anniversary
 63 Assistant's name
 64 Assistant's phone
 65 Birthday
 66 Business address
 67 Business city
 68 Business country/region
 69 Business P.O. box
 70 Business postal code
 71 Business state or province
 72 Business street
 73 Business fax
 74 Business home page
 75 Business phone
 76 Callback number
 77 Car phone
 78 Children
 79 Company main phone
 80 Department
 81 E-mail address
 82 E-mail2
 83 E-mail3
 84 E-mail list
 85 E-mail display name
 86 File as
 87 First name
 88 Full name
 89 Gender
 90 Given name
 91 Hobbies
 92 Home address
 93 Home city
 94 Home country/region
 95 Home P.O. box
 96 Home postal code
 97 Home state or province
 98 Home street
 99 Home fax
100 Home phone
101 IM addresses
102 Initials
103 Job title
104 Label
105 Last name
106 Mailing address
107 Middle name
108 Cell phone
109 Nickname
110 Office location
111 Other address
112 Other city
113 Other country/region
114 Other P.O. box
115 Other postal code
116 Other state or province
117 Other street
118 Pager
119 Personal title
120 City
121 Country/region
122 P.O. box
123 Postal code
124 State or province
125 Street
126 Primary e-mail
127 Primary phone
128 Profession
129 Spouse/Partner
130 Suffix
131 TTY/TTD phone
132 Telex
133 Webpage
134 Content status
135 Content type
136 Date acquired
137 Date archived
138 Date completed
139 Device category
140 Connected
141 Discovery method
142 Friendly name
143 Local computer
144 Manufacturer
145 Model
146 Paired
147 Classification
148 Status
149 Status
150 Client ID
151 Contributors
152 Content created
153 Last printed
154 Date last saved
155 Division
156 Document ID
157 Pages
158 Slides
159 Total editing time
160 Word count
161 Due date
162 End date
163 File count
164 File extension
165 Filename
166 File version
167 Flag color
168 Flag status
169 Space free
172 Group
173 Sharing type
174 Bit depth
175 Horizontal resolution
176 Width
177 Vertical resolution
178 Height
179 Importance
180 Is attachment
181 Is deleted
182 Encryption status
183 Has flag
184 Is completed
185 Incomplete
186 Read status
187 Shared
188 Creators
189 Date
190 Folder name
191 Folder path
192 Folder
193 Participants
194 Path
195 By location
196 Type
197 Contact names
198 Entry type
199 Language
200 Date visited
201 Description
202 Link status
203 Link target
204 URL
208 Media created
209 Date released
210 Encoded by
211 Episode number
212 Producers
213 Publisher
214 Season number
215 Subtitle
216 User web URL
217 Writers
219 Attachments
220 Bcc addresses
221 Bcc
222 Cc addresses
223 Cc
224 Conversation ID
225 Date received
226 Date sent
227 From addresses
228 From
229 Has attachments
230 Sender address
231 Sender name
232 Store
233 To addresses
234 To do title
235 To
236 Mileage
237 Album artist
238 Sort album artist
239 Album ID
240 Sort album
241 Sort contributing artists
242 Beats-per-minute
243 Composers
244 Sort composer
245 Disc
246 Initial key
247 Part of a compilation
248 Mood
249 Part of set
250 Period
251 Color
252 Parental rating
253 Parental rating reason
254 Space used
255 EXIF version
256 Event
257 Exposure bias
258 Exposure program
259 Exposure time
260 F-stop
261 Flash mode
262 Focal length
263 35mm focal length
264 ISO speed
265 Lens maker
266 Lens model
267 Light source
268 Max aperture
269 Metering mode
270 Orientation
271 People
272 Program mode
273 Saturation
274 Subject distance
275 White balance
276 Priority
277 Project
278 Channel number
279 Episode name
280 Closed captioning
281 Rerun
282 SAP
283 Broadcast date
284 Program description
285 Recording time
286 Station call sign
287 Station name
288 Summary
289 Snippets
290 Auto summary
291 Relevance
292 File ownership
293 Sensitivity
294 Shared with
295 Sharing status
297 Product name
298 Product version
299 Support link
300 Source
301 Start date
302 Sharing
303 Availability status
304 Status
305 Billing information
306 Complete
307 Task owner
308 Sort title
309 Total file size
310 Legal trademarks
311 Video compression
312 Directors
313 Data rate
314 Frame height
315 Frame rate
316 Frame width
317 Spherical
318 Stereo
319 Video orientation
320 Total bitrate#/
/# Set the Folder path from where the files will be picked.
You can also use a Display Select Folder Dialog box.#/
SET FolderPath TO $'''C:\\Users\\aufur\\OneDrive\\Desktop\\temp\\Kicker ebay'''
Folder.GetFiles Folder: $'''C:\\Users\\aufur\\OneDrive\\Desktop\\temp\\Kicker ebay''' FileFilter: $'''*.jpg''' IncludeSubfolders: False FailOnAccessDenied: True SortBy1: Folder.SortBy.NoSort SortDescending1: False SortBy2: Folder.SortBy.NoSort SortDescending2: False SortBy3: Folder.SortBy.NoSort SortDescending3: False Files=> Files
/# READ ME: This is to store the Output file on Desktop.
The output file name and path will be saved as ....Desktop\\FileMetadata.txt
*IMP* This Flow will overwrite the above file if it already exists.
So, if you have an important file on Desktop with the above name then change the path where this Output file is saved.#/
Folder.GetSpecialFolder SpecialFolder: Folder.SpecialFolder.DesktopDirectory SpecialFolderPath=> SpecialFolderPath
File.WriteText File: $'''%SpecialFolderPath%\\FileMetadata.txt''' TextToWrite: $'''***** TOTAL FILES IN FOLDER: %Files.Count% *****''' AppendNewLine: True IfFileExists: File.IfFileExists.Overwrite Encoding: File.FileEncoding.Unicode
LOOP FOREACH FullFilePath IN Files
 File.GetPathPart File: FullFilePath FileName=> FileName
 **REGION To extract all metadata fields
 @@copilotGeneratedAction: 'False'
Scripting.RunVBScript.RunVBScript VBScriptCode: $'''Dim oAppShell, objFso, oFolder, output, i
 
 Set objFso = CreateObject(\\\"Scripting.FileSystemObject\\\")
 Set oAppShell = CreateObject(\\\"Shell.Application\\\")
 
 varFolderPath = \\\"%FolderPath%\\\"
 Set oFolder = oAppShell.Namespace(varFolderPath)
 
 
 File = \\\"%FileName%\\\" \\\'The name of file returned by the \\\'Get File Path Part action\\\'
 
 For i = 0 To 320
 output = output & oFolder.GetDetailsOf(, i) & \\\" - \\\" & oFolder.GetDetailsOf(oFolder.items.Item(File), i) & vbNewLine
 Next 
 
 
 Set oAppShell = Nothing
 Set objFso = Nothing
 
WScript.Echo output''' ScriptOutput=> VBScriptOutput
 File.WriteText File: $'''%SpecialFolderPath%\\FileMetadata.txt''' TextToWrite: $'''-----------------------------------------------------------
File Name: %FileName%
-----------------------------------------------------------
%VBScriptOutput%''' AppendNewLine: True IfFileExists: File.IfFileExists.Append Encoding: File.FileEncoding.Unicode
 **ENDREGION
END
Display.ShowMessageDialog.ShowMessage Title: $'''Message''' Message: $'''Done.

Clicking OK will open the below file:
%SpecialFolderPath%\\FileMetadata.txt''' Icon: Display.Icon.Information Buttons: Display.Buttons.OK DefaultButton: Display.DefaultButton.Button1 IsTopMost: False ButtonPressed=> ButtonPressed
System.RunApplication.RunApplication ApplicationPath: $'''%SpecialFolderPath%\\FileMetadata.txt''' WindowStyle: System.ProcessWindowStyle.Maximized ProcessId=> AppProcessId