That's absolutely fine, though from a aesthetic view and for portability / ease of maintenance I'd prefer:

Code:
MapPrinter('\\Finasserver\2100_DLS')



Function MapPrinter($sPrinter)

   Dim $asPrinterBits

 

   $asPrinterBits=Split($sPrinterPath,"\")

 

   If KeyExist("HKEY_CURRENT_USER\Printers\Connections\,,"+$asPrinterBits[2]+","+$asPrinterBits[3])

      "Printer '"+$sPrinter+'" already present"+@CRLF

   Else

      If AddPrinterConnection($sPrinter)

         "Cannot add printer  '"+$sPrinter+"'"+@CRLF

         "Reason: ["+@ERROR+"] "+@SERROR+@CRLF

         Exit @ERROR

      Else

         "Printer '"+$sPrinter+"' succesfully added."+@CRLF

      EndIf

   EndIf

 

   Exit 0

 

EndFunction