source: trunk/phpgwapi/inc/adodb/tests/testpear.php @ 2

Revision 2, 875 bytes checked in by niltonneto, 17 years ago (diff)

Removida todas as tags usadas pelo CVS ($Id, $Source).
Primeira versão no CVS externo.

  • Property svn:eol-style set to native
  • Property svn:executable set to *
Line 
1<?php
2/*
3V4.51 29 July 2004  (c) 2000-2004 John Lim (jlim@natsoft.com.my). All rights reserved.
4  Released under both BSD license and Lesser GPL library license.
5  Whenever there is any discrepancy between the two licenses,
6  the BSD license will take precedence.
7  Set tabs to 4 for best viewing.
8       
9  Latest version is available at http://adodb.sourceforge.net
10*/
11
12error_reporting(E_ALL);
13
14include_once('../adodb-pear.inc.php');
15$username = 'root';
16$password = '';
17$hostname = 'localhost';
18$databasename = 'xphplens';
19$driver = 'mysql';
20
21$dsn = "$driver://$username:$password@$hostname/$databasename";
22
23$db = DB::Connect($dsn);
24$db->setFetchMode(ADODB_FETCH_ASSOC);
25$rs = $db->Query('select firstname,lastname from adoxyz');
26$cnt = 0;
27while ($arr = $rs->FetchRow()) {
28        print_r($arr);
29        print "<br>";
30        $cnt += 1;
31}
32
33if ($cnt != 50) print "<b>Error in \$cnt = $cnt</b>";
34?>
Note: See TracBrowser for help on using the repository browser.