Solved it!!

I added a couple of lines to the "MapDrive" function and, voila!

Here's the code I used:


$srvr = @LSERVER
$q_log_path = $srvr + "\netlogon\Folders.txt"
Function MapDrive($drives,$resource)
   DIM $LastDrive,$drive   
   $drives = split($drives,",")
   $lastdrive = $drives[ubound($drives)]
   for each $drive in $drives
                $drive = $drive + ":"
                IF $drive = ":"
                   exit(1)
                ENDIF
      use $drive $resource
      if @error = 0
         $mapdrive = $drive
         exit(0)
      endif
      if $drive = $lastdrive
         $mapdrive = "N/A"
         exit(1)
      endif
   next
EndFunction

$quota_drive = $srvr + "\"
OPEN(5,$q_log_path,3)
  WHILE @ERROR = 0
  $X = ReadLine(5)
   IF $X = ""
     CLOSE(5)
     Goto Eof
   ENDIF
  $Mapped_drv = $quota_drive + $X
  MapDrive("g,h,i,j,k,l,m,n,o,p,q,r,s,t,u,v,w,x,y,z","$Mapped_drv")
  LOOP
CLOSE(5)
:Eof


//Frippe

[ 26 January 2002: Message edited by: Frippe ]

[ 26 January 2002: Message edited by: Frippe ]