Databases
StackOverflow2013
Postsdbo
PO
 

Note that there are some explanatory texts on larger screens.

plurals
  1. PO
    primarykey
    data
    text
    <p>Unfortunately, you can't use a VB6/VBA function as a callback directly as VB6 only generates <code>stdcall</code> functions rather than the <code>cdecl</code> functions SQLite expects.</p> <p>You will need to write a C dll to proxy the calls back and forth or recompile SQLite to to support your own custom extension.</p> <p>After recompiling your dll to export the functions as <code>stdcall</code>, you can register a function with the following code:</p> <pre><code>'Create Function Public Declare Function sqlite3_create_function Lib "SQLiteVB.dll" (ByVal db As Long, ByVal zFunctionName As String, ByVal nArg As Long, ByVal eTextRep As Long, ByVal pApp As Long, ByVal xFunc As Long, ByVal xStep As Long, ByVal xFinal As Long) As Long 'Gets a value Public Declare Function sqlite3_value_type Lib "SQLiteVB.dll" (ByVal arg As Long) As SQLiteDataTypes 'Gets the type Public Declare Function sqlite3_value_text_bstr Lib "SQLiteVB.dll" (ByVal arg As Long) As String 'Gets as String Public Declare Function sqlite3_value_int Lib "SQLiteVB.dll" (ByVal arg As Long) As Long 'Gets as Long 'Sets the Function Result Public Declare Sub sqlite3_result_int Lib "SQLiteVB.dll" (ByVal context As Long, ByVal value As Long) Public Declare Sub sqlite3_result_error_code Lib "SQLiteVB.dll" (ByVal context As Long, ByVal value As Long) Public Declare Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory" (dest As Any, source As Any, ByVal bytes As Long) Public Property Get ArgValue(ByVal argv As Long, ByVal index As Long) As Long CopyMemory ArgValue, ByVal (argv + index * 4), 4 End Property Public Sub FirstCharCallback(ByVal context As Long, ByVal argc As Long, ByVal argv As Long) Dim arg1 As String If argc &gt;= 1 Then arg1 = sqlite3_value_text_bstr(ArgValue(argv, 0)) sqlite3_result_int context, AscW(arg1) Else sqlite3_result_error_code context, 666 End If End Sub Public Sub RegisterFirstChar(ByVal db As Long) sqlite3_create_function db, "FirstChar", 1, 0, 0, AddressOf FirstCharCallback, 0, 0 'Example query: SELECT FirstChar(field) FROM Table End Sub </code></pre>
    singulars
    1. This table or related slice is empty.
    1. POSQLite UDF - VBA Callback
      singulars
      1. PTQuestion
    1. PTAnswer
    1. USrpetrich
    1. USrpetrich
    plurals
    1. This table or related slice is empty.
    1. This table or related slice is empty.
    1. POSQLite UDF - VBA Callback
      singulars
      1. PTQuestion
    1. This table or related slice is empty.
    1. VO
      singulars
      1. PO
      1. This table or related slice is empty.
      1. VTUpMod
    2. VO
      singulars
      1. PO
      1. This table or related slice is empty.
      1. VTAcceptedByOriginator
    3. VO
      singulars
      1. PO
      1. This table or related slice is empty.
      1. VTUpMod
    1. COI've managed to find a stdcall friendly wrapper which also converts c arraya to safe arrays etc., so calling non-callback functions works fine, its just how to handle c-like structs returned by a callback, that's my next problem. As you said VBA might very well choke before that point is reached.
      singulars
      1. PO
      1. USgobansaor
    2. COI've managed to modify the SQLite3VB wrapper to support stdcall from certain functions. As my changes were pretty involved, I only posted the VB code. If you'd like the changes I made to the SQLite source, please post your email so I can send. Perhaps after you can post on your blog?
      singulars
      1. PO
      1. USrpetrich
    3. COThat's excellent, exactly what I was looking for! It would be great if you could send the SQLite source changes to "tom at gobansaor.com". I'm in the process of pulling together various SQLite/ExcelVBA code bits which I'll then publish on my blog, I'll make sure to give you a mention when I do.
      singulars
      1. PO
      1. USgobansaor
 

Querying!

 
Guidance
A row detail

Detail views are divided into sections. All the information in the data section comes from columns in the selected row. The other sections display data from other, related rows.

Related data can be related in a to-one or a to-many fashion. Captions of data related in a to-many fashion link to a list view showing a filtered view of the table.

Try moving around until you find a non-empty to-many entry and click on the label to get to one. You can move back to the root by clicking on the database name in the header.

SQuiL has stopped working due to an internal error.

If you are curious you may find further information in the browser console, which is accessible through the devtools (F12).

Reload