Just a few pointers:
 Code:
$KeyName = ENUMKEY("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\NetCache\Shares\", $Index)
You can use "HKCU" instead of the full "HKEY_CURRENT_USER" to shorten your code, also the trailing "\" isn't neccesary.

Not entirely sure about this one but
 Code:
    CASE $Migstat <> 1
I think makes
 Code:
    CASE 1
obsolete.

Also you can shorten your code further by eliminating spaces
 Code:
$RetCode = WSHPipe("csccmd /MOVESHARE:\\" + $CSCSrv + "\" + $CSCShr + " \\" + $NewSrv + "\" + $CSCShr,1)

would look like this
 Code:
$RetCode = WSHPipe("csccmd /MOVESHARE:\\"+$CSCSrv+"\"+$CSCShr+" \\"+$NewSrv+"\"+$CSCShr,1)

Edited by apronk (2008-03-14 10:08 AM)
Edit Reason: added last suggestion