Perl 创建一个新的 ODBC 数据源

概述Perl 创建一个新的 ODBC 数据源

下面是内存溢出 jb51.cc 通过网络收集整理的代码片段。

内存溢出小编现在分享给大家，也给大家做个参考。

 use Cwd; use Win32::ODBC; $DriverType = "Microsoft Access Driver (*.mdb)"; $DSN = "Email Contacts"; $Description = "Description=Email List and Contact information"; $DataBase = "EmailContacts.mdb"; $dir = cwd(); if (Win32::ODBC::ConfigDSN(ODBC_ADD_DSN,$DriverType,("DSN=$DSN",$Description,"DBQ=$dir\$DataBase","DEFAulTDIR=$dir","UID=","PWD="))){    print "Successful configuration of $DSN!\n"; } else{    print "Error Creating $DSN\n";    Win32::ODBC::DumpError();    dIE; } my $myDb = Win32::ODBC->new($DSN); my $connection; if (! $myDb){    print "Failed to Connect $DSN\n";    Win32::ODBC::DumpError();    dIE; }else {    $connection = $myDb->Connection();    print "Successful Connection $connection,$DSN\n"; } $myDb->Close();

以上是内存溢出(jb51.cc)为你收集整理的全部代码内容，希望文章能够帮你解决所遇到的程序开发问题。

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

总结

以上是内存溢出为你收集整理的Perl 创建一个新的 ODBC 数据源全部内容，希望文章能够帮你解决Perl 创建一个新的 ODBC 数据源所遇到的程序开发问题。

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