SetRTFControl Throws Exception when RTF File is ReadOnly - D-Tools Forum

06-24-2009, 12:19 PM

I have several reports where I integrate signatures and cover letters that are attached to the Project folder. The ReportUtilities.SetImage method works great in all cases however the following will throw an exception if the referenced RTF file is Read-Only.

ReportUtilities.SetRTFControl(rpt,"GroupHeader1"," txtCoverLetter",coverLetterPath)

Everything works fine as long as the Project is checked out. But when the Project is Checked-In all files on the local machine are set to Read-Only. So I can't run these reporrts without first checking out the Project.

Does anyone know know how to how to test the file attribute for Read-Only and set ReadOnly to false during the report invocation?

-ch

nkarthick · 06-24-2009, 02:03 PM

I have updated the script code. Please include the below code before assigning the RTF document in to the RichTextBox control.

Note: new code is encapsulated with in '*****' symbols.

Code:

  filePath = System.IO.Path.Combine(projectFolderNodeIist(0).InnerText, fileName)
        
'*************************************************
          Dim fileDetail As System.IO.FileInfo = My.Computer.FileSystem.GetFileInfo(filePath)

        If (fileDetail.IsReadOnly  AndAlso System.IO.File.Exists(filePath)) Then
           	System.IO.File.SetAttributes(filePath, System.IO.FileAttributes.Normal)
        End If

    '*********************************************************
         'Load the RTF file
         ReportUtilities.SetRTFControl(rpt,"Detail1","txtScopeofWork",filePath)

Hope it helps.

06-24-2009, 02:25 PM

Thanks nkarthick!

I saw the SetAttributes method in my searching, but was not sure how to apply it properly.

I took your advice and now use a hidden field (dtr:ProjectFolder) to establish a path to the project folder. It works great.

-ch

06-24-2009, 10:49 PM

Yep, worked great. If it was set to ReadOnly I set it back at the end of the report as well.

Thanks again.

-ch