Parameterized SQL statement: Difference between revisions

Content added Content deleted

Inline

@@ Line 910: / Line 910: @@
 (require db)
+(define pgc
-(define con (postgresql-connect #:user user #:database db #:password password))
+  ; Don't actually inline sensitive data ;)
-(define pst (prepare pgc "UPDATE players
+  (postgresql-connect #:user     "resu"
-                            SET name = ?, score = ?, active = ?
-                            WHERE jerseyNum = ?"))
+                      #:database "esabatad"
+                      #:server   "example.com"
-(define bst (bind-prepared-statement pst '("Smith, Steve" 42 #t 99)))
+                      #:port     5432
-(query-value con bst)
+                      #:password "s3>r37P455"))
+(apply query-exec
+       pgc
+       "UPDATE players
+        SET name = ?, score = ?, active = ?
+        WHERE jerseyNum = ?"
+       '("Smith, Steve" 42 #t 99))
 </lang>