<html>
<head>
<base href="https://bugs.documentfoundation.org/">
</head>
<body>
<p>
<div>
<b><a class="bz_bug_link
bz_status_NEW "
title="NEW - Firebird: empty columns gone with prepared statement"
href="https://bugs.documentfoundation.org/show_bug.cgi?id=116890#c19">Comment # 19</a>
on <a class="bz_bug_link
bz_status_NEW "
title="NEW - Firebird: empty columns gone with prepared statement"
href="https://bugs.documentfoundation.org/show_bug.cgi?id=116890">bug 116890</a>
from <span class="vcard"><a class="email" href="mailto:lionel@mamane.lu" title="Lionel Elie Mamane <lionel@mamane.lu>"> <span class="fn">Lionel Elie Mamane</span></a>
</span></b>
<pre>Rah... Second test case, this time correct, is:
Sub Main
Dim DBDocUI as Object
on error resume next
DBDocUI = ThisDatabaseDocument.currentController
if not DBDocUI.isConnected then
DBDocUI.connect
end if
on error goto 0
dim s as Object
's = DBDocUI.ActiveConnection.createStatement()
s = DBDocUI.ActiveConnection.prepareStatement("SELECT ""ID"" AS
""TID1"", ""ID"" AS ""TID2"" FROM ""MitgliederVerband""")
'dim rs as Object
'rs = rs.executeQuery("SELECT ""ID"" AS ""TID1"", ""ID"" AS ""TID2""
FROM ""MitgliederVerband""")
rs = s.executeQuery()
dim i as integer
for i=1 to rs.metadata.ColumnCount
MsgBox i & ": " & rs.metadata.getColumnName(i) & " " &
rs.metadata.getColumnLabel(i)
next i
XRay rs.columns.ElementNames
'XRay s.columns.getByName("ID")
'XRay s.columns.getByName("ID1")
End Sub</pre>
</div>
</p>
<hr>
<span>You are receiving this mail because:</span>
<ul>
<li>You are the assignee for the bug.</li>
</ul>
</body>
</html>