in reply to Re^3: server login
in thread server login

Also one other question regarding the use. Before to mounts to each server it says "System error 55 has occurred. The specified network resource or device is no longer available." It connects and searches the drives as though nothing went wrong.

Replies are listed 'Best First'.
Re^5: server login
by NetWallah (Canon) on Feb 29, 2012 at 16:19 UTC
    Yes - I'd recommend DISCONNECTING the drive after using it, as indicated in my first post.

    Your "System Error 55" is probably a result of NOT disconnecting, and trying to re-connect, (attempting to re-connect to an existing network drive)

    I'd suggest checking if the path exists (use the perl "-e" operator). Run the "NET USE" command only if the path does not already exist.

                “PHP is a minor evil perpetrated and created by incompetent amateurs, whereas Perl is a great and insidious evil perpetrated by skilled but perverted professionals.”
            ― Jon Ribbens

      How would I go about with the diconnecting the drive? Would I use the same command as you listed in the first post?
        net use z: /d

        Where z: is the drive you wish to disconnect.

        net use /help

        Provides basic help, and instructions for getting more help on specific functions.

      You can disregard my last note. I was able to implement the disconnent. However I still get the system error 55? Any idea where else this could be being thrown from, or how I could fix it? The new code is located below. Thank you for all of your help this far. It is very much appreciated.
      foreach $server ( @servers ) { if( $found == 0 ) { if( -e "\\\\$server\\C\$\\" ) { print "\n\nServer is already linked\n\n"; find( \&finddata, "\\\\$server\\c\$\\VoiceGenie\\mp\\logs\ +\" )or warn "Could not enter the specified path \\\\$server\\ +c\$\\VoiceGenie\\mp\\logs\\.\n"; #Function that allows the use of Fil +e::Find. } else { print "\n\nServer not linked connecting now\n\n"; qx|net use \\\\$server\\C\$\\VoiceGenie\\mp\\log $ServerP +assword /user:$username|; find( \&finddata, "\\\\$server\\c\$\\VoiceGenie\\mp\\logs\ +\" ) or warn "Could not enter the specified path \\\\$server\\ +c\$\\VoiceGenie\\mp\\logs\\.\n"; #Function that allows the use of Fil +e::Find. qx|net use \\\\$server\\C\$\\VoiceGenie\\mp\\log /D|; } } }
        Google the error message.

        I see reports of this message appearing in Ctrix servers.

        One possible corrective action seems to be to map to the root of the drive (C$), then access sub-directories.

        Another google hit indicates this may be cause by cache config, if the remote server is Linux-based Samba.

                    “PHP is a minor evil perpetrated and created by incompetent amateurs, whereas Perl is a great and insidious evil perpetrated by skilled but perverted professionals.”
                ― Jon Ribbens