vbscript - Delete registry folder and sub folder using VBS -

-

I want to delete the registry folder and sub-folder by using this vb script.

In the reg file we can do the script as below: 

  [- HKEY_LOCAL_MACHINE \ software \ abc \ prr]   
 Under the script above, will delete sub folder  
 How can one get the same using a VB script?  
 I tried to use  .RegDelete  but I think it only works for the key and not for the registry folder.  
 Thank you.   
 
  [path] RegDelete [key] | [Value]  
 The Path Path (hence Windows can find it) to download the paths Windows 98 Tips and tips on hacks pages to see Windows always find it.  
 Do not start RegDelete with any user interface, or do not close key or values ​​in the inverted commas while typing the value to delete or delete.  
 Key key to delete key always ends in a backslash if the key has a space then it must be attached in reverse coma. Keys and subkeys will be removed.  
 Value Deletion value values ​​do not have a backslash at the back. If the key has a location then it should be enclosed in reverse comma.  
 Copy the following lines into a new text document and save it as RegDelete.vbs.  
  Deletes key or value from RegDelete.vbs' registry. Resume 'error' vbPara = vbCRLF & amp; VbCRLF strExplain = "Delete the registry key and deleting the value from the registry." & Amp; VbPara & amp; "The key must end with a backspace and no value." & Amp; VbPara & amp; "To type a key or delete value, start without parameters, or keep a key or value on the command line (use the inverted comma to move the key or value if there is space in it)." & Amp; VbPara & amp; "Continue" strTitle = "delete reg" key = "" set silent silence = "" set dim. Sh = WScript.CreateObject ("WScript.Shell") ReportErrors "Shell Creation" key = GetKey () If the key & lt ; & Gt; "" Then B = SR regress (key) if error Number = 0 then SR Regalit key if error Number = 0 then silent; & Lt; & Gt; "Yes" then the MSBBX key & amp; "Deleted", vbOKOnly + vbInformation, strTitle Else ReportErrors "DeletingKey" end if else Err.Number = -2147024893 Then Err.Clear MsgBox key & amp; "Expiration was not existent", vbOKOnly + vbCritical, strTitle Else ReportErrors "read before deleting the key" end if the end ends the report reporter "Main" function GetKey () Dim AG Set AG = Wscript.Arguments ReportErrors "Agrets Build "if AG calculation = 1 then GetKey = AG (0) mute =" yes "then Ag.Count> 1 then sgBox ". Try to attach a lot of parameters on the command line in a space important", vbOKOnly + vbCritical, strTitle then Ag.Count = 0 then MsgBox (strExplain, vbYesNo + vbInformation, strTitle) = 6 then GetKey = InputBox ( "Enter the value or key to delete." & Amp; vbPara & amp; "The key must end in a backspace", strTitle, strNamet1) end if the closing function sub-reportAprers (strModuleName) if err.number & lt; & Gt; 0 Then there was an error in "Msgbox" & amp; StrModuleName & amp; "Module of" & amp; Err.number & amp; "-" & amp; Err.description & amp; "Type", vbCritical + vbOKOnly, "Some Unexpected" Err.clear End Sub

Comments

Post a Comment

Popular posts from this blog

Pass DB Connection parameters to a Kettle a.k.a PDI table Input step dynamically from Excel -

-
Image
I have a requirement whenever I run my own kettle, dynamically took database connection parameters from an excel source Every run should go. I have an Excel column names: hostname, username, database, password. I want to pass these connection parameters to my table input stage dynamically whenever it runs the job. This is what I was trying to do. You can get it Connection parameters from the DB reading source (for example Excel or a CSV file in my example) < / Li> Store the parameters in the variable Using the variable in your connection's settings. Setting Variables Create another conversion for (you can not do it in the same conversion Uses): set variables element variable: The element that reads / writes your data creates a new connection and sets the connection parameter using $ {variable name_} Note that you will need to type in the field field in the field $ {password} Also keep in mind that this can be a security problem as the
Read more

multithreading - PhantomJS-Node in a for Loop -

-
I am trying to implement a screen-scraps application that opens a URL in which a parameter changes as it is for a loop: var data = [ '100', '101', '102', '103', '104']; (Var indexA = 0; indexA & lt; data.length; indexA ++) for {Phantom Generation ({'port': freeport}, function (pH) {ph.create page (function (page) {page.open ("http: //...++ data [index B] +" ... " , Status {console.log ("open site:" + data [index B], position); / * OLD * / indexB ++; page evaluation (function () {// page scrape and an object Return}, function {console.log (result.dataRequest); // here is the problem}); / * new and fixed * / indexB ++} first console Logs it: Open Site: 100 Success Opens Site: 101 Success B Ola Site: 102 Success Opening Site: 103 Success Opened Site: 104 Success Which is good. Data is verified in scrap HTML and from index to array Matches. So in page 101 I scrap '101 and retrieve' and pu
Read more

c++ - MATLAB .m file to .mex file using Matlab Compiler -

-
I know that it can speak as a very famous topic, but something that helps me with it Not found This scenario is: I have my functions function, no matter what's inside, it's a generic function that may depend on other toolboxes. Does. Has input and output; I want to generate the same myFun.mex function; : Lib myFun This way I get some new files: libmyfun.c libmyfun.dll Libmyfun.exp libmyfun.exports libmyfun .h libmyfun.lib Reading around and I think that Creating a myfun.cpp that is very famous is included: / * gateway function * / zero max function (ent NLHS, MXARRA * PLS [], int NRHS, CONST M Xeray * PHS []) Here is the Variable Deals * / / * code here * /} I have tried to do this and are called Regular of Max Generation: Max ('- v', 'myfun.cpp') But I get many errors, and I should say that my myfun.cpp copy / Paste Function is where I have a lot of doubts ... especially on input / output management. My q
Read more