Perl 连接 SQL Server (转)

Perl 连接 SQL Server (转)[@more@]呵呵.搞了半天终于自己摸索出来.写出来大家共享.
其实很简单.走了N多弯路又回来了.
 
准备工作:
 
  用到的 perl 扩展 组件(modules)在上篇贴出.( win32::o dbc 模块 )
  下载组件后按照Readme 文件 安装倒响应目录. 配置好相应的odbc数据源.
 
程序实现:
 
  使用
  use Win32::ODBC;
 
  语句包含应使用的模块是win32::odbc
  写出 数据库连接字符串
 
  $DSN = "DSN = My DSN;UID = sa; PWD = pass word"
 
  然后就可以建立相应的连接
 
  $data = new Win32::ODBC($DSN)  # new 一个连接 对象
 
  这样就建立了和数据源指向的 sql SERVER的连接
  当然还有更多更复杂的数据库操作.大家可以参考上篇的对象说明文档.
 
简单举例:
 
  $data->TableList; # 得到数据库的所有基本表的列表
  $data->Sql(" select * FROM [tablename]") # 执行一条查询语句
  $data->FieldNames();  # 得到列(属性)的列表
  ....
  还有很多的操作在原模块作者给出的文档中有详细介绍.
 

来自 “ ITPUB博客 ” ，链接：http://blog.itpub.net/10752019/viewspace-979237/，如需转载，请注明出处，否则将追究法律责任。

转载于:http://blog.itpub.net/10752019/viewspace-979237/