Thom,
I have done this and instead of worrying about the dir and what files are there, I rename the file to itself and look for an error message 2 lines up or a success message (file doesn't exist) From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Thom C. Blackwell Sent: Tuesday, February 26, 2008 8:31 AM To: [email protected] Subject: RE: [Talk] Unix and Boston Greetings, There are likely easier ways of doing this than reading the output from a command window. I know very little about UNIX, but I think you can mount a UNIX file system so it shows up as a drive in Windows - no clue how you'd do such a thing, just know I've seen it before. Once this was done, I'd suspect the FileSystemObject could do stuff with the files (there are examples of using the file system object on our website). I'd suspect you could use FTP - there are examples using our built in FTP on the site too. But as an exercise (always good to practice to keep scripting skills sharp J) I took a crack at do this using the console connection. At first, the tricky piece appeared to be to reading the output of a DIR a console - since that it can "scroll" if the list is bigger than the available window. However, there is an option that the DIR command can accept - /p that allows you to pause one screen at a time. So the script can read one page at a time using a For / Next Loop. The next tricky piece is where to read. When you first send the DIR command, the screen displays volume info etc on rows 1-5. After you get another page however, the files show up in there rows, so I had to take that into account. Finally, need to know when you are at the end of the list. And of course, the results will likely need to be parsed to get what you want etc. I didn't go too far with this . As I said above, there's likely an easier way but the example code below seems to do the trick - not a bad scripting exercise for first thing in the morning J Here's my example: Sub ReadDIR() Dim fileList As New Collection Dim directoryList As New Collection Connect "cmd", stConsole Pause "Microsoft [EMAIL PROTECTED],*" Enter "dir /p" Pause "Directory [EMAIL PROTECTED],*" firstpage = True ReadMore: Wait For i = 1 To 24 ' See where the files start this would be based on the Console size settings If firstpage Then ' he first page of files starts at row 6, any others start at row 1 i = i + 5 firstpage = False End If temp = View(Row:=i, Col:=1, Length:=73) 'Here we detect "End of List" If Trim(temp) = "" Then 'No more files Exit For End If 'Here store either files or directories If InStr(temp, "<DIR>") Then directoryList.Add Trim(temp) Else fileList.Add Trim(temp) End If Next i At "" If At("Press any key to continue") Then Enter GoTo ReadMore End If 'Here close the console gracefully because I am done with it. Connect "", stStream For i = 1 To fileList.Count Debug.Print fileList(i) 'Here's where you'd do parsing to get your file information 'For example, getting the date fdate = Trim(StrLeft(fileList(i), 10)) If fdate = "" Then 'This must be the "count info" at the bottom of the list End If Next i End Sub Thom C. Blackwell Product Manager Boston Software Systems (866) 653-5105 ex 807 www.bossoft.com <http://www.bossoft.com/> Visit us in Booth 2471 at HIMSS08 - February 25-28 in Orlando, FL Sign <http://www.bostonworkstation.com/customer_center/special_events.aspx> up for my weekly webinar! LEGAL NOTICE Unless expressly stated otherwise, this message is confidential and may be privileged. It is intended for the addressee(s) only. Access to this E-mail by anyone else is unauthorized. If you are not an addressee, any disclosure or copying of the contents of this E-mail or any action taken (or not taken) in reliance on it is unauthorized and may be unlawful. If you are not an addressee, please inform the sender immediately, then delete this message and empty from your trash. From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Chen, Scott C Sent: Monday, February 25, 2008 7:12 PM To: [email protected] Subject: [Talk] Unix and Boston Just curious as to whether anybody has used CMD Console to FTP to Unix and search for files in the directories? If so, can you provide some assistance to me. How did you retrieve the results of your search since it is character based? Thanks, Scott DISCLAIMER: This message is intended for the sole use of the addressee, and may contain information that is privileged, confidential and exempt from disclosure under applicable law. If you are not the addressee you are hereby notified that you may not use, copy, disclose, or distribute to anyone the message or any information contained in the message. If you have received this message in error, please immediately advise the sender by reply email and delete this message.
