07.07.2011, 23:33 | #1 |
Новичок
Регистрация: 07.07.2011
Сообщений: 1
Вес репутации: 0
|
Неправильная кодировка на ASP
Поставил код.Ссылки на английском отображаются нормально. Ссылки на русском отображаются в виде кракозябр. На сайте установлена кодировка UTF-8, а в файл sape.inc пишется все с кодировкой windows-1251. Пытался изменить кодировку файла на utf-8 (в это время ссылка стала отображаться корректно),но через некоторое время файл перезаписался с прежней кодировкой win-1251. В самих файлах sapelinks.inc и sape.inc настроек по смене кодировки я не нашел.
Как можно решить данную проблему? Добавлено через 12 часов 35 минут Мдя... любителей asp, видимо, не много... Последний раз редактировалось GIFT; 07.07.2011 в 23:33. Причина: Добавлено сообщение |
08.07.2011, 00:01 | #2 |
Монстер
Регистрация: 30.12.2008
Адрес: Монстрополис
Сообщений: 2,496
Вес репутации: 372
|
ASP есть. Но везде стоит кодировка Win-1251. Думаю Вам надо лезть в код sapelinks.inc и разбираться как вывести текст в нужной кодировке. Там еще кажется на Джаве этот кусок.
А может проще перенастроить сайт?
__________________
|
18.10.2011, 18:36 | #3 |
Новичок
Регистрация: 18.10.2011
Сообщений: 2
Вес репутации: 0
|
Кто поможет решить проблему поставленную GIFT??
Насколько я понял эта строчка кода /set f = fso.OpenTextFile(incFileName,2,True,)/ отвечает за запись файла sape.inc, но в OpenTextFile нет возможности записать файл в UTF-8, что делать? |
20.11.2011, 07:19 | #4 |
Новичок
Регистрация: 18.10.2011
Сообщений: 2
Вес репутации: 0
|
меняем эту часть кода.
function saveIncFile(strg) on error resume next dim fso dim f set fso = Server.CreateObject("Scripting.FileSystemObject") set f = fso.OpenTextFile(incFileName,2,true) f.Write strg if err<>0 then saveIncFile = false response.write "Нет доступа на запись файла: " & incFileName & ". Выставите необходимые права на папку." exit function end if f.Close set f = Nothing set fso = Nothing saveIncFile = true end function на эту. function saveIncFile(strg) on error resume next dim fsof set fsof = Server.CreateObject("ADODB.Stream") fsof.Type = 2 fsof.Charset = "UTF-8" fsof.Open() fsof.WriteText(strg) fsof.SaveToFile incFileName,2 if err<>0 then saveIncFile = false response.write "Нет доступа на запись файла: " & incFileName & ". Выставите необходимые права на папку." exit function end if fsof.Close() set fsof = Nothing saveIncFile = true end function http://peckin.ru |
|
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Неправильная кодировка ссылок | vav | Ошибки при работе с системой | 21 | 25.03.2010 14:11 |
Неправильная сумма | Nullweb | Финансовые и юридические вопросы | 6 | 20.01.2010 20:41 |
Неправильная кодировка в тексте ссылок | Atmega64 | Вопросы от новичков | 4 | 07.09.2009 20:39 |
Неправильная кодировка ссылок | Blake | Вопросы от новичков | 5 | 13.08.2009 01:19 |
Неправильная кодировка ссылок | infopiter | Вопросы по работе системы | 22 | 25.07.2009 21:35 |
Часовой пояс GMT +3, время: 11:57.