Suddenly it came to my mind, how do you delete the files from the "filebrowser"?
- Is it just me, or is that function actually missing?
Ditto with deleting the folders you created?
Best regards,
Jeppe R.
- Is it just me, or is that function actually missing?
Ditto with deleting the folders you created?
Best regards,
Jeppe R.

Re: How to delete files from the "Filebrowser"?
Re: How to delete files from the "Filebrowser"?
- It shouldn't be that difficult to integrate, if you know which file to look in..
Have anybody already made a "patch" for this?
Re: How to delete files from the "Filebrowser"?
Change file "fckeditor\editor\filemanager\browser\default\frmresourceslist.html"
oListManager.GetFileRowHtml = function( fileName, fileUrl, fileSize )
{
// Build the link to view the folder.
var sLink = '<a href="#" onclick="OpenFile(\'' + ProtectPath( fileUrl ) + '\');return false;">' ;
var sLinkDelete = '<a href="#" onclick="DeleteFile(\'' + ProtectPath( fileUrl ) + '\');return false;">' ;
// Get the file icon.
var sIcon = oIcons.GetIcon( fileName ) ;
return '<tr>' +
'<td width="16">' +
sLink +
'<img alt="" src="images/icons/' + sIcon + '.gif" width="16" height="16" border="0"><\/a>' +
'<\/td><td> ' +
sLink +
fileName +
'<\/a>' +
'<\/td><td align="right" nowrap> ' +
fileSize +
' KB ' + sLinkDelete + ' del</a>' +
'<\/td><\/tr>' ;
}
add this function
function DeleteFile( fileUrl )
{
if (confirm("Delete this file ?") == true)
{
oConnector.SendCommand( 'RemoveFile','DeleteFileName=' + encodeURI( fileUrl ).replace( '#', '%23' ) , DeleteFileCallBack ) ;
}
}
function DeleteFileCallBack( fckXml )
{
window.parent.frames['frmResourcesList'].Refresh() ;
}
==========================================
===========================================
============================================
add subrutine file "fckeditor\editor\filemanager\connectors\asp\commands.asp"
'============================
'Modificacion de Jose Bressan
' Para Eliminar un archivo
'============================
Sub RemoveFile(resourceType, currentFolder)
Dim sDeleteFileName
Dim oFS
sDeleteFileName = Request.QueryString( "DeleteFileName" )
sDeleteFileName = Server.MapPath(sDeleteFileName)
Set oFS = Server.CreateObject("Scripting.FileSystemObject")
If oFS.FileExists(sDeleteFileName) = True Then
oFS.DeleteFile sDeleteFileName, True
end if
Set oFS = Nothing
End Sub
==========================================
===========================================
============================================
change file "fckeditor\editor\filemanager\connectors\asp\connector.asp"
' Execute the required command.
Select Case sCommand
Case "GetFolders"
GetFolders sResourceType, sCurrentFolder
Case "GetFoldersAndFiles"
GetFoldersAndFiles sResourceType, sCurrentFolder
Case "CreateFolder"
CreateFolder sResourceType, sCurrentFolder
Case "RemoveFile"
RemoveFile sResourceType, sCurrentFolder
End Select
==========================================
===========================================
============================================
change file "fckeditor\editor\filemanager\connectors\asp\config.asp"
Dim ConfigAllowedCommands
ConfigAllowedCommands = "QuickUpload|FileUpload|GetFolders|GetFoldersAndFiles|CreateFolder|RemoveFile"
==========================================
==========================================
==========================================
that all, enjoy
jbressan
Re: How to delete files from the "Filebrowser"?
Re: How to delete files from the "Filebrowser"?
Re: How to delete files from the "Filebrowser"?
''' <summary>
''' Deletes the submitted file from server
''' </summary>
''' <param name="sFileName">Full name of file to be deleted</param>
''' <returns>true if deleted, false if not</returns>
''' <remarks></remarks>
Function DeleteFile(ByVal sDosyaAdi As String) As Boolean
DeleteFile = False
Try
File.Delete(sFileName)
DeleteFile = True
Catch ex As Exception
End Try
End Function
Re: How to delete files from the "Filebrowser"?
Re: How to delete files from the "Filebrowser"?