Назад | Перейти на главную страницу

Как установить шрифты на Windows Web Server 2008 R2

Я хочу установить Arial на наши веб-серверы. Просто нужно добавить, это потому, что мы генерируем отчеты на стороне сервера и делаем их доступными в нескольких загружаемых форматах (Excel, PDF и т. Д.), Следовательно, необходимо установить шрифты на сервере.

У меня есть консольный доступ к нашей веб-ферме, и с сервера я скопировал файлы .ttf и поместил их в папку c: \ fonts. Затем я запускаю на сервере следующий сценарий VBScript.

' VBScript to install fonts on Blade Servers

' Arial font-family

Set objShell = CreateObject("Shell.Application")
Set objFolder = objShell.Namespace("c:\fonts")
Set objFolderItem = objFolder.ParseName("arial.ttf")
objFolderItem.InvokeVerb("Install")

Set objShell = CreateObject("Shell.Application")
Set objFolder = objShell.Namespace("c:\fonts")
Set objFolderItem = objFolder.ParseName("arialbd.ttf")
objFolderItem.InvokeVerb("Install")

Set objShell = CreateObject("Shell.Application")
Set objFolder = objShell.Namespace("c:\fonts")
Set objFolderItem = objFolder.ParseName("arialbi.ttf")
objFolderItem.InvokeVerb("Install")

Set objShell = CreateObject("Shell.Application")
Set objFolder = objShell.Namespace("c:\fonts")
Set objFolderItem = objFolder.ParseName("ariali.ttf")
objFolderItem.InvokeVerb("Install")

Set objShell = CreateObject("Shell.Application")
Set objFolder = objShell.Namespace("c:\fonts")
Set objFolderItem = objFolder.ParseName("ariblk.ttf")
objFolderItem.InvokeVerb("Install")

msgbox "Fonts installed"

Я получаю окно сообщения, но не всплывающих окон установки шрифтов, как при запуске этого скрипта на рабочем столе. Шрифты не устанавливаются, они не уверены в диалоге выбора шрифта в блокноте (на веб-сервере), и мы получаем исключение asp.net «Font 'Arial' not be found.». Также перезапустили сервер.

Я также попытался скопировать файлы .ttf в папку c: \ windows \ fonts и перезапустить сервер.

Что мне нужно сделать, чтобы установить шрифты на Windows Web Server 2008 R2?