Perl 连接 SQL Server (转)[@more@]d
sfsaf
perl 连接 sql SERVER chanboy(原作) 关键字 Per
SQL SERVER 呵呵.搞了半天终于自己摸索出来.写出来大家共享.
其实很简单.走了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博客 ” ,链接:https://blog.itpub.net/10790663/viewspace-957184/
,如需转载,请注明出处,否则将追究法律责任。