perl的EXCEL操作初级学习总结
2011-07-05 20:14
288 查看
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\01-设计\保全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数据并调用MSXML接口操作XML数据
- NPOI 操作Excel学习总结
- jxl操作Excel学习总结_格式化单元格中的数据
- Perl 操作Excel总结
- Perl学习(十二)——数组定义操作总结
- Perl学习(十三)——数组操作总结 push pop shift unshift
- Perl学习(十四)——数组操作总结 splice
- jxl操作Excel学习总结
- jxl操作Excel学习总结一个范例
- selenium 学习笔记 ---新手学习记录(10) 问题总结(java)--poi--excel 操作
- MyBatis学习总结(二)——使用MyBatis对表执行CRUD操作
- R与数据分析学习总结之一:R语言基本操作
- Excel VBA 学习总结 - 数据验证与正则表达式
- 黑马程序员——Java学习总结:转换流和流的操作总结
- C#操作Excel(创建、打开、读写、保存)几种方法的总结
- MyBatis学习总结(二)——使用MyBatis对表执行CRUD操作
- OpenCV学习——矩阵操作总结
- Python操作Excel实践总结
- ASP操作Excel技术总结
- Oracle学习总结(9)—— Oracle 常用的基本操作