<html>
    <head>
      <base href="https://bugs.documentfoundation.org/">
    </head>
    <body><table border="1" cellspacing="0" cellpadding="8">
        <tr>
          <th>Bug ID</th>
          <td><a class="bz_bug_link 
          bz_status_UNCONFIRMED "
   title="UNCONFIRMED - calc in win10 can't get data from "ORACLE RDB" database by ODBC and its Driver and VBA CODE"
   href="https://bugs.documentfoundation.org/show_bug.cgi?id=122588">122588</a>
          </td>
        </tr>

        <tr>
          <th>Summary</th>
          <td>calc in win10 can't get data from "ORACLE RDB" database by ODBC and its Driver and VBA CODE
          </td>
        </tr>

        <tr>
          <th>Product</th>
          <td>LibreOffice
          </td>
        </tr>

        <tr>
          <th>Version</th>
          <td>6.1.2.1 release
          </td>
        </tr>

        <tr>
          <th>Hardware</th>
          <td>All
          </td>
        </tr>

        <tr>
          <th>OS</th>
          <td>Windows (All)
          </td>
        </tr>

        <tr>
          <th>Status</th>
          <td>UNCONFIRMED
          </td>
        </tr>

        <tr>
          <th>Severity</th>
          <td>normal
          </td>
        </tr>

        <tr>
          <th>Priority</th>
          <td>medium
          </td>
        </tr>

        <tr>
          <th>Component</th>
          <td>Calc
          </td>
        </tr>

        <tr>
          <th>Assignee</th>
          <td>libreoffice-bugs@lists.freedesktop.org
          </td>
        </tr>

        <tr>
          <th>Reporter</th>
          <td>madavidponyhot@gmail.com
          </td>
        </tr></table>
      <p>
        <div>
        <pre>Description:
we used did it on 32bits win7 os PC , also we use 32bits ODBC driver,and there
is only one odbc application in win7 !
but in win10 , odbc application has two version (64bits and 32bits)
libreoffice calc and base can only get the 64bits setting,
so we find new odbc driver for oracle rdb database 64bits!
then problem happend!

there is the vba code:
ConTQC.Open"provider=msdasql;dsn=______;uid=_____;pwd=_____;logintimeout=100"
sqlstr = "select cust_no from data where certif_no = '" & certif_no & "' order
by product_date desc"
rs.Open sqlstr, ConTQC, adOpenForwardOnly, adLockReadOnly
TQC.Cust_no = RS.Fields("cust_no") <----- this step will crash!


Steps to Reproduce:
1.ConTQC.Open"provider=msdasql;dsn=______;uid=_____;pwd=_____;logintimeout=100"
sqlstr = "select cust_no from data where certif_no = '" & certif_no & "' order
by product_date desc"
2.rs.Open sqlstr, ConTQC, adOpenForwardOnly, adLockReadOnly <---this step is ok
3.TQC.Cust_no = RS.Fields("cust_no") <----- this step will crash!

Actual Results:
crash 
and the error response form open 

Expected Results:
get the data from database (table column)


Reproducible: Always


User Profile Reset: Yes



Additional Info:</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>