Hi,
We are facing issue in one of our project having double space issue. Whenever user adds any description to Test case, it keeps on adding double blank lines:
Example(Before):
This is test.
This is test for the double blank spaces.
Example(now):
This is test.
This is test for the double blank spaces.
********************************************************
Code for Test_MoveTo is:
Sub Test_MoveTo
On Error Resume Next
'Test_Fields("TS_DESCRIPTION").Value= Replace (Test_Fields("TS_DESCRIPTION").Value, "</html>")
'Test_Fields("TS_DESCRIPTION").Value= Replace (Test_Fields("TS_DESCRIPTION").Value, "<html>")
'Test_Fields("TS_DESCRIPTION").Value=""
Text=Replace(Test_Fields("TS_DESCRIPTION").Value, "<Html> <Body>","",1)
Text=Replace(Text, "</Body> </HTML>","",1)
ignoreHtmlFormat=True
On Error GoTo 0
End Sub
We added IgnoreHTML=True because there was HTML tags appearing in Test case description field.
If I comment to the line ignoreHtmlFormat=True, double blank space space issue gets resolved, but HTML tags appear in the test case description field.
Please help.
Regards,
Bhushan Patil