perl的EXCEL *** 作初级学习总结

概述1、使用EXECL驱动(生成脚本到固定文件) ######################################################################use Win32::OLE qw(in with);use Win32::OLE::Const 'Microsoft Excel';#####################################

1、使用EXECL驱动(生成脚本到固定文件)

######################################################################use Win32::olE qw(in with);use Win32::olE::Const 'Microsoft Excel';######################################################################$Win32::olE::Warn = 3;my $Excel = Win32::olE->GetActiveObject('Excel.Application') || Win32::olE->new('Excel.Application','Quit');my $fIElname = q(D:\EDW_VSS\供数APS-设计\保全SDM映射.xls);my $Book = $Excel->Workbooks->Open("$fIElname");open(F,'>C:\documents and Settings\administrator\桌面\create_proc\aps_table_comments.sql');#程序主题部分# clean up after ourselves$Book->Close;close(F);

2、获取系统时间

my$Create_Time = localtime();

3、固定字符与变量字符相连

my$Proc_name = "P_APS_".${Target_table_name};

4、获取EXCEL单元格内容

my$Src_Tab_Ch_name = $Sheet->Cells(1,9)->{'Value'};

5、将字符串转成大写或小写

$Source_table_name= uc($Source_table_name);

$Source_table_name= lc($Source_table_name);

6、引用字符串变量时如果有时候不起作用，可以带上大括号

${Target_table_name};

7、打印文本到文件

         print F"------------${Proc_name}的生成代码脚本------------\n";

8、perl读取的EXCEL文件或生成的文本文件路径不能有空格

如：open(F,'>C:\documentsand Settings\administrator\桌面\create_proc\aps_table_comments.sql');

执行将不成功。

总结

以上是内存溢出为你收集整理的perl的EXCEL *** 作初级学习总结全部内容，希望文章能够帮你解决perl的EXCEL *** 作初级学习总结所遇到的程序开发问题。

如果觉得内存溢出网站内容还不错，欢迎将内存溢出网站推荐给程序员好友。