Advertisement
Guest User

Untitled

a guest
Dec 8th, 2015
115
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
XBasic 17.68 KB | None | 0 0
  1. Sub sqlExecuteVariableParams(extends db as SQLiteDatabase, sql as Text, optional values() as Text)
  2.   //Today, I'm annoyed that xojo does not have any way to throw an arbitrary-length array of values into an insert or update statement.  The built-in sqlExecute method
  3.   //on the sqlitedatabase class only accepts paramarrays, which cannot receive a regular array.
  4.  
  5.   //So I'm forced to write this stupid method with a whole bunch of select clauses to build up the parameter binding the way I need it.
  6.  
  7.   //It is assumed that the sql that is passed in already has the requisite ?1, ?2, etc values.  All this method does is pass the items in values() into the native
  8.   //sqlExecute method.  It is also assumed that all the values() are just text.
  9.  
  10.   select case ubound(values)
  11.   case 0
  12.     db.SQLExecute(sql, values(0))
  13.   case 1
  14.     db.SQLExecute(sql, values(0), values(1))
  15.   case 2
  16.     db.SQLExecute(sql, values(0), values(1), values(2))
  17.   case 3
  18.     db.sqlExecute(sql, values(0), values(1), values(2), values(3))
  19.   case 4
  20.     db.sqlExecute(sql, values(0), values(1), values(2), values(3), values(4))
  21.   case 5
  22.     db.sqlExecute(sql, values(0), values(1), values(2), values(3), values(4), values(5))
  23.   case 6
  24.     db.sqlExecute(sql, values(0), values(1), values(2), values(3), values(4), values(5), values(6))
  25.   case 7
  26.     db.sqlExecute(sql, values(0), values(1), values(2), values(3), values(4), values(5), values(6), values(7))
  27.   case 8
  28.     db.sqlExecute(sql, values(0), values(1), values(2), values(3), values(4), values(5), values(6), values(7), values(8))
  29.   case 9
  30.     db.sqlExecute(sql, values(0), values(1), values(2), values(3), values(4), values(5), values(6), values(7), values(8), values(9))
  31.   case 10
  32.     db.sqlExecute(sql, values(0), values(1), values(2), values(3), values(4), values(5), values(6), values(7), values(8), values(9), _
  33.     values(10))
  34.   case 11
  35.     db.sqlExecute(sql, values(0), values(1), values(2), values(3), values(4), values(5), values(6), values(7), values(8), values(9), _
  36.     values(10), values(11))
  37.   case 12
  38.     db.sqlExecute(sql, values(0), values(1), values(2), values(3), values(4), values(5), values(6), values(7), values(8), values(9), _
  39.     values(10), values(11), values(12))
  40.   case 13
  41.     db.sqlExecute(sql, values(0), values(1), values(2), values(3), values(4), values(5), values(6), values(7), values(8), values(9), _
  42.     values(10), values(11), values(12), values(13))
  43.   case 14
  44.     db.sqlExecute(sql, values(0), values(1), values(2), values(3), values(4), values(5), values(6), values(7), values(8), values(9), _
  45.     values(10), values(11), values(12), values(13), values(14))
  46.   case 15
  47.     db.sqlExecute(sql, values(0), values(1), values(2), values(3), values(4), values(5), values(6), values(7), values(8), values(9), _
  48.     values(10), values(11), values(12), values(13), values(14), values(15))
  49.   case 16
  50.     db.sqlExecute(sql, values(0), values(1), values(2), values(3), values(4), values(5), values(6), values(7), values(8), values(9), _
  51.     values(10), values(11), values(12), values(13), values(14), values(15), values(16))
  52.   case 17
  53.     db.sqlExecute(sql, values(0), values(1), values(2), values(3), values(4), values(5), values(6), values(7), values(8), values(9), _
  54.     values(10), values(11), values(12), values(13), values(14), values(15), values(16), values(17))
  55.   case 18
  56.     db.sqlExecute(sql, values(0), values(1), values(2), values(3), values(4), values(5), values(6), values(7), values(8), values(9), _
  57.     values(10), values(11), values(12), values(13), values(14), values(15), values(16), values(17), values(18))
  58.   case 19
  59.     db.sqlExecute(sql, values(0), values(1), values(2), values(3), values(4), values(5), values(6), values(7), values(8), values(9), _
  60.     values(10), values(11), values(12), values(13), values(14), values(15), values(16), values(17), values(18), values(19))
  61.   case 20
  62.     db.sqlExecute(sql, values(0), values(1), values(2), values(3), values(4), values(5), values(6), values(7), values(8), values(9), _
  63.     values(10), values(11), values(12), values(13), values(14), values(15), values(16), values(17), values(18), values(19), _
  64.     values(20))
  65.   case 21
  66.     db.sqlExecute(sql, values(0), values(1), values(2), values(3), values(4), values(5), values(6), values(7), values(8), values(9), _
  67.     values(10), values(11), values(12), values(13), values(14), values(15), values(16), values(17), values(18), values(19), _
  68.     values(20), values(21))
  69.   case 22
  70.     db.sqlExecute(sql, values(0), values(1), values(2), values(3), values(4), values(5), values(6), values(7), values(8), values(9), _
  71.     values(10), values(11), values(12), values(13), values(14), values(15), values(16), values(17), values(18), values(19), _
  72.     values(20), values(21), values(22))
  73.   case 23
  74.     db.sqlExecute(sql, values(0), values(1), values(2), values(3), values(4), values(5), values(6), values(7), values(8), values(9), _
  75.     values(10), values(11), values(12), values(13), values(14), values(15), values(16), values(17), values(18), values(19), _
  76.     values(20), values(21), values(22), values(23))
  77.   case 24
  78.     db.sqlExecute(sql, values(0), values(1), values(2), values(3), values(4), values(5), values(6), values(7), values(8), values(9), _
  79.     values(10), values(11), values(12), values(13), values(14), values(15), values(16), values(17), values(18), values(19), _
  80.     values(20), values(21), values(22), values(23), values(24))
  81.   case 25
  82.     db.sqlExecute(sql, values(0), values(1), values(2), values(3), values(4), values(5), values(6), values(7), values(8), values(9), _
  83.     values(10), values(11), values(12), values(13), values(14), values(15), values(16), values(17), values(18), values(19), _
  84.     values(20), values(21), values(22), values(23), values(24), values(25))
  85.   case 26
  86.     db.sqlExecute(sql, values(0), values(1), values(2), values(3), values(4), values(5), values(6), values(7), values(8), values(9), _
  87.     values(10), values(11), values(12), values(13), values(14), values(15), values(16), values(17), values(18), values(19), _
  88.     values(20), values(21), values(22), values(23), values(24), values(25), values(26))
  89.   case 27
  90.     db.sqlExecute(sql, values(0), values(1), values(2), values(3), values(4), values(5), values(6), values(7), values(8), values(9), _
  91.     values(10), values(11), values(12), values(13), values(14), values(15), values(16), values(17), values(18), values(19), _
  92.     values(20), values(21), values(22), values(23), values(24), values(25), values(26), values(27))
  93.   case 28
  94.     db.sqlExecute(sql, values(0), values(1), values(2), values(3), values(4), values(5), values(6), values(7), values(8), values(9), _
  95.     values(10), values(11), values(12), values(13), values(14), values(15), values(16), values(17), values(18), values(19), _
  96.     values(20), values(21), values(22), values(23), values(24), values(25), values(26), values(27), values(28))
  97.   case 29
  98.     db.sqlExecute(sql, values(0), values(1), values(2), values(3), values(4), values(5), values(6), values(7), values(8), values(9), _
  99.     values(10), values(11), values(12), values(13), values(14), values(15), values(16), values(17), values(18), values(19), _
  100.     values(20), values(21), values(22), values(23), values(24), values(25), values(26), values(27), values(28), values(29))
  101.   case 30
  102.     db.sqlExecute(sql, values(0), values(1), values(2), values(3), values(4), values(5), values(6), values(7), values(8), values(9), _
  103.     values(10), values(11), values(12), values(13), values(14), values(15), values(16), values(17), values(18), values(19), _
  104.     values(20), values(21), values(22), values(23), values(24), values(25), values(26), values(27), values(28), values(29), _
  105.     values(30))
  106.   case 31
  107.     db.sqlExecute(sql, values(0), values(1), values(2), values(3), values(4), values(5), values(6), values(7), values(8), values(9), _
  108.     values(10), values(11), values(12), values(13), values(14), values(15), values(16), values(17), values(18), values(19), _
  109.     values(20), values(21), values(22), values(23), values(24), values(25), values(26), values(27), values(28), values(29), _
  110.     values(30), values(31))
  111.   case 32
  112.     db.sqlExecute(sql, values(0), values(1), values(2), values(3), values(4), values(5), values(6), values(7), values(8), values(9), _
  113.     values(10), values(11), values(12), values(13), values(14), values(15), values(16), values(17), values(18), values(19), _
  114.     values(20), values(21), values(22), values(23), values(24), values(25), values(26), values(27), values(28), values(29), _
  115.     values(30), values(31), values(32))
  116.   case 33
  117.     db.sqlExecute(sql, values(0), values(1), values(2), values(3), values(4), values(5), values(6), values(7), values(8), values(9), _
  118.     values(10), values(11), values(12), values(13), values(14), values(15), values(16), values(17), values(18), values(19), _
  119.     values(20), values(21), values(22), values(23), values(24), values(25), values(26), values(27), values(28), values(29), _
  120.     values(30), values(31), values(32), values(33))
  121.   case 34
  122.     db.sqlExecute(sql, values(0), values(1), values(2), values(3), values(4), values(5), values(6), values(7), values(8), values(9), _
  123.     values(10), values(11), values(12), values(13), values(14), values(15), values(16), values(17), values(18), values(19), _
  124.     values(20), values(21), values(22), values(23), values(24), values(25), values(26), values(27), values(28), values(29), _
  125.     values(30), values(31), values(32), values(33), values(34))
  126.   case 35
  127.     db.sqlExecute(sql, values(0), values(1), values(2), values(3), values(4), values(5), values(6), values(7), values(8), values(9), _
  128.     values(10), values(11), values(12), values(13), values(14), values(15), values(16), values(17), values(18), values(19), _
  129.     values(20), values(21), values(22), values(23), values(24), values(25), values(26), values(27), values(28), values(29), _
  130.     values(30), values(31), values(32), values(33), values(34), values(35))
  131.   case 36
  132.     db.sqlExecute(sql, values(0), values(1), values(2), values(3), values(4), values(5), values(6), values(7), values(8), values(9), _
  133.     values(10), values(11), values(12), values(13), values(14), values(15), values(16), values(17), values(18), values(19), _
  134.     values(20), values(21), values(22), values(23), values(24), values(25), values(26), values(27), values(28), values(29), _
  135.     values(30), values(31), values(32), values(33), values(34), values(35), values(36))
  136.   case 37
  137.     db.sqlExecute(sql, values(0), values(1), values(2), values(3), values(4), values(5), values(6), values(7), values(8), values(9), _
  138.     values(10), values(11), values(12), values(13), values(14), values(15), values(16), values(17), values(18), values(19), _
  139.     values(20), values(21), values(22), values(23), values(24), values(25), values(26), values(27), values(28), values(29), _
  140.     values(30), values(31), values(32), values(33), values(34), values(35), values(36), values(37))
  141.   case 38
  142.     db.sqlExecute(sql, values(0), values(1), values(2), values(3), values(4), values(5), values(6), values(7), values(8), values(9), _
  143.     values(10), values(11), values(12), values(13), values(14), values(15), values(16), values(17), values(18), values(19), _
  144.     values(20), values(21), values(22), values(23), values(24), values(25), values(26), values(27), values(28), values(29), _
  145.     values(30), values(31), values(32), values(33), values(34), values(35), values(36), values(37), values(38))
  146.   case 39
  147.     db.sqlExecute(sql, values(0), values(1), values(2), values(3), values(4), values(5), values(6), values(7), values(8), values(9), _
  148.     values(10), values(11), values(12), values(13), values(14), values(15), values(16), values(17), values(18), values(19), _
  149.     values(20), values(21), values(22), values(23), values(24), values(25), values(26), values(27), values(28), values(29), _
  150.     values(30), values(31), values(32), values(33), values(34), values(35), values(36), values(37), values(38), values(39))
  151.   case 40
  152.     db.sqlExecute(sql, values(0), values(1), values(2), values(3), values(4), values(5), values(6), values(7), values(8), values(9), _
  153.     values(10), values(11), values(12), values(13), values(14), values(15), values(16), values(17), values(18), values(19), _
  154.     values(20), values(21), values(22), values(23), values(24), values(25), values(26), values(27), values(28), values(29), _
  155.     values(30), values(31), values(32), values(33), values(34), values(35), values(36), values(37), values(38), values(39), _
  156.     values(40))
  157.   case 41
  158.     db.sqlExecute(sql, values(0), values(1), values(2), values(3), values(4), values(5), values(6), values(7), values(8), values(9), _
  159.     values(10), values(11), values(12), values(13), values(14), values(15), values(16), values(17), values(18), values(19), _
  160.     values(20), values(21), values(22), values(23), values(24), values(25), values(26), values(27), values(28), values(29), _
  161.     values(30), values(31), values(32), values(33), values(34), values(35), values(36), values(37), values(38), values(39), _
  162.     values(40), values(41))
  163.   case 42
  164.     db.sqlExecute(sql, values(0), values(1), values(2), values(3), values(4), values(5), values(6), values(7), values(8), values(9), _
  165.     values(10), values(11), values(12), values(13), values(14), values(15), values(16), values(17), values(18), values(19), _
  166.     values(20), values(21), values(22), values(23), values(24), values(25), values(26), values(27), values(28), values(29), _
  167.     values(30), values(31), values(32), values(33), values(34), values(35), values(36), values(37), values(38), values(39), _
  168.     values(40), values(41), values(42))
  169.   case 43
  170.     db.sqlExecute(sql, values(0), values(1), values(2), values(3), values(4), values(5), values(6), values(7), values(8), values(9), _
  171.     values(10), values(11), values(12), values(13), values(14), values(15), values(16), values(17), values(18), values(19), _
  172.     values(20), values(21), values(22), values(23), values(24), values(25), values(26), values(27), values(28), values(29), _
  173.     values(30), values(31), values(32), values(33), values(34), values(35), values(36), values(37), values(38), values(39), _
  174.     values(40), values(41), values(42), values(43))
  175.   case 44
  176.     db.sqlExecute(sql, values(0), values(1), values(2), values(3), values(4), values(5), values(6), values(7), values(8), values(9), _
  177.     values(10), values(11), values(12), values(13), values(14), values(15), values(16), values(17), values(18), values(19), _
  178.     values(20), values(21), values(22), values(23), values(24), values(25), values(26), values(27), values(28), values(29), _
  179.     values(30), values(31), values(32), values(33), values(34), values(35), values(36), values(37), values(38), values(39), _
  180.     values(40), values(41), values(42), values(43), values(44))
  181.   case 45
  182.     db.sqlExecute(sql, values(0), values(1), values(2), values(3), values(4), values(5), values(6), values(7), values(8), values(9), _
  183.     values(10), values(11), values(12), values(13), values(14), values(15), values(16), values(17), values(18), values(19), _
  184.     values(20), values(21), values(22), values(23), values(24), values(25), values(26), values(27), values(28), values(29), _
  185.     values(30), values(31), values(32), values(33), values(34), values(35), values(36), values(37), values(38), values(39), _
  186.     values(40), values(41), values(42), values(43), values(44), values(45))
  187.   case 46
  188.     db.sqlExecute(sql, values(0), values(1), values(2), values(3), values(4), values(5), values(6), values(7), values(8), values(9), _
  189.     values(10), values(11), values(12), values(13), values(14), values(15), values(16), values(17), values(18), values(19), _
  190.     values(20), values(21), values(22), values(23), values(24), values(25), values(26), values(27), values(28), values(29), _
  191.     values(30), values(31), values(32), values(33), values(34), values(35), values(36), values(37), values(38), values(39), _
  192.     values(40), values(41), values(42), values(43), values(44), values(45), values(46))
  193.   case 47
  194.     db.sqlExecute(sql, values(0), values(1), values(2), values(3), values(4), values(5), values(6), values(7), values(8), values(9), _
  195.     values(10), values(11), values(12), values(13), values(14), values(15), values(16), values(17), values(18), values(19), _
  196.     values(20), values(21), values(22), values(23), values(24), values(25), values(26), values(27), values(28), values(29), _
  197.     values(30), values(31), values(32), values(33), values(34), values(35), values(36), values(37), values(38), values(39), _
  198.     values(40), values(41), values(42), values(43), values(44), values(45), values(46), values(47))
  199.   case 48
  200.     db.sqlExecute(sql, values(0), values(1), values(2), values(3), values(4), values(5), values(6), values(7), values(8), values(9), _
  201.     values(10), values(11), values(12), values(13), values(14), values(15), values(16), values(17), values(18), values(19), _
  202.     values(20), values(21), values(22), values(23), values(24), values(25), values(26), values(27), values(28), values(29), _
  203.     values(30), values(31), values(32), values(33), values(34), values(35), values(36), values(37), values(38), values(39), _
  204.     values(40), values(41), values(42), values(43), values(44), values(45), values(46), values(47), values(48))
  205.   case 49
  206.     db.sqlExecute(sql, values(0), values(1), values(2), values(3), values(4), values(5), values(6), values(7), values(8), values(9), _
  207.     values(10), values(11), values(12), values(13), values(14), values(15), values(16), values(17), values(18), values(19), _
  208.     values(20), values(21), values(22), values(23), values(24), values(25), values(26), values(27), values(28), values(29), _
  209.     values(30), values(31), values(32), values(33), values(34), values(35), values(36), values(37), values(38), values(39), _
  210.     values(40), values(41), values(42), values(43), values(44), values(45), values(46), values(47), values(48), values(49))
  211.   end select
  212.  
  213.  
  214. End Sub
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement