Monday, November 08, 2010 at 12:02 AM.

---

system.verbs.apps.winShell.mapNetworkDrive

on mapNetworkDrive (drive, share) {
	local (s = string (winShell.data.scripts.mapNetworkDrive));
	
	bundle { //error checking
		on driveError () {
			scriptError ("Can't map " + share + " to " + drive + " because " + drive + " is not of the form Z:.")};
		
		if sizeOf (drive) != 2 {
			driveError ()};
		if drive [2] != ":" {
			driveError ()};
		if drive [1] < 'A' or drive [1] > 'z' {
			driveError ()};
		if drive [1] > 'z' and drive [1] < 'a' {
			driveError ()}};
	
	if share endsWith "\\" {
		share = string.delete (share, sizeOf (share), 1)};
	
	return (boolean (com.callScript (s, "VBScript", "Main", {drive, share})))};
bundle { //test code
	winShell.mapNetworkDrive ("F:", "\\\\Madrid\\D Drive");
		<<true
	winShell.mapNetworkDrive ("G:", "\\\\Madrid\\C Drive");
		<<true
	winShell.mapNetworkDrive ("G:", "\\\\Cobra\\Apache")}
		<<false

---

This listing is for code that runs in the OPML Editor environment. I created these listings because I wanted the search engines to index it, so that when I want to look up something in my codebase I don't have to use the much slower search functionality in my object database. Dave Winer.