Saving a from via WebDAV

OyezForms application-level macros are intended to extend program functionality using external code. One possible area is saving via HTTP using WebDAV standards.

Capturing the FILE>SAVE event

The following sax-basic code captures the save event and instantiates and external object See c# code example, below. Note: .GetUserStorageFolder() was implemented in OyezForms v10.00n.

Public Sub Application_SaveOLF(App As OyezLegalFormsApp) 'check if user has changed the form's content If App.IsFormModified = True Then Set wd = CreateObject("webDavDll.webdaviface") Dim fullPath As String fullpath = App.GetUserStorageFolder + wd.randomfilename App.SaveLegalFormAs(fullpath) If(wd.UploadFile("http://<server name>",fullPath)) Then MsgBox "WebDav Upload Successful" App.CloseLegalForm Else MsgBox "There Was an Error" End If End If End Sub

Simple c# WebDAV PUT

The above script triggers COM-visible C# code, below. This simple proof-of-concept example offers no user interaction, and saves the form to a remote web location using the PUT verb.

using System;
using System.Collections.Generic;
using System.Text;
using System.IO;
using System.Runtime.InteropServices;
using System.Web;
using System.Net;

namespace webDavDll
{

public interface WebDavDLL
    {
        string randomfilename();
        bool UploadFile(string url, string filePath);
    }

[ComVisible(true)]
    [ClassInterface(ClassInterfaceType.None)]
    public class webdaviface : WebDavDLL
    {
        //upload to webdav
        [ComVisible(true)]
        public bool UploadFile(string url, string filePath)
        {
            try
            {
                if (!File.Exists(filePath))
                {
                    return false;
                }

string filename = Path.GetFileName(filePath);

long fileLen = new FileInfo(filePath).Length;

HttpWebRequest Request = (HttpWebRequest)HttpWebRequest.Create(url + @"/" + filename);

//Request.Credentials = mCredentials;
                Request.Method = WebRequestMethods.Http.Put;

Request.ContentLength = fileLen;
                Request.SendChunked = true;

// Specify that overwriting the destination is allowed.
                Request.Headers.Add(@"Overwrite", @"T");
                Request.AllowWriteStreamBuffering = true;

System.IO.Stream stream = Request.GetRequestStream();

FileStream fileStrem = new FileStream(filePath, FileMode.Open, FileAccess.Read);

int transferRate = 4096;
                byte[] data = new byte[transferRate];
                int read = 0;
                long totalRead = 0;

try
                {
                    do
                    {
                        read = fileStrem.Read(data, 0, data.Length);
                        if (read > 0)
                        {
                            totalRead += read;
                            stream.Write(data, 0, read);
                        }
                    } while (read > 0);
                }
                catch (Exception ex)
                {
                    throw ex;
                }
                finally
                {
                    stream.Close();
                    stream.Dispose();
                    stream = null;

fileStrem.Close();
                    fileStrem.Dispose();
                    fileStrem = null;
                }

HttpWebResponse Response;
                try
                {
                    Response = (HttpWebResponse)Request.GetResponse();
                }
                catch (WebException e)
                {
                    if (e.Response == null)
                    {
                        //MessageBox.Show("Error accessing Url " + url);
                        throw;
                    }

HttpWebResponse errorResponse = (HttpWebResponse)e.Response;

//if the file has not been modified
                    if (errorResponse.StatusCode == HttpStatusCode.NotModified)
                    {
                        e.Response.Close();
                        return false;
                    }
                    else
                    {
                        e.Response.Close();
                        //MessageBox.Show("Error accessing Url " + url);
                        throw;
                    }
                }
                //This case happens if no lastmodedate was specified, but the specified
                //file does exist on the server. 
                Response.Close();

if (totalRead == fileLen)
                {
                    return true;
                }
                else
                {
                    return false;
                }
            }
            catch (Exception exp)
            {
                return false;
                //MessageBox.Show(exp.ToString());
            }

}

// Generate random filename
        [ComVisible(true)]
        public string randomfilename()
        {
            //string filename;
            Guid uniqueID = Guid.NewGuid();
            
            string filename = uniqueID.ToString()+".otemp";
            
            if (File.Exists(filename))
            {
                randomfilename();
            }

return filename;
        }
    }
}

Saving a from via WebDAV

Capturing the FILE>SAVE event

Simple c# WebDAV PUT

See also