1 | <?php |
---|
2 | |
---|
3 | /** |
---|
4 | * @version V4.50 6 July 2004 (c) 2000-2007 John Lim (jlim#natsoft.com.my). All rights reserved. |
---|
5 | * Released under both BSD license and Lesser GPL library license. |
---|
6 | * Whenever there is any discrepancy between the two licenses, |
---|
7 | * the BSD license will take precedence. |
---|
8 | * |
---|
9 | * Set tabs to 4 for best viewing. |
---|
10 | * |
---|
11 | * Latest version is available at http://php.weblogs.com |
---|
12 | * |
---|
13 | * Test GetUpdateSQL and GetInsertSQL. |
---|
14 | */ |
---|
15 | |
---|
16 | error_reporting(E_ALL); |
---|
17 | |
---|
18 | |
---|
19 | include('../adodb.inc.php'); |
---|
20 | include('../tohtml.inc.php'); |
---|
21 | |
---|
22 | //========================== |
---|
23 | // This code tests an insert |
---|
24 | |
---|
25 | |
---|
26 | |
---|
27 | $conn = &ADONewConnection("mssql"); // create a connection |
---|
28 | $conn->Connect('127.0.0.1','adodb','natsoft','northwind') or die('Fail'); |
---|
29 | |
---|
30 | $conn->debug =1; |
---|
31 | $query = 'select * from products'; |
---|
32 | $conn->SetFetchMode(ADODB_FETCH_ASSOC); |
---|
33 | $rs = $conn->Execute($query); |
---|
34 | echo "<pre>"; |
---|
35 | while( !$rs->EOF ) { |
---|
36 | $output[] = $rs->fields; |
---|
37 | var_dump($rs->fields); |
---|
38 | $rs->MoveNext(); |
---|
39 | print "<p>"; |
---|
40 | } |
---|
41 | die(); |
---|
42 | |
---|
43 | |
---|
44 | $p = $conn->Prepare('insert into products (productname,unitprice,dcreated) values (?,?,?)'); |
---|
45 | echo "<pre>"; |
---|
46 | print_r($p); |
---|
47 | |
---|
48 | $conn->debug=1; |
---|
49 | $conn->Execute($p,array('John'.rand(),33.3,$conn->DBDate(time()))); |
---|
50 | |
---|
51 | $p = $conn->Prepare('select * from products where productname like ?'); |
---|
52 | $arr = $conn->getarray($p,array('V%')); |
---|
53 | print_r($arr); |
---|
54 | die(); |
---|
55 | |
---|
56 | //$conn = &ADONewConnection("mssql"); |
---|
57 | //$conn->Connect('mangrove','sa','natsoft','ai'); |
---|
58 | |
---|
59 | //$conn->Connect('mangrove','sa','natsoft','ai'); |
---|
60 | $conn->debug=1; |
---|
61 | $conn->Execute('delete from blobtest'); |
---|
62 | |
---|
63 | $conn->Execute('insert into blobtest (id) values(1)'); |
---|
64 | $conn->UpdateBlobFile('blobtest','b1','../cute_icons_for_site/adodb.gif','id=1'); |
---|
65 | $rs = $conn->Execute('select b1 from blobtest where id=1'); |
---|
66 | |
---|
67 | $output = "c:\\temp\\test_out-".date('H-i-s').".gif"; |
---|
68 | print "Saving file <b>$output</b>, size=".strlen($rs->fields[0])."<p>"; |
---|
69 | $fd = fopen($output, "wb"); |
---|
70 | fwrite($fd, $rs->fields[0]); |
---|
71 | fclose($fd); |
---|
72 | |
---|
73 | print " <a href=file://$output>View Image</a>"; |
---|
74 | //$rs = $conn->Execute('SELECT id,SUBSTRING(b1, 1, 10) FROM blobtest'); |
---|
75 | //rs2html($rs); |
---|
76 | ?> |
---|