![\"Script](\"http:\/\/img.microsoft.com\/library\/media\/1033\/technet\/images\/scriptcenter\/ad.jpg\" "\\"Script")
<\/A> \nHey, GH. Well, one way to do this would be to search the entire file system – including any mapped network drives – and check to see if a file (let\u2019s call it Budget.xls) can be found anywhere. Assuming you find such a file, you can then use some additional code to determine whether or not that file happens to be on a CD or DVD drive.<\/P>\n
That would work, but it\u2019s not very elegant and – depending on the size of your file system – could take awhile to complete. A much better method would be to tell your script to look for that file only<\/I> on CD or DVD drives. And guess what: that\u2019s exactly the approach we\u2019re going to take.<\/P>\n
What, you expected the Scripting Guys to do something that wasn\u2019t<\/I> elegant and sophisticated?<\/P>\n
We\u2019ll want to start by looking for the CD\/DVD drives that are connected to the computer in question, and discovering the drive letter for each of those items. Fortunately, that\u2019s easy to do; this little WMI script reports back the drive letters for all the CD\/DVD drives connected to a computer:<\/P>
strComputer = “.”\nSet objWMIService = GetObject(“winmgmts:\\\\” & strComputer & “\\root\\cimv2”)<\/p>\nSet colItems = objWMIService.ExecQuery(“Select * from Win32_CDROMDrive”)<\/p>\n
For Each objItem in colItems\n Wscript.Echo objItem.Drive\nNext\n<\/PRE>\n
After we\u2019ve identified the drive letters we can put together a WMI query that looks for a file only on those specified drives. Let\u2019s take a look at the completed script, and then we\u2019ll explain how it works:<\/P>
On Error Resume Next<\/p>\nstrComputer = “.”\nSet objWMIService = GetObject(“winmgmts:\\\\” & strComputer & “\\root\\cimv2”)<\/p>\n
Set colItems = objWMIService.ExecQuery(“Select * from Win32_CDROMDrive”)<\/p>\n
For Each objItem in colItems\n strDrive = objItem.Drive\n Set colFiles = objWMIService.ExecQuery _\n (“Select * From CIM_DataFile Where FileName = ‘Budget’ ” & _\n “AND Extension = ‘xls’ AND Drive = ‘” & strDrive & “‘”)<\/p>\n
If colFiles.Count > 0 Then\n For Each objFile in colFiles\n Wscript.Echo objFile.Name\n Next\n End If\nNext\n<\/PRE>\n
As you can see, we start off by retrieving a collection of all the CD\/DVD drives on the computer. For each drive found (and there could be more than one), we assign the value of the Drive<\/B> property (which, as we noted earlier, represents the drive letter) to a variable named strDrive. We then use a second WMI query to search that drive for a file named Budget.xls. Here\u2019s the code that does that:<\/P>Set colFiles = objWMIService.ExecQuery _\n (“Select * From CIM_DataFile Where FileName = ‘Budget’ ” & _\n “AND Extension = ‘xls’ AND Drive = ‘” & strDrive & “‘”)\n<\/PRE>\nAdmittedly, the query looks a little convoluted; that\u2019s because WMI treats the file name (Budget) and the file extension (xls) as two separate properties. Because of that we have to use three parameters in our WHERE clause: the file name (Budget<\/B>); the file extension (xls<\/B>); and the drive we want to search. Notice that we don\u2019t hard-code in a drive letter but instead we use the variable strDrive. Like we said, at first glance it\u2019s a little complicated, but it works.<\/P>\n
After issuing the query, and after waiting for the script to search the CD\/DVD drive (which shouldn\u2019t take more than 15-20 seconds, tops) we check to see how many files with the name Budget.xls were found. If the collection contains at least one file (colFiles.Count > 0<\/B>) we echo the Name<\/B> property for each file found. (If Count is equal to 0 that means we couldn\u2019t find any files named Budget.xls, so we don\u2019t do anything at all.) The script then loops around and searches the next CD\/DVD drive in the collection. This continues until each CD\/DVD drive has been searched, and any successes reported back.<\/P><\/p>\n","protected":false},"excerpt":{"rendered":"
Hey, Scripting Guy! How can I tell whether a file exists on any CD or DVD drive connected to a computer?— GH Hey, GH. Well, one way to do this would be to search the entire file system – including any mapped network drives – and check to see if a file (let\u2019s call it […]<\/p>\n","protected":false},"author":595,"featured_media":87096,"comment_status":"open","ping_status":"closed","sticky":false,"template":"","format":"standard","meta":{"_acf_changed":false,"footnotes":""},"categories":[1],"tags":[38,34,35,3,12,5],"class_list":["post-70293","post","type-post","status-publish","format-standard","has-post-thumbnail","hentry","category-scripting","tag-files","tag-hardware","tag-peripherals-and-devices","tag-scripting-guy","tag-storage","tag-vbscript"],"acf":[],"blog_post_summary":"
Hey, Scripting Guy! How can I tell whether a file exists on any CD or DVD drive connected to a computer?— GH Hey, GH. Well, one way to do this would be to search the entire file system – including any mapped network drives – and check to see if a file (let\u2019s call it […]<\/p>\n","_links":{"self":[{"href":"https:\/\/devblogs.microsoft.com\/scripting\/wp-json\/wp\/v2\/posts\/70293","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/devblogs.microsoft.com\/scripting\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/devblogs.microsoft.com\/scripting\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/devblogs.microsoft.com\/scripting\/wp-json\/wp\/v2\/users\/595"}],"replies":[{"embeddable":true,"href":"https:\/\/devblogs.microsoft.com\/scripting\/wp-json\/wp\/v2\/comments?post=70293"}],"version-history":[{"count":0,"href":"https:\/\/devblogs.microsoft.com\/scripting\/wp-json\/wp\/v2\/posts\/70293\/revisions"}],"wp:featuredmedia":[{"embeddable":true,"href":"https:\/\/devblogs.microsoft.com\/scripting\/wp-json\/wp\/v2\/media\/87096"}],"wp:attachment":[{"href":"https:\/\/devblogs.microsoft.com\/scripting\/wp-json\/wp\/v2\/media?parent=70293"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/devblogs.microsoft.com\/scripting\/wp-json\/wp\/v2\/categories?post=70293"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/devblogs.microsoft.com\/scripting\/wp-json\/wp\/v2\/tags?post=70293"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}
![\"Hey,](\"https:\/\/devblogs.microsoft.com\/wp-content\/uploads\/sites\/29\/2019\/02\/q-for-powertip.jpg\" "\\"Hey,")
<\/H2>\n![\"Spacer\"](\"https:\/\/devblogs.microsoft.com\/scripting\/wp-content\/uploads\/sites\/29\/2019\/05\/spacer.gif\")
![\"Hey,](\"https:\/\/devblogs.microsoft.com\/wp-content\/uploads\/sites\/29\/2019\/02\/a-for-powertip.jpg\" "\\"Hey,")