您现在正在浏览：站长之家 >> 数据库 >> 详细内容

perl连接access数据库

时间:2007-12-23 来源:不详作者:迈克DB

} } ##### sql #########
#添加记录
$sqlinsert = "insert into address values ('euler', 'euler@21cn.com', 28, '021-345689')";
#更新记录
$sqlupdate = "update address set age = age 10 ";
#删除记录
$sqldelete = "delete from address where name='jimtyan'"; $rc = $db->sql($sqlinsert);
die qq(sql 失败 "$sqlinsert": ), $db->error(), qq(n) if $rc; $rc = $db->sql($sqlupdate);
die qq(sql 失败 "$sqlupdate": ), $db->error(), qq(n) if $rc; $rc = $db->sql($sqldelete);
die qq(sql 失败 "$sqldelete": ), $db->error(), qq(n) if $rc; #关闭链接
$db->close(); 进一步学习请访问win32-odbc模块作者主页：http://www.roth.net/perl/odbc/ nighthawk 版权所有,转载请保留署名　　