Issue with tableborders

2 posts, 1 answers
  1. Jens
    Jens avatar
    11 posts
    Member since:
    Dec 2012

    Posted 12 Jan 2017 Link to this post

    Hello,

    i have an issue with WordsProcessing. After i have replaced text, borders from tables disappear.

     

    Public Function SetVorblatt() As String
           Dim cmsObj As New CsCms
           Dim dateiName As String = Titel.Replace(":", "").Replace("/", "").Replace("\", "").Replace("""", "")
           Dim containsAlleMa As Boolean = False
           Dim flowDocument As Telerik.Windows.Documents.Flow.Model.RadFlowDocument
           Dim docxProvider As New Telerik.Windows.Documents.Flow.FormatProviders.Docx.DocxFormatProvider
           Dim floDocEditor As Telerik.Windows.Documents.Flow.Model.Editing.RadFlowDocumentEditor
           Dim formulardaten As List(Of FormularData) = GetFormData()
           'Änderung vom 12.12.2016
           'Umstellung vom RTF auf DOCX
           'Änderung vom 02.09.2015
           'Prüfung, ob bei den Adressatenkreis "alle Mitarbeiter" ausgewählt wurde. Falls nicht, soll die Checkbos "wie folgend" befüllt werden
     
           Try
     
               If IsNothing(formulardaten) = False Then
                   Using input As New FileStream(AppSettings("serverMappath") & "\anwendungen\zav\formulare\RL-Vorlage_.docx", FileMode.Open)
                       flowDocument = docxProvider.Import(input)
                   End Using
     
                   floDocEditor = New Telerik.Windows.Documents.Flow.Model.Editing.RadFlowDocumentEditor(flowDocument)
     
                   For Each formData As FormularData In formulardaten
                       floDocEditor.ReplaceText(formData.Text, formData.Value & " ")
                       Logger.Trace(formData.Text & " :" & formData.Value)
                   Next
     
                   Using output As New FileStream(AppSettings("serverMappath") & "\anwendungen\sfo\vorblatt\" & dateiName & ".docx", FileMode.Create)
                       docxProvider.Export(flowDocument, output)
                   End Using
     
                   dateiName = AppSettings("serverMappath") & "\anwendungen\sfo\vorblatt\" & dateiName & ".docx"
               End If
     
           Catch ex As Exception
               Dim var As String = "Vorblatt wurde nicht erzeugt. dateiName:" & dateiName
               Logger.Error(var, ex)
           End Try
           Return dateiName
       End Function

     

    You can see it at the attachements. Have anyone an idea what i have made wrong?

    Best regards

    Jens

  2. Answer
    Mihail
    Admin
    Mihail avatar
    263 posts

    Posted 16 Jan 2017 Link to this post

    Hello Jens,

    As I have already answered you in the other support thread you have opened for this issue, we are not aware of any problems related to the import and export of borders in the context of DOCX format.

    You could provide a sample document which we will use to reproduce the described problem. Please be aware that the system will allow you to attach an archive file only to a support ticket.

    Regards,
    Mihail
    Telerik by Progress

Back to Top