• 注册
  • 关于作者
    企业认证:趣记站长
    关注 6 粉丝 4 喜欢 9 内容 992
    江西省·南昌市
    聊天 送礼
    • 查看作者
    • 如何把数据库的内容写入到Word文档中

        在编程时,由于Microsoft Word的编辑功能非常强大,所以我们经常希望将一些数据保存为WORD文档,以便我们专业编辑。

         在保存为Word文档时,我们可以通过OLE,但经常遇到把真正的Word编辑界面调入到了程序中,以使得程序界面混乱。还有,普通的调用Word的方法都必须指定Word可执行文件的绝对地址,由于很多用户安装Word的路径都不一致,故,我们经常遇到调用错误的问题,

      用C++Builder6制作Apache动态服务页
      用C++ Builder实现VFP数据库开发,用BCB开发有身份认证功能的Email程序,BCB动态生成30个按钮对象,BCB不让应用程序显示在任务栏上的方法,利用C++Builder自定义Windows窗体“系统菜单”,用程序实现文件的关联,数字小键盘指法练习,用C++ Builder开发多层数据库应用程序,在C++ Builder6上使用Boost正则表达式库,C++Builder使用经验谈,用C++ Builder对图像进行特殊效果处理,CBuilder中帮助文件的连接及显示讨论,BCB客户端tuxedo开发实例,在BCB下使用GExperts的Debug功能,BCB编写DLL终极手册,在拷贝、删除文件时显示飞行的文件夹动画,用BCB实现超星格式转换为BMP格式,在C++Builder中使用Compress Html Help,在bcb里实现像Winamp那样具有吸附效果的磁性窗口,利用BCB巧建WEB浏览器
      C++ Builder

      能不能有一种方法调用Word不将它显示出来,与版本、安装路径无关呢?答案是肯定的。

         下面,我就来做一个小程序给大家演示一下,只起到一个抛砖引玉的作用。仅供朋友们参考。

        首先,我们建立一个Access2000数据库data.mdb,在库中我们建立一个表userdata,里面有“工号”、“姓名”、“性别”、“部门”四个字段,都是字符型的,再输入一些数据,我们再建立一个窗体Form1,在Form1中,放置以下控件:

      控件名称 属性 值 说明

      Tlabel1 Caption "请输入文件名"  

      TEdit1 Name "" 用来输入文件名,带扩展名的

      TButton1 Caption "保存"  

      TButton2 Caption "退出"  

      ADOTable1 Active

      ConnectionString

      TableName True

      Provider=Microsoft.Jet.OLEDB.4.0;Data Source=data.mdb;Persist Security Info=False

      userdata  

      下面是相关代码:

      file://---------------------------------------------------------------------------

      #include <vcl.h>

      #pragma hdrstop

      #include "Unit1.h"

      ---------------------------------------------------------------------------

      #pragma package(smart_init)

      #pragma resource "*.dfm"

      TForm1 *Form1;

      ---------------------------------------------------------------------------

      __fastcall TForm1::TForm1(TComponent* Owner)

              : TForm(Owner)

      {

      }

      ---------------------------------------------------------------------------

      void __fastcall TForm1::Button1Click(TObject *Sender)

      {

      Variant OLEObject;

      AnsiString dataword;

      if(Trim(Edit1->Text)=="")

      {

      ShowMessage("请输入文件名");

      return;

      }

      String currentPath=GetCurrentDir()+"//"+Trim(Edit1->Text);

      OLEObject=CreateOleObject("Word.Basic");

      OLEObject.Exec(Procedure("FileNew"));

      OLEObject.Exec(Procedure("EndOfDocument"));

      ADOTable1->First();

      while(ADOTable1->Eof!=True)

      {

        dataword=ADOTable1->FieldValues["工号"]+ADOTable1->FieldValues["姓名"]+ADOTable1->FieldValues["性别"]+ADOTable1->FieldValues["部门"];

        OLEObject.Exec(Procedure("Insert")<<dataword);

        ADOTable1->Next();

      }

      OLEObject.Exec(Procedure("StartOfDocument"));

      OLEObject.Exec(Procedure("FileSaveAs")<<currentPath);

      OLEObject.Exec(Procedure("FileClose")<<1);

      ShowMessage("文件已经写入!谢谢使用!");

      }

      ---------------------------------------------------------------------------

      void __fastcall TForm1::Button2Click(TObject *Sender)

      {

      this->Close();

      }

      ---------------------------------------------------------------------------

      void __fastcall TForm1::Edit1Click(TObject *Sender)

      {

      Edit1->Text="";        

      }

      用C++Builder6制作Apache动态服务页
      用C++ Builder实现VFP数据库开发,用BCB开发有身份认证功能的Email程序,BCB动态生成30个按钮对象,BCB不让应用程序显示在任务栏上的方法,利用C++Builder自定义Windows窗体“系统菜单”,用程序实现文件的关联,数字小键盘指法练习,用C++ Builder开发多层数据库应用程序,在C++ Builder6上使用Boost正则表达式库,C++Builder使用经验谈,用C++ Builder对图像进行特殊效果处理,CBuilder中帮助文件的连接及显示讨论,BCB客户端tuxedo开发实例,在BCB下使用GExperts的Debug功能,BCB编写DLL终极手册,在拷贝、删除文件时显示飞行的文件夹动画,用BCB实现超星格式转换为BMP格式,在C++Builder中使用Compress Html Help,在bcb里实现像Winamp那样具有吸附效果的磁性窗口,利用BCB巧建WEB浏览器
      C++ Builder

    • 0
    • 0
    • 0
    • 71
    • 单栏布局 侧栏位置: