Changeset 766 for trunk/guitools/shared/smbtree.vrs

Timestamp:

Apr 5, 2013, 7:54:46 PM (12 years ago)

Author:

Herwig Bauernfeind

Message:

GUI-Tools: EVFSGUI 2.5, SMBMON 2.5 yet another place to fix Ticket #202

File:

• trunk/guitools/shared/smbtree.vrs (modified) (2 diffs)

trunk/guitools/shared/smbtree.vrs

@@ -280 +280 @@
 
             do while(left(line,1) = '09'x) /* Share loop */
-                parse var line '09'x share type comment
-                type = translate(strip(type))
-                comment = strip(comment)
+                share   = strip(substr(line,2,16))
+                type    = translate(strip(substr(line,17,10)))
+                comment = strip(substr(line,27,))
 
                 select
@@ -294 +294 @@
                 /* Now the machine receives the wakeup icon */
                 ok = VRMethod('CN_smbtree', 'SetRecordAttr', smbtree.!machine, 'Icon', "#35:PMWP.DLL")
+                
                 parent = smbtree.!machine
                 smbtree.!share = VRMethod( "CN_smbtree", "AddRecord",parent,, share||'0D0A'x||comment, res)