by Erwin Hanzl » Wed Mar 06, 2019 2:38 pm
Hallo Pavle, GESCHAFFT
ZUSAMMENFASSUNG: Deine Code
Code: Select all
Doc.Add " <h3>"& sVar &" .. "&Rpad(itm.title,20) & ExtensionEH &" </h3></span>"
und
Code: Select all
Function Lpad(strInput, length)
Lpad = Right(space(length) & strInput, length)
LPad = Replace(Lpad," "," ")
end function
Function Rpad(strInput, length)
Rpad = Left(strInput & Space(length), length)
RPad = Replace(Rpad," "," ")
end function
im Zusammenhang mit dem Thema "PULSE" -style.css - Schriftart COURIER löst das Problem.
Code: Select all
body { font:12pt Courier, 'Segoe UI', 'Tahoma', Arial, sans serif;
Vielen Dank nochmals für Deine Mühe und Deine Geduld.
Hallo Pavle, GESCHAFFT
[b][color=#FF0000]ZUSAMMENFASSUNG: Deine Code [/color][/b]
[code] Doc.Add " <h3>"& sVar &" .. "&Rpad(itm.title,20) & ExtensionEH &" </h3></span>"[/code]
[b][color=#FF0000]und[/color][/b]
[code]Function Lpad(strInput, length)
Lpad = Right(space(length) & strInput, length)
LPad = Replace(Lpad," "," ")
end function
Function Rpad(strInput, length)
Rpad = Left(strInput & Space(length), length)
RPad = Replace(Rpad," "," ")
end function[/code]
[b][color=#FF0000]im Zusammenhang mit dem Thema "PULSE" -style.css - Schriftart [b]COURIER[/b] löst das Problem.[/color][/b]
[code]body { font:12pt Courier, 'Segoe UI', 'Tahoma', Arial, sans serif;[/code]
[URL=https://www.directupload.net][IMG]https://s17.directupload.net/images/190309/mlyl4zuw.jpg[/IMG][/URL]
Vielen Dank nochmals für Deine Mühe und Deine Geduld.