LibreOffice 7.5 Help
рдЕрд╡рд╕реНрдерд┐рдд рдлрд╛рдЗрд▓ рд╡рд╛ рдбрд╛рдЗрд░реЗрдХреНрдЯрд░реА рдкреБрди: рдирд╛рдордХрд░рдг рдЧрд░реНрджрдЫ ред
рд╕реНрдЯреНрд░рд┐рдЩрдорд╛ рдирд╛рдо рдкреБрд░рд╛рдиреЛ рдирд╛рдордХреЛ рд░реВрдкрдорд╛ рд╕реНрдЯреНрд░рд┐рдЩрдорд╛ рдирдпрд╛рдБ рдирд╛рдо
рдкреБрд░рд╛рдиреЛ рдирд╛рдо, рдирдпрд╛рдБ рдирд╛рдо:рдХреБрдиреИ рд╕реНрдЯреНрд░рд┐рдЩ рдЕрднрд┐рд╡реНрдпрдХреНрддрд┐ рдЬрд╕рд▓реЗ рдорд╛рд░реНрдЧ рд╕рдорд╛рд╡реЗрд╢ рдлрд╛рдЗрд▓ рдирд╛рдо рдирд┐рд░реНрджрд┐рд╖реНрдЯ рдЧрд░реНрджрдЫ, рдорд╛рд░реНрдЧ рд╕рдорд╛рд╡реЗрд╢ рдЧрд░реНрджрд╛ ред рддрдкрд╛рдИрдБ URLрд╕рдЩреНрдХреЗрдд рдкреНрд░рдпреЛрдЧ рдЧрд░реНрди рдкрдирд┐ рд╕рдХреНрдиреБрд╣реБрдиреНрдЫ ред
Sub ExampleReName
On Error GoTo Error
FileCopy "c:\autoexec.bat", "c:\temp\autoexec.sav"
Name "c:\temp\autoexec.sav" As "c:\temp\autoexec.bat"
End
Error:
If err = 58 Then
рд╕рдиреНрджреЗрд╢ рдмрд╛рдХрд╕ "рдлрд╛рдЗрд▓ рдкрд╣рд┐рд▓реЗ рдиреИ рдЕрд╡рд╕реНрдерд┐рдд рдЫ"
End If
End
End Sub