tasks a-s

Task/Parametrized-SQL-statement/Objeck/parametrized-sql-statement.objeck

@@ -0,0 +1,19 @@
+use IO;
+use ODBC;
+
+bundle Default {
+   class Sql {
+      function : Main(args : String[]) ~ Nil {
+      conn := Connection->New("ds", "user", "password");
+      if(conn <> Nil) {
+         sql := "UPDATE players SET name = ?, score = ?, active = ? WHERE jerseyNum = ?";
+         pstmt := conn->CreateParameterStatement(sql);
+         pstmt->SetVarchar(1, "Smith, Steve");
+         pstmt->SetInt(2, 42);
+         pstmt->SetBit(3, true);
+         pstmt->SetInt(4, 99);
+         pstmt->Update()->PrintLine();
+         conn->Close();
+      };
+   }
+}