Parameterized SQL statement: Difference between revisions

Content added Content deleted
(Rename Perl 6 -> Raku, alphabetize, minor clean-up)
Line 22: Line 22:
\ execute the query
\ execute the query
db @ swap db:exec</lang>
db @ swap db:exec</lang>

=={{header|Ada}}==
=={{header|Ada}}==
<lang Ada>-- Version for sqlite
<lang Ada>-- Version for sqlite
Line 483: Line 484:
Parametrized_Sql
Parametrized_Sql
</lang>
</lang>



=={{header|Mathematica}}==
=={{header|Mathematica}}==
Line 806: Line 806:


$rows_affected = $statment->execute("Smith, Steve",42,'true',99);</lang>
$rows_affected = $statment->execute("Smith, Steve",42,'true',99);</lang>
=={{header|Perl 6}}==
<lang perl6>use DBIish;

my $db = DBIish.connect('DBI:mysql:mydatabase:host','login','password');

my $update = $db.prepare("UPDATE players SET name = ?, score = ?, active = ? WHERE jerseyNum = ?");

my $rows-affected = $update.execute("Smith, Steve",42,'true',99);</lang>


=={{header|Phix}}==
=={{header|Phix}}==
Line 885: Line 877:
(put!> P 'score 42)
(put!> P 'score 42)
(put!> P 'active T) )</lang>
(put!> P 'active T) )</lang>

=={{header|PureBasic}}==
=={{header|PureBasic}}==
<lang PureBasic>UseSQLiteDatabase()
<lang PureBasic>UseSQLiteDatabase()
Line 1,003: Line 996:


</lang>
</lang>

=={{header|Raku}}==
(formerly Perl 6)
<lang perl6>use DBIish;

my $db = DBIish.connect('DBI:mysql:mydatabase:host','login','password');

my $update = $db.prepare("UPDATE players SET name = ?, score = ?, active = ? WHERE jerseyNum = ?");

my $rows-affected = $update.execute("Smith, Steve",42,'true',99);</lang>


=={{header|Ruby}}==
=={{header|Ruby}}==
Line 1,136: Line 1,139:


}</lang>
}</lang>

=={{header|Seed7}}==
=={{header|Seed7}}==
The library [http://seed7.sourceforge.net/libraries/sql_base.htm sql_base.s7i] provides access to databases.
The library [http://seed7.sourceforge.net/libraries/sql_base.htm sql_base.s7i] provides access to databases.