Changeset 389 for FCKeditor/branches/developers/alfonsoml/editor/filemanager/connectors/asp/io.asp

Timestamp:

2007-06-23 22:51:49 (19 months ago)

Author:

alfonsoml

Message:

Patch for #561, provide the ConfigFileTypesAbsolutePath setting for asp.

Files:

• FCKeditor/branches/developers/alfonsoml/editor/filemanager/connectors/asp/io.asp (modified) (2 diffs)

FCKeditor/branches/developers/alfonsoml/editor/filemanager/connectors/asp/io.asp

@@ -34 +34 @@
 end Function
 
+Function GetResourceTypeDirectory( resourceType, sCommand )
+        if ( sCommand = "QuickUpload") then
+
+                if ( ConfigQuickUploadAbsolutePath.Item( resourceType ) <> "" ) then
+                        GetResourceTypeDirectory = ConfigQuickUploadAbsolutePath.Item( resourceType )
+                else
+                        ' Map the "UserFiles" path to a local directory.
+                        GetResourceTypeDirectory = Server.MapPath( ConfigQuickUploadPath.Item( resourceType ) ) 
+                end if
+        else
+                if ( ConfigFileTypesAbsolutePath.Item( resourceType ) <> "" ) then 
+                        GetResourceTypeDirectory = ConfigFileTypesAbsolutePath.Item( resourceType )
+                else
+                        ' Map the "UserFiles" path to a local directory.
+                        GetResourceTypeDirectory = Server.MapPath( ConfigFileTypesPath.Item( resourceType ) ) 
+                end if
+        end if
+end Function
+
 Function GetUrlFromPath( resourceType, folderPath, sCommand )
         GetUrlFromPath = CombinePaths( GetResourceTypePath( resourceType, sCommand ), folderPath )
@@ -43 +62 @@
 
 Function ServerMapFolder( resourceType, folderPath, sCommand )
-        ' Map the "UserFiles" path to a local directory.
         Dim sResourceTypePath
-        sResourceTypePath = Server.MapPath( GetResourceTypePath( resourceType, sCommand ) )
+        ' Get the resource type directory.
+        sResourceTypePath = GetResourceTypeDirectory( resourceType, sCommand ) 
 
         ' Ensure that the directory exists.