| 订阅 | 在线投稿
分享
 
 
 

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- 王朝网络 版权所有