vbscript - Duplicating a complex folder structure with only shortcuts -


There are two shared drives, one of these is a very complex folder structure. I would like to repeat the entire folder structure to share 1 to share 2. But I do not want to create a duplicate file, but instead I want to present a shortcut or symbolic link in the other part. I tried to do this with existing tools like Robocopy and Emklink and failed to get results. Any idea to solve this issue has been highly appreciated.

You have to work it under the Filesystemobject folder structure, If the folder is present in the destination, do nothing and create a shortcut for all the hosting folders files in that folder otherwise create a folder and create a shortcut for the hosting files anyway.

Dofolder This is like the following by all subfolders: GetFN function only collects file names of all files in the hosting folder. That if the file name contains some time

it was a fun program to write, thanks.

FolderShadows.vbs 

  dim fosco, hostfolder, destfolder 'host folder - folder should be present. HostFolder = "C: \ from \ Folder" Destination Folder - The folder must exist. DestFolder = 'D: \ "folder for FSO set = CreateObject (" Scripting.FileSystemObject ") DoFolder fso.GetFolder (HostFolder) are sub DoFolder (folder) dim subfolders (fso.GetAbsolutePathName (folder), fso.folderexists HostFolder, DestFolder) = false then fso.createfolder (Replace (fso.GetAbsolutePathName (folder), HostFolder, DestFolder)) then Folder.SubFolders DoFolder subfolders for each file in each subfolder Folder.Files Dim file name in the next slow file For, if shortcut (fso.fileexists (change (fso.GetAbsolutePathName (folder), HostFolder, DestFolder) & amp; "\" & GetFN (File.Name) & amp; .lnk ") false =) then rename the file name = (fso.GetAbsolutePathName (folder), hostfolder, destfolder) & amp;" \ "& amp; GetFN (File.Name) & amp;" .lnk "shortcut = set Set the object ("WScript.Shell"). CreateShortcut (FileName) shortcut. Description = "shortcut to" & file name. Shortcut. Target = phso.getAbsolutePathName (folder) & amp; "\" & Amp; File Name shortcut.Save end then the next End Sub function GetFN (filename) dim result, I get the result = filename = I = InStrRev (file name, ".") Then (i & gt; 0) Then the result = middle (filename, 1, i - 1) end if GetFN = the result terminator function   
  note : this script is on automatic schedule Because it is designed to auto-update shortcuts and folders if new files / folders are found

Comments

Post a Comment

Popular posts from this blog

Java - Error: no suitable method found for add(int, java.lang.String) -

I'm in the middle of homework work and I'm stuck. At this point in my code, I think that I should have a GUI window that opens and allows me to type "inserted text number". Notice is not going anywhere but at this point, If I pass through the problem then it will be in a linked list. I am getting two of the same error for the lines. Add (index, element); And I can not seem to get past it, there is no suitable method for the error "add (int, java. string string)". Code is below, please advise. To clarify - this will not be a method error because it is a linked list. There should not be any way involved. import java.awt. *; Import java.awt.event. *; Import javax.swing. *; Import java.util. *; Import java.util.Scanner; Import java.util.LinkedList; Public class TopTenList JFrame {Private TopTenList tt; See the Private JTextArea list; Private JTextField cmdTextField; Private JTextField resultsTestfield; // This GUI window is the code for the public toptist...
Read more

java - JPA TypedQuery: Parameter value element did not match expected type -

I am using JPA 2.0 and getting the following code in the DAO layer: Public Zero Test () {string key = "status"; String [] Conditions = {"A", "B"}; & Lt; TestTable & gt; Results = Search (Keys, Conditions); } Public listing & lt; TestTable & gt; Search (string key, object value error) {string sql = "test ndf to testlet and jade nand." + Key + "in:" + key; TypedQuery & LT; TestTable & gt; Query = entityManager.createQuery (SQL, TestTable.class); Query.setParameter (key, Arrays.asList (valueArr)) / *** Error Line *** Return query.getResultList (); } In the above error line, it throws the following exception: java.lang.IllegalArgumentException: parameter value element [[Ljava.lang.String; @ cbe5bc] did not match the expected type [java.lang.String] Why is this expected type string while actually this string []? Please help! Note: This is derived from the normal routine and is a simplified code. I can no...
Read more

c++ - static template member variable has internal linkage but is not defined -

Yes, I know, there is a question with almost the same title, but it refers to a different situation. Error message) In my case, I have a .cpp file with a big named designation name (implementation details). There is a property class template with a static data member in that name space, which I need to access from outside the unknown namespace. I give it a little bit of meat: file.hpp namespace Bar {template & lt; Typename A & gt; Struct foo {static_assert (is_same & lt; a, float & gt; :: value} is_same & lt; a, double>: value, ""); Fixed zero set_static_var (a const & x); // ...}; } and file.cpp namespace {template & lt; Typename A & gt; Struct foo_traits {// supports the implementation of several static code bars: foo & lt; & Gt; Fixed A data; }; The template's & lt; & Gt; Float foo_traits & lt; Float & gt; :: datum; // No change if this is in the global namespace template & lt; & Gt; Doub...
Read more