| 订阅 | 在线投稿
分享
 
 
 

Perl操作mysql数据库的方法

2008-12-22 08:07:47  编辑来源:互联网  宽屏版  评论

本文为【Perl操作mysql数据库的方法】的汉字拼音对照版显示拼音

PerlduiMysqldecaozuo

yibiaozhuncaozuo

1lianjieguanbi

my $dbh = DBI->connect(DBI:mysql:database=DBname;host=localhost,user,pwd, {RaiseError => 1});

$dbh->disconnect();

2leisicharudengwufanhuicaozuo

my $sqr = $dbh->prepare(insert into table_name(Name,region_id,inuse,url) values (.$r_name.,.($t+1).,1,.$r_url.) );

$sqr->execute();

3qudezizengchangdeID

zhixingcharucaozuohou

my $table_key = $dbh->{mysql_insertid};

4Selectcaozuo

my $row;

while ($row = $sqr->fetchrow_arrayref) {

printf $row->[0].++.$row->[1].\n;

}

原文
Perl对Mysql的操作。 一、标准操作 1、连接、关闭 my $dbh = DBI->connect(”DBI:mysql:database=DBname;host=localhost”,”user”,”pwd”, {’RaiseError’ => 1}); … … $dbh->disconnect(); 2、类似插入等无返回操作 my $sqr = $dbh->prepare(”insert into table_name(Name,region_id,inuse,url) values (’”.$r_name.”‘,’”.($t+1).”‘,’1′,’”.$r_url.”‘) “); $sqr->execute(); 3、取得自增长的ID 执行插入操作后 my $table_key = $dbh->{’mysql_insertid’}; 4、Select操作 my $row; while ($row = $sqr->fetchrow_arrayref) { printf $row->[0].”++”.$row->[1].”\n”; }
󰈣󰈤
 
 
 
>>返回首页<<
 
 
 转载本文
 UBB代码 HTML代码
复制到剪贴板...
 
 热帖排行
 
 
王朝网络微信公众号
微信扫码关注本站公众号wangchaonetcn
 
 
静静地坐在废墟上,四周的荒凉一望无际,忽然觉得,凄凉也很美
©2005- 王朝网络 版权所有