Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Скриптовые языки программирования > PHP
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 20.06.2016, 14:39   #1
Moonleen
 
Регистрация: 09.06.2016
Сообщений: 3
По умолчанию Кодировка шапки таблицы при экспорте в Excel

Доброго дня!
Такая проблема - данные, которые выводятся в результате запроса, в Excel в нормальной кодировке, но вот шапка, которая формируется с помощью функции - нет. Как надо дополнить функцию, чтобы и шапка выводилась в нормальной кодировке?
PHP код:
<?php
include_once("db.php");
mysql_query("SET NAMES 'cp1251'");
$qry_data=mysql_query("SELECT * FROM date where ".$_POST['pole']." LIKE '".$_POST['poisk']."%'");
function 
xlsBOF() {
echo 
pack("ssssss"0x8090x80x00x100x00x0);
return;
}
function 
xlsEOF() {
echo 
pack("ss"0x0A0x00);
return;
}
function 
xlsBuatBaris($data$Col$Value) {
echo 
pack("sssss"0x20314$data$Col0x0);
echo 
pack("d"$Value);
return;
}
function 
xlsBuatLabel($data$Col$Value ) {
$L strlen($Value);
echo 
pack("ssssss"0x204$L$data$Col0x0$L);
echo 
$Value;
return;
}
header("Pragma: public");
header("Expires: 0");
header("Cache-Control: must-revalidate, post-check=0, pre-check=0");
header("Content-Type: application/force-download");
header("Content-Type: application/octet-stream");
header("Content-Type: application/download");
header("Content-Disposition: attachment;filename=employee.xls ");
header("Content-Transfer-Encoding: binary ");

xlsBOF();

xlsBuatLabel(0,0,"Отчет");

xlsBuatLabel(2,0,"Наименование контрагента");
xlsBuatLabel(2,1,"Дата");
xlsBuatLabel(2,2,"ФИО водителя");
xlsBuatLabel(2,3,"Номер договоренности");
xlsBuatLabel(2,4,"Номер товарной накладной");
xlsBuatLabel(2,5,"Дата выгрузки");
xlsBuatLabel(2,6,"Название транспортной компании");


$xlsRow 3;

while(
$data=mysql_fetch_array($qry_data)){
xlsBuatLabel($xlsRow,0,$data['nazvkontragent']);
xlsBuatLabel($xlsRow,1,$data['date']);
xlsBuatLabel($xlsRow,2,$data['fiovoditel']);
xlsBuatLabel($xlsRow,3,$data['nomdoverenost']);
xlsBuatLabel($xlsRow,4,$data['nomtovnakl']);
xlsBuatLabel($xlsRow,5,$data['datevagruzki']);
xlsBuatLabel($xlsRow,6,$data['nazvtranspcomp']);

$xlsRow++;
}

xlsEOF();
exit();
?>
Moonleen вне форума Ответить с цитированием
Старый 20.06.2016, 16:21   #2
ADSoft
Старожил
 
Регистрация: 25.02.2007
Сообщений: 4,160
По умолчанию

Сам файл скрипта должен совпадать по кодировке с кодировкой содержимого
ADSoft вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
БД, подписывать группы при экспорте grom333 БД в Delphi 6 08.02.2012 23:12
Взаимодействие с ячейками при экспорте в Excel ZHDN Общие вопросы Delphi 0 28.07.2011 18:46
При экспорте базы в Excel выводит везде первое значение Aleksandr Общие вопросы Delphi 1 25.04.2011 12:07
не выводяться загловки при экспорте Daur Общие вопросы Delphi 0 16.05.2010 16:15
При экспорте в EXCEL должны поподать свежие данные GhostBZ БД в Delphi 4 02.09.2009 15:35