{"id":70633,"date":"2005-01-18T09:36:00","date_gmt":"2005-01-18T09:36:00","guid":{"rendered":"https:\/\/blogs.technet.microsoft.com\/heyscriptingguy\/2005\/01\/18\/how-can-i-make-a-read-only-file-writeable\/"},"modified":"2005-01-18T09:36:00","modified_gmt":"2005-01-18T09:36:00","slug":"how-can-i-make-a-read-only-file-writeable","status":"publish","type":"post","link":"https:\/\/devblogs.microsoft.com\/scripting\/how-can-i-make-a-read-only-file-writeable\/","title":{"rendered":"How Can I Make a Read-Only File Writeable?"},"content":{"rendered":"

\"Hey, \n

Hey, Scripting Guy! Is it possible to use a script to change the read-only attribute of a file?

— ZO<\/P>\"Spacer\"\"Hey,\"Script<\/A> \n

Hey, ZO. Of course, you can do this; the FileSystemObject can do anything<\/I>!<\/P>\n

Well, OK, it can\u2019t do either of those things. And, no, it can\u2019t do that, either. But it can<\/I> change a read-only file to a writeable file, and with just a few lines of code.<\/P>\n

Here\u2019s a script that binds to the file C:\\Scripts\\Computers.txt, checks to see if the file is read-only and, if it is, makes it writeable:<\/P>

Const READ_ONLY = 1<\/p>\n
Set objFSO = CreateObject(“Scripting.FileSystemObject”)\nSet objFile = objFSO.GetFile(“C:\\Scripts\\Computers.txt”)<\/p>\n
If objFile.Attributes AND READ_ONLY Then\n    objFile.Attributes = objFile.Attributes XOR READ_ONLY\nEnd If\n<\/PRE>\n
Pretty easy, huh? The only tricky part comes with this line of code, when we check to see if the file is read-only:<\/P>
If objFile.Attributes AND READ_ONLY Then\n<\/PRE>\n
The way we determine whether or not a file is read-only is by checking the appropriate switch in the Attributes bitmask. If this switch (which has the value of 1; that\u2019s why we created a constant named READ_ONLY and assigned it the value 1) is enabled, then the file is read-only. If the switch is not enabled then the file is writeable. <\/P>\n
This line of code is a bit confusing (welcome to the world of Boolean logic!) but it can be read like this: if the read-only switch within the Attributes bitmask is enabled, then run the next line of code. The syntax is kind of clumsy-looking, but it\u2019s just something we have to live with. <\/P>\n
And before you ask, what if you wanted to turn a writeable file into a read-only file? Well, in that case, we\u2019d want to determine if the read-only switch is not<\/I> set. Thus we\u2019d use this line of code instead:<\/P>
If Not objFile.Attributes AND READ_ONLY Then\n<\/PRE>\n
If it turns out that we have a read-only file, the script then uses the Boolean operator XOR to \u201cflip\u201d the read-only switch. This line of code executes only if the read-only switch is enabled; consequently, it\u2019s going to turn this switch off, thus making the file writeable. The XOR operator just flips things from on to off and vice-versa. That\u2019s why we check to see if the read-only switch is enabled before we call XOR. Suppose we didn\u2019t check and suppose the file was writeable. In that case, XOR would flip the switch, and make our writeable file read-only.<\/P>\n
Yes, it\u2019s confusing. For a very brief primer on bitmask properties and Boolean logic, you might take a look at this portion of the Microsoft Windows 2000 Scripting Guide<\/B><\/A>.<\/P>\n
Of course, instead of simply changing one read-only file to a writeable file, a more common task is to go through a folder and make all<\/I> the read-only files writeable. Can a script do that? You bet it can. Here\u2019s a script that uses WMI to retrieve a list of all the read-only files found in the folder C:\\Scripts (by checking for files where the Writeable property is FALSE). The script then takes each of those files, passes the file name to the FileSystemObject, and proceeds to make the file writeable. We won\u2019t explain how all the WMI code works today; if you\u2019re interested in that, you might take a look at this Hey, Scripting Guy!<\/B><\/A> column.<\/P>\n
Oh, right; here\u2019s the script: <\/P>
Const READ_ONLY = 1<\/p>\n
strComputer = “.”\nSet objFSO = CreateObject(“Scripting.FileSystemObject”)<\/p>\n
Set objWMIService = GetObject(“winmgmts:\\\\” & strComputer & “\\root\\cimv2”)<\/p>\n
Set colFiles = objWMIService. _\n    ExecQuery(“Select * from CIM_DataFile where Path = ‘\\\\Scripts\\\\’ ” & _\n        “AND Drive = ‘C:’ AND Writeable = FALSE”)<\/p>\n
For Each objFile in colFiles\n    Set objReadOnlyFile = objFSO.GetFile(objFile.Name)\n    objReadOnlyFile.Attributes = objReadOnlyFile.Attributes XOR READ_ONLY\nNext<\/PRE><\/p>\n","protected":false},"excerpt":{"rendered":"
Hey, Scripting Guy! Is it possible to use a script to change the read-only attribute of a file?— ZO Hey, ZO. Of course, you can do this; the FileSystemObject can do anything! Well, OK, it can\u2019t do either of those things. And, no, it can\u2019t do that, either. But it can change a read-only file […]<\/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":[3,4,14,5],"class_list":["post-70633","post","type-post","status-publish","format-standard","has-post-thumbnail","hentry","category-scripting","tag-scripting-guy","tag-scripting-techniques","tag-text-files","tag-vbscript"],"acf":[],"blog_post_summary":"
Hey, Scripting Guy! Is it possible to use a script to change the read-only attribute of a file?— ZO Hey, ZO. Of course, you can do this; the FileSystemObject can do anything! Well, OK, it can\u2019t do either of those things. And, no, it can\u2019t do that, either. But it can change a read-only file […]<\/p>\n","_links":{"self":[{"href":"https:\/\/devblogs.microsoft.com\/scripting\/wp-json\/wp\/v2\/posts\/70633","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=70633"}],"version-history":[{"count":0,"href":"https:\/\/devblogs.microsoft.com\/scripting\/wp-json\/wp\/v2\/posts\/70633\/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=70633"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/devblogs.microsoft.com\/scripting\/wp-json\/wp\/v2\/categories?post=70633"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/devblogs.microsoft.com\/scripting\/wp-json\/wp\/v2\/tags?post=70633"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}