word
这是WORD排版的范例,大标题,二标题,接着左右分左右两边段落。可以应用在在线排版系统,但是系统一定要是Windows + MSOffice。
$word = new COM("word.application") or die("无法启动 Word 程序!");$word->Visible = 0;$n=$word->Documents->Add();## 分节符号$n->Sections->Add($word->Selection->Range,0);## Sections(1)第一小节$s1=$n->Sections(1);$s1->PageSetup->BottomMargin=10;## Paragraphs(1) 第一段落$s1->Range->InsertBefore("企鹅帝国元年-诗词多首排版测试");$s1->Range->InsertParagraphAfter;$s1->Range->InsertBefore("大标题-诗词歌赋\n");$Para=$n->Paragraphs(1);$Para->Alignment=1;$font_style=$Para->Range;$font_style->Font->size =14;$font_style->Font->Name="标楷体";$Para=$n->Paragraphs(2);$Para->Alignment=2;$font_style=$Para->Range;$font_style->Font->size =10;$font_style->Font->Name="新宋体";$p=$n->Sections(2);$obj=$p->PageSetup;$Col=$obj->TextColumns;$Col->SetCount(2);$p->Range->InsertAfter("席慕容像一颗随风吹送的种子我想 我或许是迷了路了这个世界 绝不是那当初曾经允诺给我的蓝图可是 已经有我的泪水查找原来的自己而走出人群洒在山径上了 已经有我暗夜里的梦想在森林中滋长我的渴望和我的爱像花朵般绽放过又隐没了而在水边清香的荫影里还留着我无邪的心留着我所有的迟疑惶恐 却无法再更改的脚印汲江煎茶 苏轼活火仍仍活水烹自临钓石汲深清大瓢贮月归春瓮小杓分江入夜瓶雪乳已翻煎处脚松风忽做泻时声枯肠未易禁三碗卧树荒城长短更两瓯茶 白居易食罢一觉醒起来两瓯茶举头看日影已复西南斜乐人惜日促忧人厌年余无忧无乐者长短任生涯山泉煎茶有怀 白居易坐酌泠泠水看煎瑟瑟尘无由持一碗寄与爱茶人一字至七字诗 茶 元稹茶香叶 嫩芽慕诗客 爱僧家碾雕白玉 罗织红纱铫煎黄蕊色 碗转曲尘花夜后邀陪明月 晨前命对朝霞洗尽古今人不倦 将知醉后岂堪夸");$word->DefaultSaveFormat=""; ## 存档模式,默认DOC$word->Documents[1]->SaveAs("c:\\word.doc");$word->Quit();$word->Release();$word = null;?>
|