为加密的word文档实现webdav

时间:2016-02-11 10:24:05

标签: http encryption webdav

我需要在我的应用程序中实现webdav。因此用户可以编辑word文档,而无需下载并将其上传到服务器。但是,现在问题是,保存在webdav服务器上的文档是加密的。是否可以将webdav用于加密文件?

或者换句话说,是否可以对加密文件进行http-GET请求 2080.enc(实际上加密了word文档)

[GET] /DAV/2016/02/2080.enc

并获取一个解密的文件word文档作为响应,所以我可以编辑word文档?非常感谢

问候

=============================================== ================

=============================================== ================

这实际上是问题..

在客户端,我将下载存储在webdav服务器上的文档,如下所示

Imports System.Speech.Recognition
Imports System.Speech
Imports System.Threading
Imports System.Globalization
Imports System
Public Class Form1
Dim r As Integer = 0
Dim r2 As Integer = 0
Dim r1 As Integer = 0
Dim r3 As Integer = 0
' recogniser & grammar
Dim recog As New SpeechRecognizer
Dim gram As Grammar
' events
Public Event SpeechRecognized As  _
    EventHandler(Of SpeechRecognizedEventArgs)
Public Event SpeechRecognitionRejected As  _
    EventHandler(Of SpeechRecognitionRejectedEventArgs)
' word list
Dim wordlist As String() = New String() {"Yes", "No", "Maybe", "Next", "Visual studio", "Unity", "Construct 2", "Game Maker"}
' word recognised event
Public Sub recevent(ByVal sender As System.Object, _
        ByVal e As RecognitionEventArgs)

    If (e.Result.Text = "Next") Then
        SendKeys.Send("{ENTER}")
    End If
    If (e.Result.Text = "Visual studio" AndAlso r1 = 0) Then
        System.Diagnostics.Process.Start("C:\Program Files (x86)\Microsoft Visual Studio 12.0\Common7\IDE\devenv.exe")
        r1 = 1
    End If
    If (e.Result.Text = "Unity" AndAlso r = 0) Then
        System.Diagnostics.Process.Start("C:\Program Files\Unity\Editor\Unity.exe")
        r = 1
    End If
    If (e.Result.Text = "Construct 2" AndAlso r2 = 0) Then
        System.Diagnostics.Process.Start("C:\Program Files\Construct 2\Construct2.exe")
        r2 = 1
    End If
    If (e.Result.Text = "Game Maker" AndAlso r3 = 0) Then
        System.Diagnostics.Process.Start("C:\Users\moradi\GameMaker 8.1\GameMaker.exe")
        r3 = 1
    End If
End Sub
' recognition failed event
Public Sub recfailevent(ByVal sender As System.Object, _
        ByVal e As RecognitionEventArgs)

End Sub
' form initialisation
Private Sub Form1_Load(ByVal sender As System.Object, _
        ByVal e As System.EventArgs) Handles MyBase.Load

    ' need these to get British English rather than default US
    Thread.CurrentThread.CurrentCulture = New CultureInfo("en-GB")
    Thread.CurrentThread.CurrentUICulture = New CultureInfo("en-GB")
    ' convert the word list into a grammar
    Dim words As New Choices(wordlist)
    gram = New Grammar(New GrammarBuilder(words))
    recog.LoadGrammar(gram)
    ' add handlers for the recognition events
    AddHandler recog.SpeechRecognized, AddressOf Me.recevent
    AddHandler recog.SpeechRecognitionRejected, AddressOf Me.recfailevent
    ' enable the recogniser
    recog.Enabled = True
End Sub
End Class

但是,网址必须是包含域名的完整路径,例如http://webdavserver.com/2016/02/2080.doc ..

如果是word文档(2080.doc),它可以正常工作,但实际存储在服务器中的是2089.doc但是2080.sec(enrcypted word document)

如果它不是word文档,则函数EditDocument将无法读取该文件。稍后通过保存文件,它也必须加密

你能理解我的问题吗?我该怎么办?

由于

0 个答案:

没有答案