O FCKeditor é um editor HTML WYSIWYG para Web, pode rodar em qualquer site, com suporte a Javascript, PHP, ASP.NET, ASP, Coldfusion, e muitas outras linguagens.

Um dos poréns do FCKeditor, é que tudo que está no servidor não pode ser deletado através do browser padrão. Algumas vezes, para o usuário final usar o FTP para esta tarefa, não é a melhor opção.

Há a opção de usar o CKFinder, que é um browser avançado para o FCKeditor, mas custa no mínimo U$ 59,00 para um Website.

Outra opção é modificar o código do FCKeditor, e adicionar a opção para remover arquivos pelo browser padrão. Uma destas soluções é apresentada pelo blog bram.us (de um belga que adora falar na terceira pessoa), utilizando PHP e o TinyFCK (mistura de TinyMCE e FCKeditor), porém, pode ser usada tranquilamente no FCKeditor normal, assim como eu fiz, em ASP normal.

Acessando o tutorial do blog bram.us e seguindo o passo-a-passo apresentado, é possível adicionar o ícone de deletar os arquivos no servidor em PHP.

Para fazer o mesmo processo em ASP, é só usar a função abaixo no arquivo connectors/asp/commands.asp

Sub DeleteFile( resourceType, currentFolder )
    Dim sErrorNumber
    sErrorNumber = 0
    Dim sErrorMsg

    Dim sServerDir
    sServerDir = ServerMapFolder( resourceType, currentFolder )

    dim sCurrFolder
    sCurrFolder = Request.QueryString("CurrentFolder")
    dim sFileName
    sFileName = Request.QueryString("FileName")
    dim sFilePath
    sFilePath = "c:/Inetpub/wwwroot/"&sCurrFolder&sFileName

    Dim myFSO
    SET myFSO = Server.CreateObject("Scripting.FileSystemObject")
    If myFSO.FileExists(sFilePath) Then
        myFSO.DeleteFile(sFilePath)
        sErrorNumber = "0"
    Else
        sErrorNumber = "102"
        sErrorMsg = "File not found"
    End If
    SET myFSO = NOTHING

    response.Write("<Error number=""" & sErrorNumber & """ originalDescription=""" & ConvertToXmlAttribute( sErrorMsg ) & """ />")
End Sub

Lembre-se de ajustar o caminho para os arquivos no servidor na variável sFilePath.


Technorati : , ,