由文件檔塞資料進MS SQL

這其實不是一個完整的程式,只是一個常用的片段。

呼叫ODBC 走ODBC將文字檔中的資料一行一行的餵進MS SQL之中

#########################################################

#written by parus on someday in 2005

use Win32::ODBC;

$file = “";
#the file contains data source
$table = “";
#the table feed the data
$dsn = “";
#the odbc name you give on client
$idname = “";
#the username of DB
$password = “";
#the password of db user

($mday, $mon, $year) = (localtime( time() ))[3..5];
$today = sprintf “%04d%02d%02d", $year + 1900, $mon + 1, $mday;
#today’s date

$dbh = new Win32::ODBC(“DSN=$dsn;UID=$idname;PWD=$password;");
die “Unable to connect to DSN m2kcathmail: “.Win32::ODBC::Error()."\n" if ! $dbh;
open (FILE,$file) or die “$!";
while () {
chomp;
$sql = “Insert into “.$table." values (,".$_.","$today",)";
#this sql statement insert the data and date into specified table
$rc=$dbh->Sql($sql);
if ($rc){
print “Error $rc".$dbh->error();
exit(0);
}
}
$dbh->Close();
close FILE;

廣告

發表迴響

在下方填入你的資料或按右方圖示以社群網站登入:

WordPress.com 標誌

您的留言將使用 WordPress.com 帳號。 登出 /  變更 )

Google+ photo

您的留言將使用 Google+ 帳號。 登出 /  變更 )

Twitter picture

您的留言將使用 Twitter 帳號。 登出 /  變更 )

Facebook照片

您的留言將使用 Facebook 帳號。 登出 /  變更 )

連結到 %s